(1)在名称为Forml的窗体上绘制一个标签和两个单选按钮。标签的名称为Labell,初始时内容为空。单选按钮的名称分别为Optionl、Option2,标题分别为“Iternl”和“Item2”。编写适当的事件过程,使得程序运行时Optionl按钮被选中

admin2009-03-26  29

问题 (1)在名称为Forml的窗体上绘制一个标签和两个单选按钮。标签的名称为Labell,初始时内容为空。单选按钮的名称分别为Optionl、Option2,标题分别为“Iternl”和“Item2”。编写适当的事件过程,使得程序运行时Optionl按钮被选中,标签中显示“选中Iternl”,如图24—1所示。如果单击Option2按钮,标签中显示的内容为“选中Item2"。程序中不得使用任何变量。
    注意:保存时必须存放在考生文件夹下,窗体文件名为sjl.frm,工程文件名为sjl.Vbp。
    (2)在名称为FOrml的窗体上,绘制一个形状控件和一个命令按钮。形状控件为圆形,名称为Shapel。命令按钮为Commandl,标题为“变正方形”。编写适当的事件过程,使得程序运行时,单击命令按钮,圆形将隐藏起来,显示正方形。程序中不得使用任何变量。程序运行时的窗体界面如图24—2所示。

    注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。

选项

答案 (1)根据题意,新建“标准EXE”工程,将一个标签和两个单选按钮控件添加到窗体中,标签的名称为Labell、Caption属性为空,单选按钮的名称分别为Optionl和Option2、Caption属性分别为“Iteml”和“Item2”。双击窗体进入代码窗口,编写如下代码: Private Sub Form_Load() ’初始化 Labell.Caption="选中"+Optionl.Caption End Sub Private Sub Optionl_Click() ’选中Iteml Labell.Caption="选中"+Optionl.Caption End Sub Private Sub Option2_Click() ’选中Item2 Labell.Caption=”选中”+Option2.Caption End Sub 单击[*]按钮运行程序,并按要求保存。 (2)根据题意,新建“标准EXE”工程,将一个命令按钮和一个Shape控件添加到窗体中,命令按钮的名称为Commandl、Caption属性为“变正方形”,Shape的名称为Shapel、Shape属性为3。双击Commandl进入代码窗口,编写如下代码: Private Sub Commandl_Click() Shapel.Shape=1 ’单击变正方形,Shapel变为正方形 End Sub 单击[*]按钮运行程序,并按要求保存。

解析
转载请注明原文地址:https://kaotiyun.com/show/TV1p777K
0

最新回复(0)