24-11-14, 01:07 AM
Private Sub Command1_Click()
'If Text1.Text < 50 Then
'If Text2.Text < 50 Then
'Text5.Text = Text3.Text * Text4.Text
'Else
'Text5.Text = Text2.Text * Text4.Text
'End If
'Else
'Text5.Text = Text1.Text * Text4.Text
'End If
If Text1.Text >= 50 Then
Text5.Text = Text1.Text * Text4.Text
ElseIf Text2.Text >= 50 Then
Text5.Text = Text2.Text * Text4.Text
Else
Text5.Text = Text3.Text * Text4.Text
End If
End Sub
'If Text1.Text < 50 Then
'If Text2.Text < 50 Then
'Text5.Text = Text3.Text * Text4.Text
'Else
'Text5.Text = Text2.Text * Text4.Text
'End If
'Else
'Text5.Text = Text1.Text * Text4.Text
'End If
If Text1.Text >= 50 Then
Text5.Text = Text1.Text * Text4.Text
ElseIf Text2.Text >= 50 Then
Text5.Text = Text2.Text * Text4.Text
Else
Text5.Text = Text3.Text * Text4.Text
End If
End Sub
