首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件
admin
2016-06-23
34
问题
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件系统控件”,如图所示。请编写适当的程序,使得这三个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将在Label2中显示选中的文件名。
注意:要求程序中不得使用变量,事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
[操作步骤] 步骤1:新建一个窗体,按照题目要求建立驱动器列表框、目录列表框和文件列表框控件并设置其属性,如图3.28所示。 [*] 程序中用到的控件及属性见表3.39和表3.40。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考代码 Private Sub Dir1_Change() File1.Path=Dir1.Path’使目录列表框Dir1与文件列表框File1同步 End Sub Private Sub Drive1 Change() Dir1.Path=Drive1.Drive’使驱动列表框Drive1与目录列表框Dir1同步 End Sub Private Sub File1 Click() Label2=File1.FileName显示File1中的文件名 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/sSLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
决定一个窗体有无控制菜单的属性是______。
运行时,要使工具栏控件Toolbarl中的第二个按钮的按钮菜单中的第三项无效(变成灰色),应使用语句______。
单击命令按钮时,下列程序的执行结果是PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsInteger a=3:b=4:c=5 PrintSec
能触发滚动条Scorll事件的操作是()。
如果准备读文件,打开顺序文件”text.dat”的正确语句是()。
设有如下过程:Subff(x,y,z,) x=y+zEndSub以下所有参数的虚实结合都是传址方式的调用语句是()。
语句Form2.Show0表示_____;语句Form3.Show1表示_____;
在用通用对话框控件建立”打开”或”保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是()。
以下说法不正确的是
如果不指明函数过程参数的类型,则该参数的数据类型为______。
随机试题
下列各句中,加点的成语使用恰当的一句是()
本案中,由于该案件涉及县人民法院院长,因此,关于本案的管辖,下列说法正确的是:假设张某在人民检察院立案侦查期间自杀身亡,此时县人民检察院可以如何处理此案?
关于质量监督机构在工程竣工阶段质量监督工作的说法,正确的有()。
一般来说,弹性较小的理财目标有()。
下列各项中,关于企业无法查明原因的现金溢余,经批准后会计处理表述正确的是()。
下列关于企业风险管理内涵的说法中,错误的是()。
A、 B、 C、 D、 B第一组图中,最外层的“U”型框的开口方向各不相同,分别为上、下、右,第二组图规律相同,由此排除C和D。再看“U”型框内部的线条数,第一组图中为O、2、1,各不相同,第二组图规律相同,
根据《劳动法》的规定和劳动关系的性质,下列纠纷属于劳动争议的是()。
下列关于光纤同轴电缆混合网HFC的描述中,错误的是()。
A、Inaboutfourdays.B、Abouttwoweeksfromnow.C、Infourweeks.D、Shehasn’tdecidedyet.B
最新回复
(
0
)