Memberi Komentar pada VB.NET

Di sebuah program yang bagus dan berkualitas biasanya terdapat banyak komentar di dalam source code program itu,disini saya akan mengajarkan cara memberi komentar pada source code program anda.

buka VB.NET anda

File->New Project->Windows Form Application->beri nama "KomentarVBNET"->Ok

langsung pada bagian kode tambahkan sebagai berikut :

untuk memberi komentar gunakan tanda petik satu " ' " dan warna komentar hijau seperti contoh diatas.

Sekian tutorial singkat hari ini,saya mau siap-siap kuliah dulu,masih semester satu dimaklumi jika ada kesalahan tentang tutorial-tutorial yang pernah saya buat ini.

Sumber: http://vbnetsite.blogspot.com/2012/09/memberi-komentar-pada-vbnet.html#more

VB Menu - Menu Designing, The Menu Editor - Visual Basic.NET 2.008

Menu adalah salah satu unsur yang paling umum dan paling karakteristik dari antarmuka pengguna Windows. Bahkan di hari tua dari karakter berbasis display, menu yang digunakan untuk menampilkan pilihan metodis terorganisir dan memandu pengguna melalui aplikasi. Meskipun antarmuka visual yang kaya aplikasi Windows dan banyak alternatif, menu masih merupakan cara yang paling populer mengorganisir sejumlah besar pilihan. Banyak aplikasi menduplikasi beberapa atau semua menu mereka dalam bentuk ikon toolbar, tapi menu adalah perlengkapan standar formulir. Anda dapat mengaktifkan toolbar dan mematikan, tapi tidak menu.

Menu Editor

Menu dapat dilampirkan hanya untuk bentuk, dan mereka dilaksanakan melalui kontrol MenuStrip. Item yang membentuk menu adalah obyek ToolStripMenuItem. Seperti yang akan Anda lihat, kontrol MenuStrip dan objek ToolStripMenuItem memberi Anda kendali mutlak atas struktur dan tampilan menu dari aplikasi Anda. Kontrol MenuStrip adalah variasi dari kontrol Strip, yang merupakan basis dari menu, toolbar, dan status bar.

Anda dapat merancang menu visual dan kemudian memprogram Klik mereka event handler. Pada prinsipnya, itu semua ada untuk menu: Anda menentukan item nya (perintah menu ini) dan kemudian Anda memprogram tindakan setiap perintah itu. Tergantung pada kebutuhan aplikasi Anda, Anda mungkin ingin mengaktifkan dan menonaktifkan perintah tertentu, menambahkan menu konteks untuk beberapa kontrol pada formulir Anda, dan sebagainya. Karena setiap item dalam menu diwakili oleh objek ToolStripMenuItem, Anda dapat mengontrol menu aplikasi dari dalam kode Anda dengan memanipulasi properti dari ToolStrip-MENUITEM benda. Mari kita mulai dengan merancang menu yang sederhana, dan saya akan menunjukkan kepada Anda bagaimana untuk memanipulasi obyek menu dari dalam kode Anda seperti yang kita pergi bersama.

Klik dua kali ikon MenuStrip dalam Toolbox. (Anda akan menemukan kontrol MenuStrip di Menus & tab Toolbars dari Toolbox.) Sebuah contoh dari kontrol MenuStrip akan ditambahkan ke bentuk, dan perintah menu tunggal akan muncul pada formulir Anda. Keterangannya akan Tipe sini. Jika Anda tidak melihat item menu pertama pada formulir segera, pilih kontrol MenuStrip dalam baki Komponen bawah form. Lakukan seperti judul mengatakan: Klik dan masukkan keterangan perintah pertama, File, seperti yang terlihat pada Gambar 5.15. Untuk menambah item di bawah menu File, tekan Enter. Untuk memasukkan perintah lain dalam menu utama, tekan Tab. Tergantung pada tindakan Anda, kotak lain akan ditambahkan, di mana Anda dapat mengetik judul dari perintah selanjutnya. Tekan Enter untuk pindah ke itemvertically berikutnya, dan tomove Tab ke itemhorizontally berikutnya. Untuk menyisipkan pemisah, masukkan tanda hubung (-) sebagai judul item.

