Displaying odd/even numbers in label.caption

[jonkillua]

hi guys,

i'm creating a program that instead of using the print method to display the odd/even numbers, i want to display the result in label.caption. Im crazy about it, please help me.

Private Sub cmdEven_Click()
    Dim x As Integer
    Dim intReturn As Integer
    If txtNum = "" Then
        intReturn = MsgBox("enter a number!",  vbExclamation + vbOKOnly)
    End If
    x = Val(txtNum.Text)
    For x = 0 To x Step 2
    'Print x
    lblOutput.Caption = x & Space$(2)
    Next
 
End Sub
 
Private Sub cmdOdd_Click()
    Dim x As Integer
    Dim intReturn As Integer
    If txtNum = "" Then
        intReturn = MsgBox("enter a number!",  vbExclamation + vbOKOnly)
    End If
    x = Val(txtNum.Text)
    For x = 1 To x Step 2
    'Print x
    lblOutput.Caption = x & Space$(2)
    Next
 
End Sub

[Guido Geurs]

You want all the odd or even number from 0 to TxtNum ?
In the loop You have to store the results in a string or Label.caption like:

lblOutput.Caption = ""
For x = 1 To x Step 2 
    lblOutput.Caption = lblOutput.Caption & x & Space$(2) 
Next