vb程序错误提示 “必选参数”,哪里出错了,求解啊!!

发布网友 发布时间：2024-12-23 06:00

我来回答

共2个回答

热心网友 时间：5分钟前

Picture1.PSet (x, y), RGB(0, 255, 0)
Picture1.PSet (x, -y), RGB(0.255, 0) ，这一行出错了，把RGB中的第一零后面的点改行逗号就行了.

热心网友 时间：7分钟前

Private Sub Command1_Click()
Dim x As Single, y As Single
Picture1.Circle (0, 0), 80, RGB(255, 0, 0)
Picture1.FillStyle = 0: Picture1.FillColor = vbYellow
Picture1.Circle (Picture1.ScaleLeft + Picture1.ScaleWidth / 2, Picture1.ScaleTop + Picture1.ScaleHeight / 2), 40, RGB(0, 0, 255)
Picture1.FillColor = vbGreen
For x = -60 To 60 Step 0.01
y = Sqr(3600 - x * x)
Picture1.PSet (x, y), RGB(0, 255, 0)
Picture1.PSet (x, -y), RGB(0, 255, 0)
Next x
End Sub
Private Sub Form_Load()
Picture1.Width = Picture1.Height
Picture1.Scale (-100, 100)-(100, -100)
End Sub

不知道你是不是要这个效果？