Your Ad Here

Setelah sebelumnya membuat program enkripsi pada VB sekarang kita akan membuat program untuk mendeskripnya, biar afdolll... hehehe

OK tanpa basa basi, kita langsung bereksperimen...

Langkah Pertama

  • Silakan buka kembali proyek yang sebelumnya telah kita buat, ituloh yang "Membuat program Enkripsi pada VB".
    Klik disini untuk membaca "Membuat Program Enkripsi pada VB"
    • .
  • Lalu tambahkan beberapa komponen, diantaranya :
  • 1 buah Label

  • 1 buah textbox

  • 1 buah CommandButton

  • maka otomatis masing2 komponen tersebut akan bernama label4, text4, dan command4.


  • Kalo sudah ganti parameter properties dari masing2 komponen menjadi seperti dibawah ini.:
  • text4, hapus captionnya, dan berikan nilai true pada seting multiline.
  • label4, ganti caption agar menjadi Plaintext Awal

  • command4, ganti caption agar menjadi Dekripsi>

    • Langkah Kedua

  • Setelah langkah diatas selesai, silakan masukan script dibawah ini pada tombol Dekripsi.
    Private Sub Command2_Click()
    strCipher = Text3.Text
    strKode = Text2.Text
    strPlainBaru = XORFunc(strKode, strCipher)
    Text4.Text = strPlainBaru
    End Sub


    • OK akhirnya selesai, sekarang kamu punya program Enkripsi dan Deskripsi...
    Moga bermanfaat...