Gambar 5.15 - Merancang menu pada Formulir

Ketika Anda membawa penunjuk ke item menu, tombol drop-down akan muncul di sebelah kanan item. Klik tombol ini untuk memilih jenis item yang akan menempatkan pada menu. Item ini bisa menjadi objek MENUITEM, pemisah, ComboBox, atau TextBox. Dalam bab ini, saya akan fokus pada item menu, yang sejauh elemen yang paling umum pada menu. Dua pilihan terakhir, bagaimanapun, memungkinkan Anda untuk membangun menu rumit, mengingatkan pada menu Office.

Masukkan item dari menu File - New, Open, Save, SaveAs, dan Keluar - dan kemudian klik di suatu tempat di formulir. Semua item sementara (yang dengan judul Tipe sini) akan hilang, dan menu akan diselesaikan pada formulir.

Untuk menambahkan menu Edit, pilih ikon MenuStrip untuk mengaktifkan menu editor visual dan kemudian klik item file. Dalam item baru yang muncul di samping item file pada kontrol, masukkan Sunting string. Tekan Enter dan Anda akan beralih ke item pertama dari menu Edit. Isi menu Edit dengan perintah pengeditan biasa. Tabel 5.4 menunjukkan keterangan (Text properti) dan nama (Nama properti) untuk setiap menu dan setiap perintah. Anda juga dapat menyisipkan menu standar dengan perintah Insert Produk Standar menu konteks obyek MenuStrip itu.

Tabel 5.4 - The Judul dan Nama File dan Edit Menu

Keterangan	Nama
Berkas	FileMenu
Baru	NewMenu
Buka	OpenMenu
Menyimpan	SaveMenu
Save As	SaveAsMenu
Keluar	ExitMenu
Mengedit	Editmenu
Kopi	CopyMenu
Memotong	CutMenu
Menempelkan	PasteMenu
Menemukan	FindMenu

Item paling kiri pada Tabel 5.4 adalah nama yang pertama-tingkat menu (File dan Edit), keterangan yang menjorok dalam tabel adalah perintah pada kedua menu. Setiap item menu memiliki nama, yang memungkinkan Anda untuk mengakses properti dari dalam kode Anda. Nama yang sama juga digunakan dalam penamaan handler Klik event item. Nama default dari item menu Anda menambahkan visual ke menu aplikasi didasarkan pada keterangan item tersebut diikuti oleh ToolStripMenuItem akhiran (FileToolStripMenuItem, NewToolStripMenuItem, dan sebagainya). Anda mungkin akan ingin mengubah nama default untuk sesuatu yang kurang berlebihan. Untuk melakukannya, mengubah properti Nama pada jendela Properties. Untuk melihat properti dari item menu, klik kanan dan pilih Properties dari menu konteks.

Metode yang paling nyaman mengedit menu adalah dengan menggunakan Koleksi Produk jendela Editor, yang ditunjukkan pada Gambar 5.16. Ini bukan editor visual, tapi Anda dapat mengatur semua properti dari setiap item menu tanpa harus beralih ke jendela Properties.

Gambar 5.16 - Mengedit menu dengan Editor Koleksi Produk

Tombol Add menambah menu item dari jenis yang ditentukan dalam kotak kombo sebelahnya (item menu, combo box, atau kotak teks). Untuk menyisipkan suatu item di lokasi yang berbeda, tambahkan ke menu dan kemudian menggunakan tombol panah untuk bergerak ke atas atau ke bawah. Ketika Anda menambahkan item baru, Anda dapat mengatur Teks dan sifat Nama pada pane kanan dari editor. Anda juga dapat mengatur font mereka, mengatur alignment dan orientasi teks, dan menentukan gambar yang akan ditampilkan bersama dengan teks. Untuk menambahkan foto ke item menu, cari properti Gambar dan klik tombol elipsis. Sebuah kotak dialog akan muncul, di mana Anda dapat memilih sumber daya yang tepat.

Perhatikan bahwa semua gambar yang Anda gunakan pada formulir Anda disimpan sebagai sumber daya proyek. Anda dapat menambahkan semua gambar dan ikon mungkin Anda butuhkan dalam sebuah proyek untuk file sumber daya yang sama dan menggunakan kembali mereka sesuka hati. Properti TextImageRelation memungkinkan Anda untuk menentukan posisi relatif dari teks dan gambar. Anda juga dapat memilih untuk menampilkan teks saja, gambar saja, atau teks dan gambar untuk setiap item menu dengan properti DisplayStyle.

