Beberapa fungsi Manipulasi String pada VB6

Penjelasan

• LCase()

        Fungsi Lcase digunakan untuk mengubah suatu karakter <string> menjadi huruf kecil.
        script program:
          Private Sub cmd_lcase_Click(Index As Integer)
                 txt_output.Text = LCase(txt_input.Text)
          End Sub

• UCase()

        Fungsi Lcase digunakan untuk mengubah suatu karakter <string> menjadi huruf besar.       
        script program:
        Private Sub cmd_ucase_Click(Index As Integer)
              txt_output.Text = UCase(txt_input.Text)
        End Sub

• LTrim()                                                                                                                                 

 Fungsi LTrim digunakan untuk menghilangkan spasi kosong di sebelah kiri data string.           
script program:                                                                                                                         
  Private Sub cmd_ltrim_Click(Index As Integer)
txt_output.Text = LTrim(txt_input.Text)
End Sub                                                                                                                                                    

• RTrim()                                                                                                                                

 Fungsi RTrim digunakan untuk menghilangkan spasi kosong di sebelah kanan data string.                                                                                                                                      
  script program:  
         Private Sub cmd_rtrim_Click(Index As Integer)
          txt_output.Text = RTrim(txt_input.Text)
          End Sub

• Len()

         Fungsi Len digunakan untuk mengitung jumlah atau banyaknya karakter pada suatu string.
          script program
         Private Sub cmd_len_Click()
         txt_output.Text = Len(txt_input.Text)
         End Sub

• Trim()

         Fungsi Trim digunakan untuk menghilangkan spasi kosong di sebelah kiri dan kanan data string.         
         script program:  
          Private Sub cmd_trim_Click(Index As Integer)
           txt_output.Text = Trim(txt_input.Text)
           End Sub

• StrReverse()

 Fungsi StrReverse digunakan untuk membalikkan urutan suatu karakter pada suatu kata atau kalimat.
script program:
Private Sub cmd_strreverse_Click(Index As Integer)
txt_output.Text = StrReverse(txt_input.Text)
End Sub

Download File Program:

Via Ziddu