Senin, 02 Januari 2017



Membuat DOwhile,Fornext and text box di Visual basic
   


1.     For Next
 
   Buatlah 1 textbox dan 1 commandprom . 

-         Textbox 1 dikosongkan namanya

-         Command diganti captionya menjadi proses



Coding

-          For A = Text1.text To 1 Step -1” =  memasukan angka yang bersifat integer dan 1 step -1 untuk melangkahi angka sebnayak -1 yang nanti apabila di ketik 5 outputnya menjadi (5,4,3,2,1)

-          Print a = untuk mencetak hasil output ketika di proses

























2.     Do while dan DO until


Buatlah 1 textbox , 1 list dan 2 commandprom . 

-          Textbox 1 dikosongkan namanya

-          List 1 dibiarkan

-          Command1 diganti captionya menjadi DO while

-          Command2 diganti captionya menjadi DO until













CODING  Do Until

-          List1.Clear unutk membersihkan list

-          X = 1 akan mencari nilai dengan angka yang di masukan di text1.text

-          Do Until X >= Val(Text1.Text) ini dimaksudkanakan ketenteuan “X>=Val ”yaitu nilai yang lebihsama dengan angka yang dimasukan di text1.text

-          List1.Additem (x) untuk menambahkan item x

-          X = X + 1 nilai x akan di tambah 1 dan akan di masukan di list box

-          Loop   untuk mengulang variable x yang di isi di tetx box unutk menghasilkan output di list box .



    Coding Do while



-          List1.Clear unutk membersihkan list

-          X = 1 akan mencari nilai dengan angka yang di masukan di text1.text

-          Do While X <= Val(Text1.Text) ”yaitu nilai yang kurang sama dengan angka yang dimasukan di text1.text

-          List1.Additem (x) untuk menambahkan item x

-          X = X + 1 nilai x akan di tambah 1 dan akan di masukan di list box

-          Loop  untuk mengulang variable x yang di isi di tetx box unutk menghasiilkan output di list box .yang hanya bias perulangan sampi 1 kalli doing



3.     Combo Box





Buatlah 1combobox dengan toolbox dan 1 listbox



Coding

-          Private sub combp diganti “ Combo_Click” ( ) maksdunya agar combo1 tidak terjadi perubahan

-          List1.additem Combo1.text dimaksudnya untuk memilih item yang akan muncul di list box

-          “Private sub Fora



















































0 komentar:

Posting Komentar