buat Form untuk Menu Utama , dan design seperti berikut:

nah, pada menu file, Ketikkan  :
1. Caesar Chiper
2. Gonsfeld Chiper

Design Form Sebagai Berikut :

listing Programnya:

Public Class Caesar_Chiper

    Private Sub enkripsi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles enkripsi.Click
        Dim x As String = ""

berikut design Formnya:

Lalu ketik programnya:

Public Class Gransfeld_Chiper

    Private Sub hitung_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hitung.Click

Silahkan Design :

list Program:


Public Class Vernam_Chiper

    Private Sub Vernam_Chiper_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Buat Design Seperti Digambar :

Lalu Ketikkan Programnya Seperti berikut:


Public Class Vegenere_Chiper

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

JUDUL SOAL : MENAMPILKAN OUTPUT GAJI PEGAWAI PT.TELKOM

Berikut JAWABAN Program :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Judul Soal : 

 Kasus Pemrograman Pemakaian Listrik

Berikut adalah Jawaban Design dan Program

Public Class Form1
    Sub addKodePelanggan()
        With kd_pelanggan
            .Items.Add("TOK-MED-01")
            .Items.Add("TOK-BEL-02")