[求助]再问一下
Private Sub Form_Click()Dim x As Integer, y As Integer, z As Integer
For x = -45 To 45
For j = -45 To 45
For z = -45 To 45
If x ^ 2 + y ^ 2 + z ^ 2 = 2000 Then
Print "x=" + Str(x) + "y=" + Str(y) + "z=" + Str(z)
End If
Next z, j, x
End Sub
为什么只有出现两种情况,还重复出现??
