填空题
在窗体上建立一个单选按钮组Option1和一个图片框Picture 1,如图所示。当选择不同的单选按钮时,图片框中填充不同的图案,请填写程序的空白处,使程序完整。
Private Sub Option1_Click(______)
Dim H.W
Picture1.Cls
Picture1.FillStyle=______
W=Picture1.ScaleWidth/2
H=Picture1.ScaleHeight/2
Picture1.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(1) For i=2 To 8 If arr1(i)<Min Then______ Next i Print 最小值是: ; Min End Sub
点击查看答案&解析
相关试题
下列事件过程的功能是:建立一个名为Datal...