LATIHAN SINGKAT PENGGUNAAN STRING DENGAN MERUBAH KALIMAT MENJADI KODE ASCI

Dibawah ini adalah FORM desainnya

    Di bawah ini adalah LISTING program FORM yang di atas

Public Class Form1

    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

    End Sub

    Private Sub proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles proses.Click

        Dim x As String

        huruf.Items.Clear()

        For i = 1 To Len(kalimat.Text)

            x = Microsoft.VisualBasic.Mid(kalimat.Text, i, 1)

            x = x & "=" & Asc(x)

            huruf.Items.Add(x)

        Next i

    End Sub

End Class

CARA PROSESNYA

*Input  kalimat sesuai yang kkita inginkan

 

    PROSES

*Setelah itu tekan TOMBOL PROSES, Maka kalimat akan di rubah ke dalam bentuk kode asci

 

Catatan...

Huruf besar dan huruf kecil berbeda jumlahnya pada kode asci saat di PROSES.