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
 
Top