Jika item menu mengarah ke submenu, Anda juga harus menentukan item submenu ini. Cari properti DropDownItems dan klik tombol elipsis. Sebuah jendela yang sama akan muncul, di mana Anda dapat memasukkan drop-down item dari item menu saat ini. Perhatikan bahwa menu pada form terus diperbarui saat Anda mengeditnya di jendela Koleksi Editor Items, sehingga Anda dapat melihat efek dari perubahan Anda di formulir tersebut. Secara pribadi, saya lebih produktif dengan editor dibandingkan dengan alat visual, terutama karena semua sifat yang di sana, dan saya tidak perlu beralih antara permukaan desain dan jendela Properties.

Sumber:  http://translate.google.co.id/translate?hl=id&sl=en&u=http://visualbasic.w3computing.com/vb2008/5/vb-menus-menu-editor.php&prev=/search%3Fq%3Dmenu%2Bvb.net%2B2008%26hl%3Did%26tbo%3Dd%26biw%3D1024%26bih%3D396&sa=X&ei=ykHMUPXWOsuIrAe4y4CwCA&ved=0CDcQ7gEwAA

Menu Bar, Menu di VB.NET

Penjelasan

Menu Bar Menu bar di Visual Basic.net 2008 terdiri dari perintah yang digunakan untuk membangun kode software. Perintah-perintah ini terdaftar sebagai menu dan sub menu. Menu bar juga mencakup Toolbar yang sederhana, yang berisi daftar perintah yang umum digunakan sebagai tombol. Toolbar ini dapat disesuaikan, sehingga tombol dapat ditambahkan sesuai kebutuhan. Tabel berikut Buttons ToolBar dan tindakan mereka. Tombol Deskripsi Menambahkan Proyek baru. Buka Jendela Baru. Buka File. Menyimpan Kondisi. Menyimpan semua file yang berkaitan dengan proyek. Potong seleksi. Salin seleksi. Paste seleksi. Cari teks dicari. Komentar dari baris yang dipilih. Baris-baris yang dipilih. Undo. Redo. Lanjutkan Debugging. Istirahat Debugging. Hentikan Debugging. Menampilkan Solution Explorer. Menampilkan Properties Window. Menampilkan Object Browser. Menampilkan Jendela Toolbox. Menampilkan Kesalahan Jendela List.   Menampilkan Jendela Command. Sumber:  http://translate.google.co.id/translate?hl=id&sl=en&u= http://www.hscripts.com/tutorials/vbnet/menubar.html&prev=/search%3Fq%3Dmenu%2B vb.net%2B2008%26hl%3Did%26tbo%3Dd%26biw%3D1024%26bih%3D396&sa= X&ei=ykHMUPXWOsuIrAe4y4CwCA&ved=0CD4Q7gEwAQ

Koneksi VB.Net 2008 dan SQL Server 2008 dengan Connection String

Untuk membuat aplikasi di VB.Net 2008 yang menggunakan database, maka kita terlebih dahulu harus membuat koneksi yang menghubungkan database dengan VB.Net 2008. Kali ini saya akan memberi contoh sederhana menghubungkan VB.Net 2008 dengan database SQL Server 2008.

Pertama-tama buatlah sebuah database kosong dan beri nama mydb. Nama database boleh berbeda.

Jalankan program VB.Net 2008 dan buat project baru (File - New Project) dan beri nama koneksi kemudian melalui menu (project - add new item) pilih module, kemudian ketikkan baris2 kode berikut.

 Imports System.Data.SqlClient  
 Module Module1  
   Public Class koneksi  
     Public Function buatkoneksi() As Boolean  
       Dim conn As SqlConnection = Nothing  
       Dim connString As String = "Data Source=ZHENLONK-342572;Initial Catalog=mydb;Integrated Security=True"  
       conn = New SqlConnection(connString)  
       conn.Open()  
       If conn.State <> ConnectionState.Open Then  
         Return False  
       Else  
         Return True  
       End If  
     End Function  
   End Class  
 End Module  

