用pest方法在窗体上画200个随机彩色点，点的大小在单位3～6之间变化

急需，后天就叫作业了，谢谢！！！！！！！！！！... 急需，后天就叫作业了，谢谢！！！！！！！！！！展开

 我来答

1个回答

#合辑# 面试问优缺点怎么回答最加分？

百度网友4b636fa
2009-06-22 · TA获得超过1237个赞

知道小有建树答主

回答量：866

采纳率：100%

帮助的人：1403万

我也去答题访问个人页

关注

展开全部

Private Sub Command1_Click()
  Dim I As Long, Se As Long, X As Single, Y As Single
  Me.Cls: Me.AutoRedraw = True
  For I = 1 To 200
     Randomize
     Se = Rnd * &HFFFFFF
     X = Rnd * Me.ScaleWidth
     Y = Rnd * Me.ScaleHeight
     Me.DrawWidth = 3 + Int(Rnd * 7)
     Me.PSet (X, Y), Se
  Next
End Sub


本回答被网友采纳






已赞过已踩过<

你对这个回答的评价是？
评论收起

ZESTRON
2024-09-04 广告

在Dr. O.K. Wack Chemie GmbH，我们高度重视ZESTRON的表界面分析技术。该技术通过深入研究材料表面与界面的性质，为提升产品质量与可靠性提供了有力支持。ZESTRON的表界面分析不仅涵盖了相变化、化学反应、吸附与解吸... 点击进入详情页

本回答由ZESTRON提供

推荐律师服务：若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询

用pest方法在窗体上画200个随机彩色点，点的大小在单位3～6之间变化

为你推荐：