comatose can u help me about this i have only 1 textbox and 2 command button
this is my code in command1 button
Private Sub Command1_Click()
Dim x, n
n = Val(Text1.Text)
For x = 1 To n
Print x
Next x
command1.enabled = false
End Sub
the output of my command1 is for example i inputted a value of 3 in my textbox the output should come w/ this
1
2
3
this is the code in my 2nd button
Private Sub Command2_Click()
Dim x, n
n = Val(Text1.Text)
For x = n + 1 To n * 2
Print x
Next x
End Sub
the output of this is
4
5
6
if i click once again in my 2nd command button the answer is still 456 i want is like this if i click once again my second command button the answer should like this
7
8
9
if i click again
10
11
12
until he reach in 100.
Last edited by Ancient Dragon; Jan 5th, 2009 at 3:23 pm. Reason: add code tags