Contoh diatas saya menggunakan metode trusted connection. Ganti nilai dari Data Source dengan nama server untuk SQL Server anda atau nama instance name SQL Server anda. Dalam hal ini server saya bernama ZHENLONK-342572, sedangkan Initial Catalog adalah nama database yang digunakan.

Bila sudah, kemudian klik form1.vb pada tab solution explorer di sebelah kanan aplikasi. Tambahkan tombol (button) dan ganti text Button1 tersebut menjadi Test Koneksi. klik 2 kali tombol tersebut dan ketikkan kode berikut.

 Dim mykoneksi As New koneksi  
 If Not mykoneksi.buatkoneksi() Then  
    MsgBox("Koneksi Gagal", MsgBoxStyle.Critical, "Info Program")  
 Else  
    MsgBox("Koneksi Berhasil", MsgBoxStyle.Information, "Info Program")  
 End If  

Tambahkan 1 tombol untuk exit / keluar dari program dan ketikkan kode berikut.

    Me.Close()

Tampilan akhir aplikasi kita akan tampak seperti berikut ini.

Tampilan Akhir Program

Klik tombol Test Koneksi, bila Setting nama server dan database benar, maka tampil message box Koneksi Berhasil.

Sumber: http://aplikasivbnet.blogspot.com/2011/05/koneksi-vbnet-2008-dan-sql-server-2008.html

Membuat Aplikasi Penjualan Alat Tulis Sederhana VB.NET

Merupakan lanjutan/pengembangan dari latihan 1  Membuat Aplikasi Penjualan Alat Tulis Sederhana
Buatlah form seperti gambar dibawah ini

• Tambahkan Tool-toolnya sbb :

Label 7 buah

label1 properties Text = Penjualan alat tulis
label2 properties Text = Alat tulis
label3 properties Text = Harga Satuan
label4 properties Text = JML
label5 properties Text = Buku
label6 properties Text = Pensil
label7 properties Text = Penghapus

Textbox 8 buah

textbox1 propertiesnya: Text = 3000 (harga buku 3000), TextAlign= right (rata kanan)
textbox2 propertiesnya: Text = 2500 (harga pensil 2500), TextAlign= right (rata kanan)
textbox3 propertiesnya: Text = 2000 (harga pensil 2000), TextAlign= right (rata kanan)
textbox4 propertiesnya: Text = 0 , TextAlign= right(rata kanan) untuk menampilkan hasil penjumlahan/total harga

textbox5 propertiesnya: Text = 0, (JML buku)
textbox6 propertiesnya: Text = 0, (JML pensil)
textbox7 propertiesnya: Text = 0, (JML penghapus)
textbox8 propertiesnya: Text = 0, (untuk menampilkan hasil jumlah barang)


Button 1 buah

Button1 propertiesnya : text = total harga (tombol untuk melakukan perhitungan)

• Selanjutnya adalah memasukan kode pemprogramannya
• Doubel klik pada button1/total harga kemudian copy code dibawah ini alangkah baiknya diketik ulang unuk mengetahui bahwa vb.net 2008 bisa mencari kata kunci coding secara otomatis

        Dim bk As Decimal = TextBox1.Text

        Dim ps As Decimal = TextBox2.Text
        Dim ph As Decimal = TextBox3.Text
        Dim JMLbk As Decimal = TextBox5.Text
        Dim JMLps As Decimal = TextBox6.Text
        Dim JMLph As Decimal = TextBox7.Text
        TextBox8.Text = JMLbk + JMLps + JMLph
        TextBox4.Text = (bk * JMLbk) + (ps * JMLps) + (ph * JMLph)

Penjelasan kode pemprogramanya :

Setiap ada variabel kita dahulukan dengan kata Dim artinya dimensi kita gunakan As/sebagai decimal karena perhitungan angka.

• variabel dari buku disingkat jadi bk
• variabel dari pensil disingkat jadi ps
• variabel dari penghapus disingkat jadi ph
• variabel dari Jumlah buku disingkat jadi JMLbk
• dst

Rumus perhitungan

TextBox8.Text = JMLbk + JMLps + JMLph

