Cara membuat deret pohon angka sederhana dengan menu editor pada Visual Basic 6
Pada kesempatan ini saya akan sharing mengenai cara membuat deret pohon angka melalui menu editor dengan menggunakan Visual Basic disini saya menggunakan VB ver 6. Sebelumnya diharuskan sudah terinstall program Visual Basic-nya. Jika belum terinstall silahkan searching saja sendiri di mbah google, hehe... Karena yang saya punya hanya program portablenya saja, jadi kurang begitu lengkap fitur-fiturnya dan terlalu standar.
Wokey, mari mulai :
1). Buka program aplikasi Visual Basic 6.0
2). Pilih & klik ‘standard.exe’
3). Klik ‘menu editor’ pada menu toolbar atau klik icon pada menu toolbar
4). Isi caption dengan kata “FILE”, lalu isi name dengan “NAMA”
5). Klik tanda panah kekanan , lalu klik “next”
6). Ketikan lagi seperti sebelumnya pada caption isi dengan kata “FILE1”, lalu isi name dengan “NAMA1”
7). Kemudian klik tanda panah lagi sama seperti sebelumnya, lalu klik “next”
8). Ketikan lagi seperti sebelumnya pada caption isi dengan kata “FILE2”, lalu isi name dengan “NAMA2”
9). Setelah itu klik “OK”
10). Pada form1, klik FILE lalu klik lagi FILE1
11). Setelah itu masukkan coding syntax
program :
Private Sub NAMA1_Click()
Private Sub NAMA1_Click()
Form2.Show
End
Sub
12). Setelah itu sama seperti langkah
no.10, tetapi setelah klik FILE lalu
klik FILE2 dan masukkan coding syntax program :
Private Sub NAMA2_Click()
Private Sub NAMA2_Click()
Form3.Show
End Sub13). Setelah itu klik add form pada menu toolbar atau klik icon pada menu toolbar
14). Klik “form”, lalu klik “open” untuk membuka form baru (form2)
15). Lalu membuat label1 dengan caption “DERET” sebagai judul
16). Kemudian membuat text1 untuk memasukkan angka
17). Kemudian membuat commandbutton1 dengan caption “PROSES” untuk memproses angka yang telah diinput
18). Lalu membuat commandbutton2 dengan
caption “CLEAR” untuk menghapus proses data
19). Lalu membuat commandbutton3 dengan caption “END” untuk mengakhiri seluruh proses
20). Klik 2x pada commandbutton1 “PROSES”, lalu masukkan coding syntax program:
19). Lalu membuat commandbutton3 dengan caption “END” untuk mengakhiri seluruh proses
20). Klik 2x pada commandbutton1 “PROSES”, lalu masukkan coding syntax program:
Private
Sub Command1_Click()
N
= Val(Text1.Text)
For
A = 1 To N
For
B = N To A Step -1
Print
B;
Next
B
Print
Next
A
End
Sub
21). Klik 2x pada commandbutton2
“CLEAR”, lalu masukkan coding syntax program:
Private
Sub Command2_Click()
Text1.Text
= Clear
End
Sub
22). Klik 2x pada commandbutton3 “END”,
lalu masukkan coding syntax program:
Private
Sub Command3_Click()
End
End
Sub
23). Setelah itu ikuti kembali langkah no.13 sampai langkah no.19 untuk membuat form baru lagi (form3)
24). Klik 2x pada commandbutton1
“PROSES”, lalu masukkan coding syntax program:
Private
Sub Command1_Click()
N
= Val(Text1.Text)
For
A = 1 To N
For
B = 1 To A
Print
B;
Next
B
Print
Next
A
For
A = N To 1 Step -1
For
B = 1 To A
Print
B;
Next
B
Print
Next
A
End
Sub
25). Untuk coding syntax “CLEAR” dan “END” sama
seperti langkah no.21 dan no.22
26). Setelah itu RUN dengan cara klik icon pada menu toolbar
Gambar dibawah ini merupakan tampilan
dari cara pembuatan diatas sebelum di RUN:
Untuk lebih jelasnya mengenai coding programnya, gambar dibawah ini merupakan tampilan
dari coding program :
Berikut dibawah ini tampilan setelah di RUN :
klik FILE 1 maka akan muncul window 'Form 2'
klik FILE 2 maka akan muncul window 'Form 3'
Fungsi button 'CLEAR' yaitu untuk menghapus data yang telah diinput
0 Response to "Cara membuat deret pohon angka sederhana dengan menu editor pada Visual Basic 6"
Posting Komentar