VISUAL BASIC 6 - TUTORIAL FOR NEWBIE (COMBO BOX)

Hi... Now You at Site WE ARE KNOWLEDGE... Having Knowledge in here and you can take with free..... Let's do Read it...

VB 6 is program language based desktop programming likely pascal, c++ and cobol, but in using vb 6 more easely, because in VB 6 you just click toolbox, and to appear value from your click...

now, I want giving you knowledge about IF. using if in VB 6 likely using IF in other program language.. so you can more easely to learn this..

First open VISUAL BASIC 6 program... you can double click on you shortcut of VB 6 or right click on your shortcut vb 6 and choice open... wait and your aplication want openning..

And make like this
You can use facility "TOOLBOX". you can making like this or change of position of toolbox..because, to result still same..

You can change name in PROPERTIES "CAPTOIN" for button, "LABEL" for labeland "NAME" for text.

Then you must input program code with method :

click menu view >> code..

OR

Double Click in text1, text 2 or command1...

And you can COPY This program and PASTE in CODE..

Private Sub Combo1_Click()

If Combo1 = "PC" Then

Text1.Text = "6500"

End If

If Combo1 = "NETBOOK" Then

Text1.Text = "5500"

End If

If Combo1 = "NOTEBOOK" Then

Text1.Text = "4500"

End If

Text2.SetFocus

End Sub

Private Sub Command1_Click()

Text3.Text = Val(Text1.Text) * Val(Text2.Text)

End Sub

Private Sub Form_Load()

Combo1.AddItem "PC"

Combo1.AddItem "NETBOOK"

Combo1.AddItem "NOTEBOKK"

End Sub

Look On in Code of Private sub Form_Load()...!!

That for input to "COMBO BOX".. and you must click and That item want to appear..

And if done..

you can execution this program...

Why text3 be $22000, because price netbook is 5500 and you quality is 4..

5500 * 4 = 22000...

Ok just it..

Thanks For you...

If you like this, please bookmark this page or click knop "LIKE"...

don't forget to came back in my site...

see you later friends..