Re: [Programmer-VB] Cos 60

[jonner]

Mungkin ini bisa membantu anda,


Private Sub Command1_Click()
hasil = Text1.Text * Cos(Text2.Text * (3.1415926 / 180))
Text3.Text = FormatNumber(hasil, 2)
End Sub