请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上建立一个如下表所示的下拉菜单,其中“设置”菜单项为灰色(不可用),如图3—137所示。 注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1

admin2019-05-28  27

问题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个如下表所示的下拉菜单,其中“设置”菜单项为灰色(不可用),如图3—137所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。

(2)在名称为Form1的窗体上画一个名称为Hscroll1的水平滚动条,其最大刻度为100,最小刻度为0;再画两个单选按钮,名称分别为Option1、Option2,标题分别为“最大值”、“最小值”,且都未选中。再通过属性窗口设置适当属性使得程序刚运行时,焦点在滚动条上(如图3—138所示)。
请编写适当的事件过程,使得程序运行时,单击“最大值”单选按钮,则滚动条上的滚动框移到最右端;单击“最小值”单选按钮,则滚动框移到最左端。
注意:程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sji2.frm。

选项

答案第1小题 步骤1:新建一个“标准EXE”工程,利用菜单设计器按表4—81在窗体上建立一个二级菜单。 [*] 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:新建一个“标准:EXE”工程,按表4—82在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写两个单选按钮的单击事件过程。 参考代码: Private Sub Option1_Click() HScroll1.Value=100 End Sub Private Sub Option2_Click() HScroll1.Value=0 End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析 第1小题:本题只需按题目要求利用VB菜单设计器建立一个二级菜单。
第2小题:本题需要在窗体上二画出水平滚动条,并设置Tablndex属性为0;然后在单选按钮的单击事件中改变滚动条的Value属性值就能使滑块处于指定位置。
转载请注明原文地址:https://kaotiyun.com/show/LPUp777K
0

最新回复(0)