填空题
在窗体上建立一个单选按钮组Option1和一个图片框Picture1,如图所示。当选择不同的单选按钮时,图片框中填充不同的图案,请填写程序的空白处,使程序完整。
Private Sub Option1_Click(______)
Dim H, W
Picture1.Cis
Picture1.FillStyle=______
W=Picture1.ScaleWidth/2
H=Pieture1.ScaleHeight/2
Pieture1.Circle(W,H), W/2
End Sub
【参考答案】
Index As Integer Index
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
如果在立即窗口中执行以下操作 a=8 b=9 print (a>b); 则输出结果为______。
点击查看答案&解析
填空题
设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integer arr1=Array(12, 435, 76, -24, 78, 54, 866, 43) Min = arr1(l)’ For i=2 To 8 If arr1(i) < Min Then Next i Print 最小值是: ; Min End Sub
点击查看答案&解析
相关试题
执行下列程序段后,整型变量n的值为( )...
下列关于多重窗体程序的叙述中,错误的是(...
下列能判断是否到达文件尾的函数是( )。
下列语句用于打开一个顺序文件Open C: M...
下列工具中为需求分析常用工具的是( )。