Zamislite sledeci kod
Code:
Private Sub Command1_Click()
Dim Ugao As Double
Dim sinusU As Double
Ugao = 90
sinusU =Sin(Ugao)
Text1.Text = sinusU
End Sub
Private Sub Command1_Click()
Dim Ugao As Double
Dim sinusU As Double
Ugao = 90
sinusU =Sin(Ugao)
Text1.Text = sinusU
End Sub
i sad kao rezultat u text boxu dobijem da je sinus ugla od 90 stepeni jednak 0.893996663600558 ,
a isti kod samo kada umjesto Sin(Ugao) , zamjenim sa Cos(Ugao) daje rezultat -0.44807361612917.
Da li je ovo neka neslana sala nekog virusa ili nesto drugo..... ?