首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件
admin
2016-06-23
64
问题
在名称为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全国计算机二级
相关试题推荐
窗体是一种对象,由属性定义其外观,由______定义其行为,由事件定义其与用户的交互。
在文本框中,当用户键入一个字符,能同时引发的事件是
向顺序文件Temp.txt中写入1,2,3这3个数。在程序中加入以下语句的哪一项可以使程序功能完整。PrivateSubCommand1_Click() Open"c:\Temp.txt",OutputAs#1 For
下列程序段的执行结果为DimA(3,3)ForM=1To3 ForN=1To3 IfN=MOrN=3-M+1Then A(M,N)=1 Else A(M,N)=
有如下程序:PrivateSubcommand1_Click() a=1:b=1 Print"a=";a;",b=";b Callmult((a),b) Print"a=";a;";b=";b语句
程序测试分为静态分析和动态测试。其中______是指不执行程序,而只是对程序文本进行检查,通过阅读和讨论,分析和发现程序中的错误。
表达式X+1>X是()。
表达式Str(Len"123’))+Str(77.7)的值是()。
(1)在标题为“列表框”、名称为Form1的窗体上添加一个名称为List1的列表框,通过属性窗口输入4个列表项:“数学”、“语文”、“历史”、“地理”,列表项形式采用复选框形式,如图所示。列表框的宽为1100,高不限。注意:存盘时必须存放在考生文
随机试题
厂商的收益分哪几种,以数学公式表示价格不变时厂商的平均收益、边际收益与产品价格的关系。
八珍汤的适应证是四物汤的适应证是
根据《建设工程安全生产管理条例》的规定,建设工程施工前,施工单位负责项目管理的技术人员应当对有关安全施工的技术要求向()作出详细说明,并由双方签字确认。
根据《小型水电站施工技术规范》SL172—96,下列关于钢管安装和地下厂房开挖的说法正确的是()。
甲公司和乙公司2013年有关交易或事项如下:(1)1月1日,甲公司以银行存款2000万元购入乙公司70%的股权,实现了对乙公司财务和经营政策的控制,当日办理完毕股权登记手续,不考虑相关税费,另以银行存款支付中介机构评估乙公司资产的评估费20万元。当日乙公
教师有独立工作的权利。()
学习诊断式学习方法指导(山东大学2016)
Theproliferationofbookclubs,some50,000intheUKaloneandwhoknowshowmanymoreworldwide,isquitearemarkablelitera
Notice:Thissoftwareisdesignedtohelptheuserdeveloptheabilitytothinkcritically.Itwaspreparedformiddle-school-le
GetEnoughSleep—orElse!Agoodnight’ssleepismoreimportanttoyourhealththanyoumayrealize.[A]MeganJoneskne
最新回复
(
0
)