Kali ini kita akan belajar cara untuk membalikkan kata atau kalimat yang kita inputkan pada TextBox, Misalnya seperti kata "Percobaan" akan menjadi "naabocreP".
- Buat Projek baru
- Desain tempilan seperti gambar dibawah, kita membutuhkan 2 TextBox dan sebuah Button.
|
Desain Tampilan |
- Kemudian pada tombol balik ketikkan kode berikut:
Dim balik As String
Dim Letters() As Char
balik = TextBox1.Text
Letters = balik.ToCharArray()
Array.Reverse(Letters)
Dim balikkata As New String(Letters, 0, Letters.Length)
TextBox2.Text = balikkata
- Coba jalankan dan isi TextBox1 lalu tekan tombol Balik.
|
Balik kata |