Untuk membalikkan tulisan pada VB.Net, mis: kasur – rusak seperti gambar di bawah ini :
adalah sebagai berikut :
Disini hanya diperlukan 2 Textboox dan 1 Button
• Textboox1, ganti name pada properties menjadi s.
• Textboox2, ganti name pada properties menjadi s1.
• Button, ganti name pada properties menjadi proses
• Klik 2x pada button tersebut, kemudian tuliskan listing berikut ini :
Public Class Form1
Private Sub btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnproses.Click
Dim x As String
x = Microsoft.VisualBasic.StrReverse(s.Text)
s1.Text = StrReverse(s.Text)
End Sub
End Class
• Jalankan program tersebut (F5)
Semoga bermanfaat……….
Tidak ada komentar:
Posting Komentar