VB关于PSet，用的时候老说我无效的过称调用或函数。。。求高手解答。。
PrivateSubForm_Click()Dimi%,x%,y%RandomizeDrawWidth=(Rnd*3+3)Fori=1To200用的时候老说我无效的过称调...
Private Sub Form_Click()
Dim i%, x%, y%
Randomize
DrawWidth = (Rnd * 3 + 3)
For i = 1 To 200
用的时候老说我无效的过称调用或函数。。。求高手解答。。
PSet (Rnd * 5000, Rnd * 5000), QBColor(Rnd * 16)
Next i
End Sub 展开
Dim i%, x%, y%
Randomize
DrawWidth = (Rnd * 3 + 3)
For i = 1 To 200
用的时候老说我无效的过称调用或函数。。。求高手解答。。
PSet (Rnd * 5000, Rnd * 5000), QBColor(Rnd * 16)
Next i
End Sub 展开
2个回答
展开全部
改下
PSet (Rnd * 5000, Rnd * 5000), QBColor(int(Rnd * 16))
加个int函数
PSet (Rnd * 5000, Rnd * 5000), QBColor(int(Rnd * 16))
加个int函数
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
