在窗体上建立一个单选钮组Option1和一个图片框Picture1,如下图所示。当选择不同的单选钮时,图片框中填充不同的图案,请填写程序的空白处,使程序完整。 Private Sub Option1_Click(______) Dim H,

admin2010-09-11  38

问题 在窗体上建立一个单选钮组Option1和一个图片框Picture1,如下图所示。当选择不同的单选钮时,图片框中填充不同的图案,请填写程序的空白处,使程序完整。

   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

解析 控件数组中的元素同享一个事件过程,过程有一个下标参数Index,用来区别数组中的不同控件,题目中单选钮是控件数组。因此,它的Click事件过程带有参数Index的定义(Index As Integer)。题目中要求根据选择不同的单选钮,来设置图片框的填充图案,图片框中的图案样式可以修改FillStyle属性值来实现,FillStyle的取值范围为0~7,题目中用了7个单选钮来表示每种图片框绘图的样式,因此第2个空应填写Index参数。
转载请注明原文地址:https://jikaoti.com/ti/Elg0FFFM
0

最新回复(0)