Postada em 19/08/2009 18:47 hs
Srs. segue uma rotina simples, mas quando coloco valores Text1 = 12,24
e Text2 = 2 o resultado fica Text3 = 24 como faço pro resultado ser: 24,48?
Private Sub Command1_Click()
Dim valor10 As Single
Dim valor11 As Single
valor10 = Val(Text1.Text)
valor11 = Val(Text2.Text)
Text3.Text = valor10 * valor11
End Sub
|
