[Help me plzz] - Computers

Search Tech-Forums - link takes you to our Forum's search page.

Note: The following is only a text archive!

To view the actual forum discussion, please visit our website at http://www.tech-forums.net

Pages:1

Help me plzz
(Click here to view the original thread with full colors/images)

Posted by: Ajwad

Private Sub Command1_Click()
Dim no As Integer

No = Val(Text1.Text)
Picture1.Cls
Picture1.Print no^2
End Sub

can any one tell me the function of this by line

Private Sub Command1_Click() - ???
Dim no As Integer - ???
No = Val(Text1.Text) - ???
Picture1.Cls - ???
Picture1.Print no^2 - ???
End Sub - ??

Posted by: Insomniac

If im reading it correctly its VB to start and this is what happens when command1 gets clicked by the user.

Dim no As Integer creates an integer value called no

No = Val(Text1.Text) shouldnt actually work unless there is a variable declared elsewhere called No, if it were no however it was said it to the value of whatever is in text1 (a textbox) and in case its non number it is type cast to a number

picture1.Cls - clears picture one

picture1.Print no^2 rights the value of the user entered number to the power of 2 on the picture

end sub ends the little routine so anything after the line is not part of what happens when command 1 is clicked

Posted by: Ajwad

thanks man!!