(1)在名称为Form1的窗体上添加三个单选按钮,其名称分别为Option1、Option2和Option3(如图1所示),然后通过属性窗口设置窗体和单选按钮的属性,实现如下功能: ①窗体标题为“设置单选按钮属性”; ②三个单选按钮的标题分

admin2017-07-28  26

问题 (1)在名称为Form1的窗体上添加三个单选按钮,其名称分别为Option1、Option2和Option3(如图1所示),然后通过属性窗口设置窗体和单选按钮的属性,实现如下功能:
    ①窗体标题为“设置单选按钮属性”;
    ②三个单选按钮的标题分别为“按钮1”、“按钮2”和“按钮3”;
    ③初始状态为,第一个单选按钮为“选中”;
    ④程序运行后,第二个单选按钮“不可用”;
    ⑤程序运行后,第三个单选按钮不可见。
    程序的运行情况如图2所示。

    要求:不编写任何代码。
    注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为Sjtl.frm。
    (2)在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性:
    Max=窗体高度
    Min=0
    LargeChange=50
    SmallChange=10
    如果移动垂直滚动条的滚动框,则在窗体上显示滚动框的刻度值。
    程序的运行情况如图所示。

    要求:不得使用任何变量。
    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。

选项

答案(1)步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表1和表2。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3。 [*] 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() VScroll1.Max=Form1.Height VScroll1.Min=0 VScroll1.LargeChange=50 VScroll1.SmallChange=10 End Sub Private Sub VScroll1_Change() Print VScroll1.Value End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析 (1)单选按钮的Value属性用于设置或返回每个单选按钮的选中状态:值为False表示未选,为True表示选中,其Caption属性用来设置或返回单选按钮的标题内容。Enabled属性用于设置用在程序运行时是否有效,值为True表示有效,值为False表示无效并显示为灰色。Visible属性用于设置在运行时是否可见,值为True表示可见,值为False表示不可见。
    (2)根据题意,在命令按钮的单击事件过程中用代码动态设置垂直滚动条的属性,并且在垂直滚动条的Change事件过程中,用Print方法将垂直滚动条滑块位置的Value属性值输出到窗体上。
转载请注明原文地址:https://kaotiyun.com/show/lCGp777K
0

最新回复(0)