TextBox8.Text untuk menampilkan jml seluruh barang
menghitung jumlah seluruh barang uang dijual merupakan penjumlahan dari juml buku + jumlah pensil + jumlah penghapus


TextBox4.Text = (bk * JMLbk) + (ps * JMLps) + (ph * JMLph)
TextBox4.Text Menampilkan total harga merupakan penjumlahan dari harga barng x dengan jml barng


Doubel klik pada button1/total harga kemudian ketik code dibawah ini
Dim bk As Decimal = TextBox1.Text
Dim ps As Decimal = TextBox2.Text
Dim ph As Decimal = TextBox3.Text
Dim JMLbk As Decimal = TextBox5.Text
Dim JMLps As Decimal = TextBox6.Text
Dim JMLph As Decimal = TextBox7.Text

TextBox8.Text = JMLbk + JMLps + JMLph
TextBox4.Text = (bk * JMLbk) + (ps * JMLps) + (ph * JMLph)



Penjelasan kode pemprogramanya :
Setiap ada variabel kita dahulukan dengan kata dim artinya dimensi kita gunakan
AS/sebagai decimal untuk perhitungannya
 variabel dari buku disingkat jadi bk
 variabel dari pensil disingkat jadi ps
 variabel dari penghapus disingkat jadi ph
 variabel dari Jumlah buku disingkat jadi JMLbk
 dst
TextBox8.Text = JMLbk + JMLps + JMLph
 TextBox8.Text untuk menampilkan jml seluruh barang
 menghitung jumlah seluruh barang uang dijual merupakan penjumlahan dari
juml buku + jumlah pensil + jumlah penghapus
TextBox4.Text = (bk * JMLbk) + (ps * JMLps) + (ph * JMLph)
 TextBox4.Text Menampilkan total harga merupakan penjumlahan dari harga
barng x dengan jml barng
Create

Sumber:  http://www.tipsh4re.com/2011/04/membuat-aplikasi-penjualan-alat-tulis.html

Membuat Konversi Kalkulator Sederhana dengan VB.NET

Pada kali ini dibahas membuat konversi kalkulator sederhana, untuk menkonversi satuan panjang meter (m) kesatuan yang lain seperti inci, kaki dst.

1.      Buatlah sebuah form seperti gambar dibawah ini

Tambahkan

Label 4 buah

LABEL	PROPERTIES TEXT	KET
label1	Input	Masukan nilai
label2	Output	Hasil konversi
label3	m	Satuan input (m)
label4	m	Satuan output

Textbox 2 buah

Textbox	PROPERTIES	Ket
	TEXT
Textbox 1	0	input
Textbox 2	0	Menampilkan Output

BUtton1 buah

BUtton1	PROPERTIES TEXT	Ket
Button1	inci
Button2	kaki
Button3	yard
Button4	mil intr
Button5	mil laut
Button6	C	clear

2.      Selanjutnya adalah memasukan kode pemprogramannya

Doubel klik pada setiap button harga kemudian ketik code dibawah ini

·         Doubel klik Button1 ketik code dibawah ini

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim inch As Double = TextBox1.Text

        TextBox2.Text = inch * 39.370079

        Label4.Text = "in"

    End Sub

·         Doubel klik Button2 ketik code dibawah ini

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim kaki As Double = TextBox1.Text

        TextBox2.Text = kaki * 3.28084

        Label4.Text = "ft"

    End Sub

·         Doubel klik Button3 ketik code dibawah ini

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        Dim yard As Double = TextBox1.Text

        TextBox2.Text = yard * 1.093613

        Label4.Text = "yd"

    End Sub

·         Doubel klik Button4 ketik code dibawah ini

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

        Dim mil As Double = TextBox1.Text

        TextBox2.Text = mil * 0.000621

        Label4.Text = "mi"

    End Sub

·         Doubel klik Button5 ketik code dibawah ini

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

        Dim mil As Double = TextBox1.Text

        TextBox2.Text = mil * 0.00054

        Label4.Text = "mil"

    End Sub

·         Doubel klik Button6 ketik code dibawah ini

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

        TextBox1.Text = 0

        TextBox2.Text = 0

    End Sub

