Bit Of Maths

[phlite]

Need a bit of help.

A user enters some information into a textbox, in a format eg. 10*21. I want it so that when a user clicks Command1 or whatever, it works out the maths and places it in another textbox.
Eg.

Private Sub Command1_Click
Dim math As String
math = Form1.Text1.Text
'what go-
'es here?
End Sub

Any ideas?

Regards,
Phil

[crptcblade]

Dim nums as Variant

Private Sub Command1_Click()
if InStr(1,Text1.Text,"*") Then
   nums = Split(Text1.Text,"*")
   Text2.Text = nums(0) * nums(1)
Endif
End Sub

Be sure to add elseif's in there if you want to check for other operators

[makai]

http://pub13.ezboard.com/fvisualbasi...picID=44.topic