Keskustelu: Ohjelmointikysymykset: VB6: miten on mahdollista? *vb*

kun pistän textboxit ja pistän sinne sin, tan ja cos, niin se ei näytä oikeita tuloksia ees:

Private Sub Command1_Click()
MsgBox "Luvun sini on " & Sin(Text1)

End Sub

Private Sub Command2_Click()
MsgBox "Luvun cosini on " & Cos(Text1)
End Sub

Private Sub Command3_Click()
MsgBox "Luvun tangetti on " & Tan(Text1)
End Sub

Private Sub Form_Load()

End Sub

jos ootte yhtää opiskellu trigonometriaa ni pitäis kai tietää et tan(45) on 1. et olisko ideoita?

kelaa F1 nappi on.

lainaus:

To convert degrees to radians, multiply degrees by pi/180. To convert radians to degrees, multiply radians by 180/pi.

siin on varmaan vastaus... :P

Eikös tuo pitäisi tehdä esim. näin:

Private Sub Command1_click()
luku=Val(Text1.text)  'muutetaan teksti kokonaisluvuksi
vastaus=Sin(luku)
msgbox "Luvun sini on " & vastaus
End sub

Ja tämä viesti kuuluisi VB:n alueelle, ei yleiseen keskusteluun.

Tämä aihe olisi kannattanut laittaa varmaan tuonne vb:n omaan alueeseen!

Nyt on oikealla alueella. Ja soodan vastaus pitää paikkansa - VB:n trigonometrisille funktioille täytyy antaa kulmat radiaaneina eikä asteina.