berikut list code nya........................
Private Sub btnkapital_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkapital.Click
lblhasil.Text = Strings.UCase(txtkata.Text)
End Sub
Private Sub btnbiasa_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbiasa.Click
lblhasil.Text = Strings.LCase(txtkata.Text)
End Sub
Private Sub btnawalan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnawalan.Click
lblhasil.Text = StrConv(txtkata.Text, VbStrConv.ProperCase)
End Sub
Private Sub btnterbalik_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnterbalik.Click
lblhasil.Text = Strings.StrReverse(txtkata.Text)
End Sub
Tidak ada komentar:
Posting Komentar