2. 计算机
  3. 注意：下面出现的“考生文件夹”均为c：\wexam\25160001。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1) 在名称为Form1的窗体上放置一个名称为Drive1的Drive ListBox控件

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1) 在名称为Form1的窗体上放置一个名称为Drive1的Drive ListBox控件

admin2009-02-25  68
问题 注意：下面出现的“考生文件夹”均为c：\wexam\25160001。
   请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
   (1) 在名称为Form1的窗体上放置一个名称为Drive1的Drive ListBox控件，一个名称为Dir1的 DirListBox控件和一个名称为Filel的FileListBox控件。程序运行时，可以对系统中的文件进行浏览；当双击File1中的文件名时，用MsgBox显示文件名(不显示路径名)。如图16-1所示。
   注意：程序中不得使用任何变量；保存时必须存放在考生文件夹下，窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
   (2) 在名称为Form1的窗体上放置一个名为Text1的文本框控件和一个名为Timer1的计时器控件，程序运行后，文本框中显示的是当前的时间，而且每一秒文本框中所显示的时间都会随时间的变化而改变。
   注意：程序中不得使用任何变量；保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp，如图16-2所示。
选项
答案在窗体上建立好控件后，先设置控件属性，再编写事件过程。 文件系统控件有3种：驱动器列表框(DriveListBox)，目录列表框(DirListBox)和文件列表框(FileListBox)。3个文件系统控件必须协调工作才能构成一个文件管理系统，当用户在驱动器列表框中选择一个新的列表框或在当目录列表框Path的属性改变都触发Change事件，将三者(利用本题中3个对象的名称)实现同步的代码为：File1.Path=Dir1.Path，Dir1.Path= Drive1.Drive。双击触发DblClick事件弹出MsgBox显示文件名，其格式为：MsgBox提示[,按钮][,标题]。解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件及其属性见表16-1。 [*] 　　第二步：编写程序代码。 　　参考代码： 　　　　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 Filel.FileName 　　　　End Sub 　　　　Private Sub Form_Load() 　　　　　Dir1.Path=Drive1.Drive 　　　　　File1.Path=Dir1.Path 　　　　End Sub 　　第三步：调试并运行程序。 　　第四步：按题目要求存盘。 　　(2)在窗体上建立好控件后，先设置控件的属性，再编写事件过程。 　　时钟控件作用是以一定的时间间隔激发计时器事件(Timer)而执行相应程序代码，其Interval属性决定时间间隔的长短，以毫秒为单位，所以要实现每一秒文本框的时间改变只要使该属性设置为1000即可，要使程序运行后取得当前时间可用Time函数取得，程序用到的Str函数将其中的内容转化为字符串。解题步骤： 　　第一步：建立界面并设置控件属性。程序中用到的控件及其属性见表16-2。 [*] 第三步：调试并运行程序。 第四步：按题目要求存盘。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/UQ1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)