帮我设计一个最最简单的和圆形有关的程序好吗

我是初中的,刚学VB.我需要一个最简单的程序,包含与圆形有关的内容!弄些好看的圆形(会动的更好啦)

热心网友

随机画圆,相当会动!注意窗体上还需添加Command和 Picture控件Private Sub Form_Load()Command1。Caption = "随机画圆"Form1。ScaleMode = 1Picture1。ScaleMode = 1End SubPrivate Sub Command1_Click()Dim XPos, YPos Picture1。Cls Do nn = Int(100 * Rnd) If nn 0 Then Picture1。DrawWidth = nn End If XPos = Rnd * Picture1。ScaleWidth YPos = Rnd * Picture1。ScaleHeightPicture1。PSet (XPos, YPos), RGB(Rnd * 256, Rnd * 256, Rnd * 256) DoEvents LoopEnd Sub有问题联系我! 。

热心网友

你想干什么呀，在窗体上绘制一个Shape空间，从里面选择形状为圆形，最简单了吧？