Problema de programación VB: definir un sistema de coordenadas y dibujar una parábola en el sistema de coordenadas
Private Sub Form_Click()
Atenuar x como entero
Atenuar y como entero
Me.Scale (-20, 20) -(20, -20)
Me.Line (-20, 0)-(20, 0)
Me.Line (0, 20)-(0, -20) )
Me.CurrentX = -4
Me.CurrentY = 16
Para x = -4 A 4
y = x * x
Me.Line -(x, y)
Siguiente
End Sub
Esto es probablemente lo que significa. . .