Ket koding :

        Dim inch As Double = TextBox1.Text

        TextBox2.Text = inch * 39.370079

        Label4.Text = "in"

• untuk mendapatkan hasil konversi adalah dengan dikalikan nilai konversinya misalnya 1 m ke inci =  39.370079 maka  TextBox2.Text = inch * 39.370079 
• Label4.Text = "in"  untuk menampikan satuan konversi outputnya

• Untuk button6 untuk clear, maka logikanya adalah supaya input dan output = 0 maka 

        TextBox1.Text = 0

        TextBox2.Text = 0

Selanjutnya tinggal ditambahkan atau dikembangkan sesuai keiginan masing-masing. 

Sumber: http://www.tipsh4re.com/2011/04/membuat-konversi-kalkulator-sederhana.html

Belajar membuat Aplikasi/pemprograman VB.NET untuk pemula

Pada kali ini saya akan berbagi/sh4re sedikit ilmu yang saya miliki tentang tutorial/belajar bahasa pemprograman Visual Basic (VB.Net) untuk pemula, pada tutorial yang akan dibuat akan dibahas secara sederhana mulai dari dasar, dengan contoh-contoh membuat program yang simpel, sehingga mudah untuk dipahami bagi para sobat-sobat yang ingin memulai untuk belajar pemrograman menggunakan VB.NET, untuk sofware yang saya gunakan VB 2008 Express Edition.

Langsung saja langkah memulai menggunakan VB.NET

• Jalankan aplikasi VB.net 2008 kemudian akan muncul tampilan seperti gambar dibawah ini

• Membuat project baru, File kemudian klik New Project akan muncul seperti gambar dibawah ini

• Pilih Windows Form, kemudian ketikan Nama program yang akan dibuat misal namanya: latihan 1, kemudian ok.

Latihan 1

• Pada kesempatan ini yaitu membuat aplikasi/program sederhana menghitung total harga penjualan alat tulis
• Tambahkan 4 buah label, pada gambar dan diberinama sesuai gambar, dan 4 buah textbox dan 1 buah button, untuk mengubah namanya pada properties.

• Kemudian doubel klik pada button (total harga) kemudian tulis/copy codingya seperti dibawah ini yang berwarna biru.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim bk As Decimal = TextBox1.Text
        Dim ps As Decimal = TextBox2.Text
        Dim ph As Decimal = TextBox3.Text
        TextBox4.Text = bk + ps + ph

  End Sub

• Kemudian kita jalan kan aplikasi yang telah kita buat tadi klik pada Start Debugging seperti gambar yang dikotak merah

• Masukan nilai/harga2 harganya kemudian klik button total harga.

         Untuk lebih jelasnya silahkan download file pdfnya disini VB.NET PEMULA

• Selesai aplikasi pertama anda, sudah berhasil selanjutnya tinggal dikebangkan sesuai ide/kreasi anda.

Sumber: http://www.tipsh4re.com/2011/04/vbnet.html

PERULANGAN DAN PERCABANGAN DALAM VISUAL BASIC

I. PERULANGAN

Dalam pemrograman ada kalanya kita memerlukan perulangan untuk melakukan suatu perintah yang sama untuk beberapa kali. Pada visual basic terdapat beberapa macam struktur kondisi perulangan, diantaranya adalah Do … Loop dan For … Next. Untuk lebih jelasnya berikut adalah macam – macam bentuk perulangan dalam visual basic :

1. 1. Do While … Loop

Kata while dalam pernyataan Do While merintahkan program untuk melakukan perulangan apabila kondisi persyaratan masih bernilai True. Apabila kondisi persyaratan bernilai False maka program akan keluar dari perulangan dan berpindah ke kode program berikutnya. Bentuk sintaks perulangan Do While adalah :

Do While Kondisi
Pernyataan
…..
Loop

Sintaks di atas adalah bentuk Do While dimana kondisi akhir perulangan terletak di awal sedangkan bentuk Do While yang letak kondisi akhirnya di akhir adalah sebagai berikut :

Do
Pernyataan
……
Loop While Kondisi

1. 2. Do Until … Loop

