Baiklah pada hari ini saya akan mempostingkan aplikasi membuat “Kriptografi” dengan Visual Basic 2008. Kriptografi adalah penambahan beberapa huruf, angka dan simbol-simbol tertentu kedalam sebuah text, dengan tujuan orang lain tidak dapat membaca pesan yang anda kirimkan ke sahabat anda, dimana sahabat anda juga mengerti pesan tersebut. Langsung saja, saya akan membuat 4 Kriptografi yaitu : Kriptografi Caesar, Kriptografi Vernam, Kriptografi Gronsfeld, dan Kroptografi Vigenore. Pertama Buatlah 5 Form pada VB 2008. (+)Pada Form 1 kita buat itu menjadi induknya, seperti berikut ini : Untuk membuat “File” dan “About” tersebut gunakanlah Menustrip yang terdapat pada toolbox. Setelah itu masukkan code berikut ini ke form 1 : Public Class Form1 Private Sub GronsferToolStripMenuItem_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ...
Public Class Form1 Sub BuatTabel() LV.columns.Add( "Npm" , 80, HorizontalAlignment.Center) LV.columns.Add( "Nama" , 180, HorizontalAlignment.Left) LV.View = View.Details LV.GridLines = True LV.FullRowselect = True End Sub Sub IsiTabel() Dim Lst As New ListViewItem Lst.Text = Npm.Text Lst.SubItems.Add(Nama.Text) LV.Items.Add(Lst) End Sub Private Sub Form1_Load( ByVal sender As System.Object, ByVal...