How to declare 1 digit only for visual basic 6.0?

[lloydi12345]

Hi, this is my source code

Const pi = 3.14159265
Dim Answer As Double

Private Sub Command1_Click()
converter = pi / 180
Answer = Cos(Text1.Text * converter)
Text2.Text = Answer
End Sub


I am having an answer of 1.79489651491878E-09

but what can i add on my command to have only 0 as the answer?

[vb5prgrmr]

Hmmm... Round, Format, FormatNumber, text1.text = 0, If Answer < 0 Then text1.text = 0...

But it would help if we knew the value in text1.text...



Good Luck

[lloydi12345]

Hmmm... Round, Format, FormatNumber, text1.text = 0, If Answer < 0 Then text1.text = 0...

But it would help if we knew the value in text1.text...



Good Luck

hello sir i chose round, very great!! you're the best cheers