首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件
admin
2016-06-23
37
问题
在名称为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://jikaoti.com/ti/ZCJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请填写下列空白以实现运行后形成一个主对角线上元素值为l,其他元素为0的6×6阶矩阵。PrivateSubCommand1_Click()Dims(6,6)Fori=1To6Fori=1To6If
下列不属于VisualBasic特点的是
下面叙述中不正确的是()。
可决定窗体左上角是否有控制菜单的属性是()。
下面语句的输出结果为______。x!=3.1415926Printx
以下语句中哪句可以选择指定的表项或取消已选择的表项
表达式Abs(-5)+Len("ABCDE")的值是
设Y是整形变量,能判断Y为奇数的表达式是
与数学表达式对应的,VisualBasic表达式是______。
下列运算符中,优先级别最高的是
随机试题
1862年奏请创办京师同文馆的是________。
12个月婴儿平均体重是
哪条是恶性肿瘤的最主要诊断依据
知觉是对客观事物哪种属性的反映
气滞腹痛宜选方
患者,男,40岁。小便频急,茎中热痛,刺痒不适,尿色黄浊,尿末或大便时有白浊滴出,会阴、腰骶、睾丸有明显的胀痛不适,舌红苔黄根腻,脉弦滑。诊为慢性前列腺炎,其证候是
From:MitchellGlassTo:LoisWest
Subject:ManythanksDearMs.West,Iwouldliketothankyoufor
在公交车上,有二人都情绪激动地分别指责对方是小偷,当时,你休假又穿着便装,遇到这种情况,你怎么办?
合同解除权人依法享有合同解除权的情形有()。
Notmuchpeoplerealizethatappleshavebeencultivatedforover3,000years.
最新回复
(
0
)