In lesson 2, you have learned how to enter the
program code and run the sample VB programs but without much understanding
about the logics of VB programming. Now, let’s get down to learning some basic
rules about writing the VB program code.
Each
control or object in VB can usually run many kinds of events or procedures;
these events are listed in the dropdown list in the code window that is displayed when you double-click on an
object and click on the procedures’ box(refer to Figure 2.3). Among the events
are loading a form, clicking of a command button, pressing a key on the
keyboard or dragging an object and more. For each event, you need to write an
event procedure so that it can perform
an action or a series of actions
To start writing an event procedure, you need
to double-click an object. For example, if you want to write an event procedure
when a user clicks a command button,
you double-click on the command button and an event procedure will appear as
shown in Figure 2.1. It takes the following format:
Private Sub Command1_Click
(Key in your program code here)
End Sub
You then need to key-in the procedure in the
space between Private Sub Command1_Click............. End Sub. Sub actually stands for sub procedure that
made up a part of all the procedures in a program. The program code is made up
of a number of statements that set certain properties or trigger some actions.
The syntax of Visual Basic’s program code is almost like the normal English
language though not exactly the same, so it is very easy to learn.
he syntax to set the property of an object or
to pass certain value to it is :
Object.Property
where Object and Property is separated by a
period (or dot). For example, the statement Form1.Show means to show the form
with the name Form1, Iabel1.Visible=true means label1 is set to be visible,
Text1.text=”VB” is to assign the text VB to the text box with the name Text1,
Text2.text=100 is to pass a value of 100 to the text box with the name text2,
Timer1.Enabled=False is to disable the timer with the name Timer1 and so on.
Let’s examine a few examples below:
Example 4.1
Private Sub Command1_click
Label1.Visible=false
Label2.Visible=True
Text1.Text=”You are
correct!”
End sub
|
|
Example 4.2
Private Sub Command1_click
Label1.Caption=” Welcome”
Image1.visible=true
End sub
|
Example 4.3
Private Sub Command1_click
Pictuire1.Show=true
Timer1.Enabled=True
Lable1.Caption=”Start
Counting
End sub
|
In Example 4.1, clicking on the command button will make label1
become invisible and label2 become visible; and the text” You are correct” will
appear in TextBox1. In example 4.2, clicking on the command button will
make the caption label1 change to “Welcome” and Image1 will become
visible. In example 4.3 , clicking on the command button will make
Picture1 show up, timer starts running and the caption of label1 change to
“Start Counting”.
Syntaxes that do not involve setting of properties are
also English-like, some of the commands are Print,
If…Then….Else….End If, For…Next, Select Case…..End Select , End and Exit
Sub. For
example, Print
“ Visual Basic” is to
display the text Visual Basic on screen and End is to end the program. Other commands will be explained in
details in the coming lessons.
Program code that involve calculations is very easy to write,
you need to write them almost like you do in mathematics. However, in order to
write an event procedure that involves calculations, you need to know the basic
arithmetic operators in VB as they are not exactly the same as the normal
operators we use, except for + and - . For multiplication, we use *, for
division we use /, for
raising a number x to the power of n, we use x ^n and for square root, we use Sqr(x). VB offers many more advanced mathematical functions such as Sin, Cos,
Tan and Log, they
will be discussed in lesson 10. There are also two important functions that are
related to arithmetic operations, i.e. the functions Val and Str$ where
Val is to convert text entered into a textbox to numerical value and Str$ is to
display a numerical value in a textbox as a string (text). While the
function Str$ is as important as VB can display a numeric values as string
implicitly, failure to use Val will results in wrong calculation. Let’s examine
example 4.4 and example 4.5.
Example 4.4
Private Sub Form_Activate()
Text3.text=text1.text+text2.text
End Sub
|
Example 4.5
Private Sub Form_Activate()
Text3.text=val(text1.text)+val(text2.text)
End Sub
|
When you run the program in example 4.4 and enter 12 in textbox1
and 3 in textbox2 will give you a result of 123, which is wrong. It is because
VB treat the numbers as string and so it just joins up the two strings. On the
other hand, running exampled 4.5 will give you the correct result, i.e., 15.