Postingan

Menampilkan postingan dari April, 2020

Membuat Program Sederhana Do While-Loop pada Visual Basic 6

Gambar
Pada postingan kali ini, Saya akan membahas tentang pembuatan program sederhana denga menggunakan kondisi Kontrol Perulangan Do While-Loop. pada VB dengan output bilangan asli namun angka 5 tidak akan dicetak pada output, Disini saya menggunakaan program Visual Basic 6.0. Langkah Pembuatan Program : 1. Buka aplikasi Visual Basic 6.0, Klik Standard EXE. 2. Mendesain Form menggunakan  3 Label, 1 TextBox, 3 CommandButton, 1 ListBox. dengan format seperti dibawah ini. 3. Untuk Pembuatan kode program , berikut kode yang terdapat pada program tersebut. Private Sub Command1_Click() Dim awal As Integer Dim akhir As Integer awal = 1 akhir = Val(Text1.Text) Do If (awal <> 5) Then    List1.AddItem (awal) End If awal = awal + 1 Loop While awal <= akhir End Sub Private Sub Command2_Click() Text1.Text = "" List1.Clear End Sub Private Sub Command3_Click() If MsgBox("Anda Yakin?", vbYesNo, "EXIT") = vbYes Then End

Program Sederhana " Tabel Perkalian " Menggunakan Perintah Perulangan " While- Wend" dengan Vb 6.0

Gambar
Langkah - Langkah Pembuatan Program : 1. buka visual basic 6.0, pilih standard EXE kemudian klik open  akan muncul tampilan form lalu  Buat 1 label, 1  Listbox, 1 Textbox dan 2  commandbutton seperti dibawah ini.    2.  Aturlah property label , listbox, textbox dan commandbutton seperti dibawah ini. 3.Lalu untuk pembuatan kode program,double klik command button isi kode program seperti dibawah ini. Option Explicit Dim q As Integer Private Sub Command1_Click() q = 1 While q <= 10 List1.AddItem (q & "x" & Text1.Text & "=" & q * Text1.Text) q = q + 1 Wend    End Sub Private Sub Command2_Click() Text1.Text = "" List1.Clear 5. Untuk tampilan lain seperti font, back color dan lainnya dapat disesuaikan lewat menu yang ada di properties. sesuaikan posisi  ListBox dan juga coomand button. 6. Setelah itu untuk menjalankan program klik f5 pada keyboard.

Membuat Program Sederhana dengan kondisi percabangan Select-Case vb 6.0

Gambar
Pada postingan kali ini, Saya akan membahas tentang pembuatan program sederhana dengan menggunakan kondisi percabangan Select-Case. Disini saya menggunakan program Visual Basic 6.0,  Saya akan membuat Program untuk Melihat Hadiah yang diterima sesuai dengan Jumlah Point Reward yang diterima. Lets get started!! Langkah Pembuatan Program Buka Visual Basic 6.0 klik Standard-Exe,Open Maka akan muncul tampilan seperti Ini  Aturlah Pengaturan Properties dengan menambahkan 3 label, 2 textbox, dan 3 CommonButton .Ganti Caption pada masing masing Label, Commandbutton dan  Textbox untuk textbox, text nya dikosongkan sajaSeperti dibawah ini Membuat Kode Program, Double Click pada Button Proses dan masukkan coding seperti dibawah ini,begitu juga pada Button bersih dan Button tutup. Untuk mempercantik tampilan program, kalian bisa mendesain latar warna pada backcolor, gaya tulisan dan ukuran tulisan pada font yang telah tersedia di kolom propert