Pada dasarnya, perulangan DO Until sama dengan perulangan DO While. Yang membedakannya adalah pada perulangan Do While perulangan akan terus berjalan selama kondisi bernilai True dan akan berhenti jika kondisi bernilai False sedangkan pada perulangan Do Until perulangan akan terus berjalan apabila kondisi bernilai salah dan akan brhenti jika kondisi bernilai True. Sintaks dari perulangan Do Until adalah :
Do Until Kondisi
Pernyataan
…..
LoopPerulangan Do Until juga memiliki bentuk sintaks yang lain dimana kondisi diletakkan di akhir pernyataan perulangan. Bentuk sintaksnya adalah sebagai berikut :

Do
Pernyataan
……
Loop Until Kondisi

1. 3. While … Wend

Perulangan While … Wend digunakan saat kita ingin pernyataan pada program dijalankan selama kondisi ekspresi yang di tetapkan masih bernilai True . Sintaks perulangan While Wend adalah :

While Ekspresi
Pernyataan
…..
Wend

1. 4. For … Next

Perulangan For … Next digunakan untuk melakukan perulangan dengan jumlah tertentu yang kita kehendaki. Kita harus mendeklarasikan sebuah variabel yang akan digunakan sebagai indeks untuk perulangan. Sintaks perulangan For … Next adalah :

For Indeks = NilaiAwal To NilaiAkhir
Pernyataan
…..
Next Indeks 

II. PERCABANGAN

Dalam Visual Basic ada beberapa kondisi percabangan yang dapat digunakan seperti IF… THEN, IF…THEN…ELSE, dan SELECT CASE. Kondisi percabangan biasanya dinyatakan dengan menggunakan operator seperti operator sama dengan (=), tidak sama dengan (<>) atau operator-operator perbadingan lainnya ( >, >=, <, <=).

1.   If…Then

Percabangan dengan menggunakan If … Then digunakan untuk memilih dua kondisi atau lebih dengan memeriksa syarat pada tiap kondisi, jika syarat pada kondisi 1 benar ( True ) maka maka program akan menjalankan pernyataan 1 jika tidak ( False ) maka program akan memeriksa kondisi 2, jika syarat pada kondisi 2 benar ( True ) maka program akan menjalankan pernyataan 2 jika tidak ( False ) maka program akan memeriksa kondisi berikutnya dan begitu seterusnya hingga kondisi terakhir pada percabangan.   

If Kondisi1 Then 

            Pernyataan1 ………… 

ElseIf Kondisi2 Then 

            Pernyataan2 ……….. 

Else 

            Pernyataan3 ………… 

End if

Contoh programnya :

Dim Suhu Sebagai Double

   ...

   If => Suhu Then 

       Debug. Print "Ini sangat panas"

   Elseif 30,0 <= Suhu Dan <Suhu = 39,0 Then

       Debug. Print "Panas"

   Elseif 20,0 <= Suhu Dan <Suhu = 29,0 Then

       Debug. Print "Ini hangat"

   Elseif 10,0 <= Suhu Dan <suhu = 19,0 Then

       Debug. Print "It's cool"

   Elseif 0.0 <= Suhu Dan <Suhu = 9,0 Then

       Debug. Print "Dingin"

   Else 

       Debug. Print "Dingin"

   End If

2.   Select Case

Dibandingkan dengan percabangan If … Then, Select Case lebih mudah dibaca dan di debug serta lebih mudah digunakan dalam alur program yang membutuhkan banyak percabangan.

Bentuk umum perabangan select case adalah sebagai berikut :

Select Case Pilihan

Case 1 Pernyataan1 …..

Case 2 Pernyataan2 …..

Case 3 Pernyataan3 ……

End Select

Contoh program dengan menggunakan Select Case :

   Pilih Kasus Suhu

       Case Apakah> = 40 #

           Debug. Print "Ini sangat panas"

       Case 30 # Untuk 39 #

           Debug. Print "Panas"

       Case 20 # Untuk 29 #

           Debug. Print "Ini hangat"

       Case 10 # Untuk 19 #

           Debug. Print "It's cool"

       Case 0 # Untuk 9 #

           Debug. Print "Dingin"

       Case Else

           Debug. Print "Dingin"

   End Select

Sumber: http://kevinkarundeng.wordpress.com/2011/03/30/perulangan-dan-percabangan-dalam-visual-basic/