프레임 안에 삼각함수 그래프가 그려지도록 짜는건데요 일단 사인까지는 알겠는데 코사 탄을 모르겠다능 ㅜ

프레임 하나 안에
픽쳐박스 하나와 그 밑에 커맨드 버튼들이 있는데

Private Sub Command2_Click()

Dim x, y As Single
Const pi = 3.141
Picture1.ScaleMode = 3
For x = 0.0001 To 500
y = 20 * Sin(pi * x / 20)
Picture1.PSet (x, 70 + y)
Next x

End Sub

요거시 사인 그리는 커맨드버튼 2

코사와 탄 코드는 어떻게 짜야되나요 ㅜ 커맨드3,4로 좀 알려주삼요 ㅜ


 

저 윗 코드중에


 

y = 20 * Sin(pi * x / 20)
여기서 사인부분을 Cos, Tan 으로 바꿔주면 되는거임??