Friday, July 20, 2012

Contoh Program sederhana Memilih Menu Makan dengan VB.Net 10

Langsung saja di buka Vb.Net 10 kamu,
VB.Net 2010
Pilih di menu Windows Form Application Visual basic
Isi pada kolom Nama, Trus OK
Buat Form seperti tampilan berikut
VB.Net 2010.1
Kodenya seperti ini
VB.Net 2010.2
VB.Net 2010.3
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
ListBox1.Items.Add(”Pagi”)
ListBox1.Items.Add(”Siang”)
ListBox1.Items.Add(”Malam”)
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
CheckedListBox1.Items.Add(”Tiwul”)
CheckedListBox1.Items.Add(”Nasi”)
CheckedListBox1.Items.Add(”Baso”)
Dim pilihan As String
pilihan = “Pilihanya….” + ListBox1.SelectedItem
TextBox1.Text = ListBox1.SelectedItem
MessageBox.Show(pilihan, “Menu saat ini adalah”, MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
End
End Sub
Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
Dim jumlah As Integer
jumlah = CheckedListBox1.CheckedItems.Count
MessageBox.Show(CStr(jumlah), “Pilihan Berjumlah”,
MessageBoxButtons.OK, MessageBoxIcon.Information)
If jumlah = 2 Then
CheckedListBox1.Items.Add(”Cukup”)
End If
End Sub
End Class
Coba di Debug ( Run ), jika benar hasilnya seperti ini
VB.Net 2010.4
Selamat mencoba
Atau download Program Disini.

Source :  http://ekosuhartono.blogdetik.com/

HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Program IF Sederhana Pada QBasic

Contoh Program IF berikut ini sangat mudah,tergantung teman – teman mengeksplorasi mengenai bagaimana menemukan kondisi dan hasilnya,berikut ini beberapa Contoh Program IF Sederhana Pada QBasic :
  • Ada sebuah pertanyaan yang hasilnya ditentukan dari sebuah kondisi,misal seperti ini Kita masukan nilai A.Jika kita masukan nilai A < 10 maka Nilai B tersebut adalah Nilai A + 10,Namun Jika nilai A > 10 maka hasil nilai B adalah nilai A itu sendiri. Berikut ini contohnya :
1
2
3
4
5
6
7
8
CLS
INPUT "Masukan Angka A : "; a
IF A < 10 Then
   b = a + 10
ELSE
   b = a
END IF
PRINT b
  • Kita masukan nilai A.Jika kita masukan nilai A < 10 maka Nilai B tersebut adalah Nilai A + 10,Jika kita masukan nilai A = 10 maka Nilai B tersebut adalah Nilai A + 1 Namun Jika nilai A > 10 maka hasil nilai B adalah nilai A itu sendiri. Berikut ini contohnya :
1
2
3
4
5
6
7
8
9
10
11
12
CLS
INPUT "Masukan Angka A : "; a
IF a < 10 Then
   b = a + 10
ELSE
IF a = 10 then
  b = a + 1
ELSE
   b = a
END IF
END IF
PRINT b
Mungkin sekian dulu informasi sederhana saya mengenai ilmu programming QBasic ini,semoga dengan adanya Contoh Program IF Sederhana Pada QBasic ini teman – teman dapat mengerti mengenai QBasic ini.Jika ada yang ingin ditnyakan silahkan berkomentar pada kolom komentar setelah artikel Contoh Program IF Sederhana Pada QBasic.

Source :  http://aldyputra.net/



HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Program Aplikasi Bangun Datar Sederhana Berbasis Visual Basic 6.0

Sebuah media pembelajaran berbasis visual basic 6.0 dengan materi Bangun Datar yang terdiri dari Persegi, Persegi Panjang, Jajargenjang, Belah Ketupat, Layang-Layang dan Trapesium. jadi dengan menggunakan program ini kalian bisa mempelajari Bangun Datar dengan sederhana dengan dilengkapi kuis untuk menguji kemampuan kalian. semoga bermanfaat ya bagi kalian semua 
Silahkan download programnya disini :

Download Program Aplikasi Bangun Datar Sederhana

Oia masukkan
Password installation : 123456789
username : melajahmatik dan password : melajahmatik
Nich sedikit gambaran tentang program yang akan di download






Semoga bermanfaat ya..jangan lupa kunjungi MelajahMaTIK lagi yach 
Salam Sukses untuk kita semua

Source :  http://melajahmatik.wordpress.com/

HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Menampilkan dan Menghapus Data di VB. Net 2010

Siapkan Form Application pada VB. Net 2010
vb.net 2010
Masukkan Code berikut ini
Public Class Form1
‘—mengisi tindakan pada object Form dengan metode Load
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
‘—mengisi properti pada object Form
Me.Text = “Latihan Menampilkan dan Menghapus Data”
Me.ControlBox = False
Me.BackColor = Color.PeachPuff
Me.StartPosition = FormStartPosition.CenterScreen

‘—mengisi properti pada object Label
Me.LbNim.Text = “No. Induk Mahasiswa”
Me.LbNama.Text = “Nama Lengkap”
Me.LbKelamin.Text = “Jenis Kelamin”
Me.LbAlamat.Text = “Alamat Lengkap”
Me.LbKota.Text = “K o t a”

‘—mengisi tindakan pada objek Button
Me.BtList.Text = “&List”
Me.BtClear.Text = “&Clear”
Me.BtExit.Text = “&Exit”
End Sub
‘—mengisi tindakan pada objek Button list dengan metode Click
Private Sub BtList_Click(sender As System.Object, e As System.EventArgs) Handles BtList.Click
Me.TxtNim.Text = “2011-001″
Me.TxtNama.Text = “Anak Rantau”
Me.TxtKelamin.Text = “Laki-laki”
Me.TxtAlamat.Text = “Jatirasa Barat, Karang Pawitan”
Me.TxtKota.Text = “Karawang”

End Sub
‘—mengisi tindakan pada objek Button Clear
Private Sub BtClear_Click(sender As System.Object, e As System.EventArgs) Handles BtClear.Click
Me.TxtNim.Clear()
Me.TxtNama.Clear()
Me.TxtKelamin.Clear()
Me.TxtAlamat.Clear()
Me.TxtKota.Clear()
Me.TxtNim.Focus()
End Sub
‘—mengisi tindakan pada button Exit
Private Sub BtExit_Click(sender As System.Object, e As System.EventArgs) Handles BtExit.Click
Me.Close()
End Sub
End Class

Save dan coba di loading.., akan tampil seperti ini
vb.net 2010
vb.net 2010
selamat mencoba.
Atau download program disini.

Source :  http://ekosuhartono.blogdetik.com/

HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Contoh Program sederhana Memilih Menu Makan dengan VB.Net 10

Langsung saja di buka Vb.Net 10 kamu,
VB.Net 2010
Pilih di menu Windows Form Application Visual basic
Isi pada kolom Nama, Trus OK
Buat Form seperti tampilan berikut
VB.Net 2010.1
Kodenya seperti ini
VB.Net 2010.2
VB.Net 2010.3
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
ListBox1.Items.Add(”Pagi”)
ListBox1.Items.Add(”Siang”)
ListBox1.Items.Add(”Malam”)
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
CheckedListBox1.Items.Add(”Tiwul”)
CheckedListBox1.Items.Add(”Nasi”)
CheckedListBox1.Items.Add(”Baso”)
Dim pilihan As String
pilihan = “Pilihanya….” + ListBox1.SelectedItem
TextBox1.Text = ListBox1.SelectedItem
MessageBox.Show(pilihan, “Menu saat ini adalah”, MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
End
End Sub
Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
Dim jumlah As Integer
jumlah = CheckedListBox1.CheckedItems.Count
MessageBox.Show(CStr(jumlah), “Pilihan Berjumlah”,
MessageBoxButtons.OK, MessageBoxIcon.Information)
If jumlah = 2 Then
CheckedListBox1.Items.Add(”Cukup”)
End If
End Sub
End Class
Coba di Debug ( Run ), jika benar hasilnya seperti ini


VB.Net 2010.4
Selamat mencoba
Atau download Program Disini.

Source :  http://ekosuhartono.blogdetik.com/

HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Contoh Program Pada QBasic

Contoh Program Pertama
Ketikan coding pada program qbasic seperti Gambar 1.1.
Gambar 1.1
Setelah selesai, running program dengan menekan F5. Jika Nilai Praktikum lebih atau sama dengan 70, maka akan menampilkan output seperti Gambar 1.2.
Gambar 1.2
Lainnya akan menampilkan output seperti Gambar 1.3.
  Gambar 1.3
Contoh Program Kedua
 Ketikan coding pada program qbasic seperti Gambar 2.1.
 Gambar 2.1
Setelah selesai, running program dengan menekan F5. Maka akan menampilkan output seperti Gambar 2.2.
Gambar 2.2
 
Source :  http://trimaaja.blogspot.com/



HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Contoh-Contoh Looping Pada Visual Basic

Tipe 1

Private Sub Command1_Click()
x = Val(Text1)
For i = 1 To x
For j = 1 To i
Print j;
Next j
Print
Next i
End Sub
For i untuk menginput angka 1 sampai x
For j untuk menginput angka 1 sampai i
Jika x = 8 maka Print j akan mencetak angka 1, kemudian Next j akan mencetak angka selanjutnya, setelah itu Next i akan berganti ke angka selanjutnya dan berulang sampai dengan nilai x.

Tipe 2
Private Sub Command2_Click()
x = Val(Text1)
For i = x To 1 Step -1
For j = 1 To i
Print j;
Next j
Print
Next i
End Sub
For i untuk menginput angka x sampai 1 dan selanjutnya dikurang 1
For j untuk menginput angka 1 sampai i
Jika x = 8 maka Print j akan mencetak angka 8, kemudian Next j akan mencetak angka selanjutnya, setelah itu Next i akan berganti ke angka selanjutnya dan berulang sampai dengan angka 1.
Tipe 3
Private Sub Command3_Click()
x = Val(Text1.Text)
For a = 1 To x
For b = 1 To a
Print a;
Next b
Print
Next a
End Sub
For a untuk menginput angka 1 sampai x
For b untuk menginput angka 1 sampai a
Jika x = 8 maka Print a akan mencetak angka 1, kemudian Next b akan mencetak angka selanjutnya sesuai jumlah pada a, setelah itu Next a akan berganti ke angka selanjutnya dan berulang sampai dengan nilai x.

Tipe 4
Private Sub Command4_Click()
x = Val(Text1.Text)
For a = x To 1 Step -1
For b = 1 To a
Print a;
Next b
Print
Next a
End Sub
For a untuk menginput angka x sampai 1 dan selanjutnya dikurang 1
For b untuk menginput angka 1 sampai a
Jika x = 8 maka Print a akan mencetak angka 8, kemudian Next b akan mencetak angka selanjutnya sesuai jumlah pada a, setelah itu Next a akan berganti ke angka selanjutnya dan berulang sampai dengan angka 1.
Tipe 5
Private Sub Command5_Click()
x = Val(Text1.Text)
For i = 1 To x
For j = i To 1 Step -1
Print j;
Next j
Print
Next i
End Sub

For i untuk menginput angka 1 sampai x
For j untuk menginput angka i sampai 1 dan selanjutnya dikurang 1
Jika x = 8 maka Print i akan mencetak angka 1, kemudian Next j akan mencetak angka selanjutnya, setelah itu Next i akan berganti ke angka selanjutnya dan berulang sampai dengan nilai x.
Tipe 6
Private Sub Command6_Click()
x = Val(Text1.Text)
For a = x To 1 Step -1
For b = a To 1 Step -1
Print b;
Next b
Print
Next a
End Sub
For a untuk menginput angka x sampai 1 dan selanjutnya dikurang 1
For b untuk menginput angka a sampai 1 dan selanjutnya dikurang 1
Jika x = 8 maka Print b akan mencetak angka 8, kemudian Next b akan mencetak angka selanjutnya, setelah itu Next a akan berganti ke angka selanjutnya dan berulang sampai dengan angka 1.

Clear
Private Sub Command7_Click()
Form1.Cls
Text1.Text = ""
End Sub
Form1.Cls untuk menghapus seluruh cetakan yang berada di Form1
Text1.Text = "" untuk menghapus input yang berada di Text1
 
Source :  http://trimaaja.blogspot.com/



HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Contoh Program Database Pada Visual Basic

Simpan

Private Sub Command1_Click()
If Text1.Text = Empty Then
Text1.SetFocus
Exit Sub
End If
cari = "npm = '" & Text1.Text & "'"
Data1.Recordset.FindFirst cari
If Data1.Recordset.NoMatch Then
Data1.Recordset.AddNew
Data1.Recordset.nama = Text1.Text
Data1.Recordset.npm = Text2.Text
Data1.Recordset.kelas = Text3.Text
Data1.Recordset.jurusan = Text4.Text
Data1.Recordset.fakultas = Text5.Text
Data1.Recordset.dosen = Text6.Text
Call Command2_Click
Else
MsgBox "NPM SUDAH TERDAFTAR", 0 + 16, "PERINGATAN"
Text1.SetFocus
End If
End Sub
Hapus
Private Sub Command2_Click()
Text1.Text = Clear
Text2.Text = Clear
Text3.Text = Clear
Text4.Text = Clear
Text5.Text = Clear
Text6.Text = Clear
Text1.SetFocus
End Sub
Keluar
Private Sub Command3_Click()
End
End Sub
Simpan
Untuk menyimpan data pada TextBox yang ada di dalam database
Hapus
Untuk menghapus data pada TextBox yang ada di dalam database
Keluar
Untuk keluar dari program 

 
1KA33            : nama file database yang dibuat
Properties        : pilihan untuk membuat table baru pada database
Add                 : untuk menambahkan data pada database
Edit                  : untuk mengubah data pada database
Delete              : untuk menghapus data pada database
Close               : untuk keluar dari database
 
Source :  http://trimaaja.blogspot.com/



HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Contoh Program Simpan Foto Menggunakan Visual Basic 6.0

Karena banyak pertanyaan dari teman-teman tentang bagaimana membuat program menyimpan foto di vb 6, Maka pada pembahasan kali ini saya akan membahas tentang bagaimana cara menampilkan dan menyimpan foto pada folder yang kita buat menggunakan visual basic 6. Untuk menyimpan foto, kita bisa menggunakan database atau tidak, pada program kali ini saya akan membuat program penyimpanan foto langsung ke folder foto yang saya buat, jadi foto tidak disimpan ke dalam database, tapi dalam folder foto yang sudah kita buat sebelumnya.
Sebelum kita mulai membuat programnya, buat dulu folder untuk tempat menyimpan database dan project yang akan kita buat, misalnya Latihan Foto, kemudian dalam folder latihan foto buat lagi folder dengan nama folderfoto untuk menampung foto-toto yang kita simpan nantinya.
Kemudian buat database access dengan nama dblatihan.mdb seperti dibawah ini :
Nama Database : dblatihan
Nama Tabel       : data
 
Field
Data Type
Size
NRP
Text
10
Nama
Text
30
Jurusan
Text
35
Simpan file database kedalam folder latihan foto yang sudah kita buat sebelumnya.
Kemudian buka Microsoft Visual Basic 6.0 dan desain form seperti dibawah ini :
Componen tambahan yang digunakan pada desain form diatas adalah :
- Microsoft ADO Data Control 6.0
- Microsoft Common Dialog Control 6.0
- Microsoft DataGrid Control 6.0
Kemudian ubah properti name pada masing-masing command menjadi seperti ini :
untuk command Simpan = cmdsimpan
- Edit = cmdedit
- Hapus = cmdhapus
- Bersihkan = cmdbersih
- Cari Foto = cmdcari
- Keluar = cmdkeluar
Setelah desain dan edit property sudah selesai, kita buat modul untuk koneksi database nya, lalu ketikkan kode berikut dalam jendela kode modul :
Public conn As New ADODB.Connection
Public RSdata As New ADODB.Recordset

Sub koneksi()
Set conn = New ADODB.Connection
Set RSdata = New ADODB.Recordset
conn.Open "Provider=microsoft.jet.oledb.4.0;data source = " & App.Path & "\dblatihan.mdb"
End Sub
Kemudian pada form activate dan form load ketikkan kode perintah berikut :
Private Sub Form_Activate() ' perintah untuk koneksi database saat form aktif
Call koneksi
Adodc1.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\dblatihan.mdb"
Adodc1.RecordSource = "data"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
End Sub

Private Sub Form_Load() 
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text4.Enabled = False
End Sub
Buat sub Tampilkan data untuk menampilkan data saat pencarian data dilakukan :
Private Sub TampilkanData()
Text2 = RSdata!nama
Text3 = RSdata!jurusan
Text4 = App.Path & "\folderfoto\NRP_" & Text1.Text & ".jpg"
End Sub
Perintah untuk mencari data dengan acuan dari Text1 : 
Function CariData()
    Call koneksi
    RSdata.Open "Select * From data where nrp='" & Text1 & "'", conn
End Function
Perintah untuk mengosongkan text inputan :
Private Sub kosong()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Perintah untuk menyimpan foto ke dalam folderfoto yang sudah kita buat sebelumnya dengan me rename nama foto menjadi kode nrp dari mahasiswa :
Private Sub simpan()
SavePicture Image1.Picture, App.Path & "\folderfoto\NRP_" & Text1.Text & ".jpg"
End Sub

Perintah untuk tombol Cari Foto, untuk mencari dan membuka foto yang dipilih dari drive.
Private Sub cmdcari_Click()
cmndialog.ShowOpen
Text4 = cmndialog.FileName
End Sub
Perintah untuk tombol simpan, untuk menyimpan data pada database dan menyimpan foto kedalam folder.
Private Sub cmdsimpan_Click()
Dim SQLTambah As String
 Call simpan
            SQLTambah = "Insert Into data (nrp,nama,jurusan) values ('" & Text1 & "','" & Text2 & "','" & Text3 & "')"
            conn.Execute SQLTambah
            Form_Activate
End Sub
Perintah untuk tombol edit, untuk mengupdate data yang di edit pada database.
Private Sub cmdedit_Click()
 Dim SQLEdit As String
 Call simpan
            SQLEdit = "Update data Set nama= '" & Text2 & "'," & " jurusan='" & Text3 & "' where nrp='" & Text1 & "'"
            conn.Execute SQLEdit
            Form_Activate
End Sub
Perintah untuk tombol hapus, untk menghapus data2 yang ada pada database.
Private Sub smdhapus_Click()
Adodc1.Recordset.Delete
Adodc1.Recordset.Update
DataGrid1.Refresh
End Sub
Perintah untuk tombol bersih, yang berfungsi untuk membersihkan atau mengosongkan text yang ada pada textbox.
Private Sub cmdbersih_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text1.SetFocus
End Sub
 
Perintah saat text1 kehilangan fokus maka akan langsung melakukan pencarian dengan memamnggil sub caridata dan tampilkandata untuk menampilkan data yang dicari.
Private Sub Text1_LostFocus()
Call CariData
        If Not RSdata.EOF Then
            TampilkanData
            MsgBox "Data Ditemukan"
            Else
            Text2.Text = ""
            Text3.Text = ""
            Text4.Text = ""
            End If
End Sub
Perintah untuk memanggil gambar melalui alamat gambar yang berada pada text4.
Private Sub Text4_Change()
Image1.Picture = LoadPicture(Text4)
End Sub
Jika Semua kode perintah pada masing-masing tool sudah di ketikkan kemudian Simpan Project ke dalam folder latihan foto yang sudah kita buat sebelumnya.,lalu coba jalankan program yang sudah kita buat, dan jika program sukses, hasilnya akan seperti ini :
Oke sampai disini dulu pembahasannya, semoga bermanfaat dan bisa membantu ^_^
 
Source :  http://fadilcrows.blogspot.com/


HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

Monday, July 16, 2012

Program Sederhana menggunakan vb (Visual Basic)

Membuat Program sederhana menggunakan Visual Basic
Program Sederhana menggunakan vb. pada postingan yang lalu saya sudah membahas sedikit tentang vb mulai dari pengertian vb, Tutorial Menggunakan Visual Basic, hingga menjelaskan komponen - komponen apa saja yang ada dan fungsi- fungsi tool yang digunakan untuk membuat sebuah program di visual basic, Bagaimana sudah pahamkah teman- teman ?
Langsung saja dech untuk membuat sebuah program :
Tentunya kita harus memiliki dulu software vb nya kalau belum punya silahkan DOWNLOAD
1. kita harus buka visual basic 6.0terlebih dahulu
2. setelah kita masuk ke form 1 buatlah tampilan seperti gambar di bawah ini :


                       tampilan diatas dibuat menggunakan toolbox terdiri dari beberapa :
           -  2 icon label
           -  1 icon text
           -  3 icon command button dan
           -  2 icon check box



3.  setelah icon tersebut dibuat ubahlah nama icon-icon tersebut menjadi seperti gambar dibawah ini :




4. Untuk mengubah nama pada icon tersebut Caranya dengan  menggunakan jendela properties. seperti pada  gambar dibawah ini,,



5. Setelah  semua icon dibuat kita tinggal memasukkan program di tiap-tiap icon tersebut dengan cara double klik disetiap icon tersebut. Maka tampilan gambarnya akan seperti ini :




6. selesai sudah sekarang tinggal menjalankan program tersebut  akan terlihat seperti gambar dibawah ini.


Selamat Mencoba

Source: http://bayuzu.blogspot.com/2011/04/membuat-program-sederhana-menggunakan.html

HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.