Hello!

I'm new to VB and am trying to create a program to compare three numbers for equality. I'm stuck at the moment. I have three text boxes. Whenever I enter three equal numbers and click the commandbox to calculate, nothing happens. Heres what I have coded so far for the cmdCalculate. Any help is appericiated.

Private Sub cmdCalculate_Click()
Dim intNumI As Variant
Dim intNumII As Variant
Dim intNumIII As Variant

intNumI = Text1
intNumII = Text2
intNumIII = Text3

If (intNumI = intNumII = intNumIII) Then
lblAnswer.Caption = "The numbers are equal"
End If


End Sub