Private Sub Frame1_DragDrop(Source As Control, x As Single, y As Single)
Dim x As Single, y As Single
x = 2:
y = Sqr(Abs(5 * Sin(x) - 3 * Cos(x))) + Exp(2 * x)
End Sub
怎么启动不了这个程序?菜鸟在这求解,谢谢
Private Sub Frame1_DragDrop(Source As Control, x As Single, y As Single)
Dim x1 As Single, y1 As Single
x1 = 2:
y1= Sqr(Abs(5 * Sin(x) - 3 * Cos(x))) + Exp(2 * x)
End Sub
怎么启动不了这个程序?菜鸟在这求解,谢谢