VB6 Code - Menjadikan Seluruh Kapital

Di bawah ini merupakan fungsi VB6 untuk membesarkan seluruh huruf (membuat seluruh huruf menjadi kapital), baik pada kata atau kalimat.

'Fungsi untuk membesarkan seluruh huruf
     Function UpperCase(txt As String) As String
       UpperCase = StrConv(txt, vbUpperCase)
End Function

'Contoh penggunaan Fungsi untuk membesarkan seluruh huruf:
Private Sub Form_Load()
      MsgBox UpperCase("Fungsi Untuk Membesarkan Seluruh Huruf")
     'Maka akan ditampilkan FUNGSI UNTUK MEMBESARKAN SELURUH HURUF
     'dengan huruf besar seluruhnya
End Sub