首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。运
(1)在名称为Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。运
admin
2019-06-24
35
问题
(1)在名称为Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。运行程序后的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
(2)在名称为Form1的窗体上添加一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件系统控件”,如图所示。请编写适当的程序,使得这三个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将在Label2中显示选中的文件名。
注意:要求程序中不得使用变量,事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:建立界面,添加相应的控件并设置控件的属性。程序中用到的控件及属性见表4.38。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:新建一个窗体,按照题目要求建立驱动器列表框、目录列表框和文件列表框控件并设置其属性,如图4.28所示。 [*] 程序中用到的控件及属性见表4.39和表4.40。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Dir1_Change() File1.Path=Dir1.Path’使目录列表框Dir1与文件列表框File1同步 End Sub Private Sub Drivel Change() Dir1.Path=Drive1.Drive’使驱动列表框Drive1与目录列表框Dir1同步 End Sub Private Sub File1_Click() Label2=File1.FileName’显示File1中的文件名 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)通过框架的Name、Caption和Ena.bled属性设置框架的名称、标签以及是否可用。通过单选按钮的Name、Caption和Value属性设置单选按钮的名称、标签以及是否被选中。
(2)在实际应用中,驱动器列表框、目录列表框和文件列表框通常需要同步操作,这可以通过Path属性的改变引发Change事件来实现。
例如:
Private Sub Dirl_Change()
File1.Path=Dir1.Path
End Sub
该事件过程使窗体上的目录列表框Dir1和文件列表框File1产生同步。因为目录列表框的Path属性的改变将产生Change事件,所以在Dir1_Change事件过程中,把Dir1.Path赋给File1.Path即可产生同步效果。
类似地,增加下面的事件过程可使三种列表框同步操作。
例如:
Private Sub Drivel_Change()
Dirl.Path=Drivel.Drive
End Sub
该过程使驱动器列表框与目录列表框同步,前面的过程使目录列表框与文件列表框同步,从而使三种列表框同步。
转载请注明原文地址:https://www.kaotiyun.com/show/0qUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生目录下有一个工程文件sjt3.vbp,窗体文件中己给出所有控件和部分程序,如图3—119所示。要求:①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐;②请编写适当的程序完成以下功能:在Text1中输入40(度数),选择一
设x为一整型变量,且语句的开始为:SelectCasex,则不符合语法规则的Case子句是
设窗体上有Text1、Text2两个文本框,并编写了下面的程序代码:PrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是
设有下面的程序段:X=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义。下
窗体上有一个名称为Shapel并显示为圆的形状控件(其width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码:DimrAsSingle,flagAsIntegerPrivateSubForm
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下:Form2的代码如下:
有数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行语句后,不是整型变量的是
在菜单编辑器中建立如下图所示的菜单,并为每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是()。
随机试题
糖尿病非酮症高渗昏迷的诊断依据是
患者男,63岁,上颌全牙列缺失。下颌多数牙缺失,仅余。牙槽嵴丰满,间距离正常患者反映戴义齿恶心,可能的原因是
治疗目赤肿痛的穴组是
10月男婴,血象白细胞数10×109/L中性粒细胞占60%,淋巴细胞占35%,单核细胞占2%,以下哪一个结论是正确的
工作接地一般指用作________的接地。()
下列各项属于纳税人权利范围的有()。(2013年)
以下属于教师条件性知识的是()。
史诗是人类最早的精神产品,对我们了解早期人类社会具有重大意义。()是流传迄今的欧洲最完整的一部史诗。
Feelingthefreshearlymorningairrushingagainstmychurninglegs,arms,andspeeding
Studiesshowthatlaughterissomethingthatmakesyoufeelcalmorrelaxedforbothphysicalandpsychologicalwoundsthough
最新回复
(
0
)