首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 1.在名称为Form1的窗体上放置一个名称为Drive1的DriveListBox控件,一个名称为Dir1的DirListBox控件和一个名称为File1的FileListBo
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 1.在名称为Form1的窗体上放置一个名称为Drive1的DriveListBox控件,一个名称为Dir1的DirListBox控件和一个名称为File1的FileListBo
admin
2009-03-17
89
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
1.在名称为Form1的窗体上放置一个名称为Drive1的DriveListBox控件,一个名称为Dir1的DirListBox控件和一个名称为File1的FileListBox控件。程序运行时,可以对系统中的文件进行浏览;当双击File1中的文件名时,用MsgBox显示文件名(不显示路径名)。
注意:程序中不得使用任何变量;保存时必须存放在考生文件夹下,窗体文件名为Sjt1. frm,工程文件名为sjt1.vbp。
2.在名称为Form1的窗体上放置一个名为Text1的文本框控件和一个名为Timer1的计时器控件,程序运行后,文本框中显示的是当前的时间,而且每一秒文本框中所显示的时间都会随时间的变化而改变。
注意:程序中不得使用任何变量;保存时必须存放在考生文件夹下,窗体文件名为sjt2. frm,工程文件名为sjt2.vbp,如图1—1所示。
选项
答案
① 在窗体上建立好控件后,先设置控件属性,再编写事件过程。 ② 文件系统控件有3种:驱动器列表框(DriveListBox),目录列表框(DirListBox)和文件列表框(FileListBox)。3个文件系统控件必须协调工作才能构成一个文件管理系统,当用户在驱动器列表框中选择一个新的列表框或在当目录列表框Path的属性改变都触发Change事件,将三者(利用本题中3个对象的名称)实现同步的代码为:File1.Path=Dir1.Path,Dir1. Path=Drive1.Drive。双击触发 DblClick事件弹出MsgBox显示文件名,其格式为:MsgBox提示[,按钮][,标题]。 ③ 解题步骤: 第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表1。 表 1标题 属性 设置值 [*] DriveListBox Name Drive1 DirListBox Name Dir1 FileListBox Name File1 第二步:编写程序代码。 参考代码: Option Explicit Private Sub Dir1_Change() File1.Path=Dir1.Path End Sub Private Sub Drive1_Change() Dir1.Path=Drive1.Drive End Sub Private Sub File1_dblclick() MsgBox File1.FileName End Sub Private Sub Form_Load() Dir1.Path=Drive1.Drive File1.Path=Dir1.Path End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。 2.① 在窗体上建立好控件后,先设置控件的属性,再编写事件过程。 ② 时钟控件作用是以一定的时间间隔激发计时器事件(Timer)而执行相应的程序代码,其Interval属性决定时间间隔的长短,以毫秒为单位,所以要实现 每一秒文本框的时间改变只要使该属性设置为1000即可,要使程序运行后取得当前时间可用Time函数取得,程序用到的Str函数将其中的内容转化为字符串。 ③ 解题步骤: 第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表2。 表 2 [*] 标 题 属 性 设 置 值 Text Name Text1 Timer Name Interval Timer1 1000 第二步:编写程序代码。 参考代码: Private Sub Form_Load() Text1.Text=Str(Time) End Sub Private sub Timer1_Timer() Text1.Text=Str(Time) End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/3j1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对象流是否和用于处理字符流的Writer类和Reader类相关?()
在一个有n个元素的顺序表的第i个元素(1≤i≤n)之前插入一个新元素时,需要向后移动【】个元素。
给出下面的代码段,下面的哪些陈述为真?()publicvoidcreate(){VectormyVect;myVect=newVector();}Ⅰ:第2行的声明不
软件需求分析阶段的工作,可以分为4个方面:需求获取、需求分析、编写需求分析说明书和()。
下列方法中设置Swing容器JFrame大小为20×30的语句是()。
已知:int[]a=newint[100];在下列给出的数组元素中,非法的是()。
在Java中,表示换行符的转义字符是()。
某二叉树中度为2的结点有18个,则该二叉树中有【】个叶子结点。
如果在Applet中要访问一个HTML文件,可以请示浏览器实现相应HTML文本的显示。通过AppletContext的【】方法,Applet可以通知浏览器在哪个窗口中显示哪个URL中的文件。
若某二叉树的前序遍历访问顺序是abdgcefh,中序遍历访问顺序是dgbaechf,则其后序遍历的结点访问顺序是()。
随机试题
“五同时”是指企业生产(经营)的领导者和组织者,必须明确安全与生产是一个有机的整体,要将安全与生产的产量(进度)一起抓,在生产工作的时候,同时计划、布置、安排、检查、总结、评比安全工作。()
患儿,10岁。扁桃体发炎3天,近2天来出现左膝关节剧痛,伴有高热,畏寒,烦躁不安。查体:体温39.5℃,脉搏110次/分,呼吸26次/分,血压112/75mmHg,神志清楚,左膝关节明显肿胀、皮温升高及压痛,关节活动明显受限。若患儿早期未能进行积极的处
以下哪个是运动疗法的适应证
患者,女性,22岁。因右下智齿低位埋伏阻生,要求拔除。在注射局部麻醉药后牙关紧闭,可能是发生了()
委托人应当预支付监理人实施监理所必需的()。
[背景资料]某18层办公楼,建筑面积32000m2,总高度71m,钢筋混凝土框架一剪力墙结构,脚手架采用悬挑钢管脚手架,外挂密目安全网,塔式起重机作为垂直运输工具,2009年11月9日在15层结构施工时,吊运钢管时钢丝绳滑扣,起吊离地20m后,钢管
标志着我国进入航天时代的事件是()。
“若要美德得以保存,法律是必需的;而若要法律得以遵守,美德则是不可缺少的。”这句话说明法律与道德是相互对立的。()
toscopewithA.alargepopulationgivesmore【T1】______forB.【T2】______feedalargepopulationC.couldbeobtained【T
Whenthesunstartedtoset,Jimheadedforhome.Hehadhuntedlongenough.Justthenhesawthereis,30feetinfrontofhi
最新回复
(
0
)