VB6 Code - Fungsi Untuk Menjadikan Kalimat Judul

Di bawah ini merupakan fungsi VB6 untuk menjadikan kalimat judul (maksudnya kalimat yang setiap katanya diawali dengan huruf besar), baik pada sebuah kata atau kalimat.

Fungsi untuk menjadikan kalimat judul

Function TitleCase(txt) As String
   TitleCase = StrConv(txt, vbProperCase)
End Function

Contoh penggunaan fungsi untuk menjadikan kalimat judul

Private Sub Form_Load()
   MsgBox TitleCase("FUNGSI UNTUK MENJADIKAN KALIMAT JUDUL")
   'Maka akan ditampilkan: Fungsi Untuk Menjadikan Kalimat Judul
   'dengan huruf besar pada seluruh awal kata
End Sub