(1)在名称为Form1的窗体上建立一个名称为cmdArray的命令按钮数组,含3个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消",每个按钮的高、宽均为400、900。窗体的标题为“按钮示例"。运行后的窗体如图3.62所

admin2017-09-22  17

问题 (1)在名称为Form1的窗体上建立一个名称为cmdArray的命令按钮数组,含3个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消",每个按钮的高、宽均为400、900。窗体的标题为“按钮示例"。运行后的窗体如图3.62所示。
    (1)在名称为Form1的窗体上建立一个名称为cmdArray的命令按钮数组,含3个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消",每个按钮的高、宽均为400、900。窗体的标题为“按钮示例"。运行后的窗体如图3.62所示。
    注意:存盘时必须存放在考生文件夹下,工程文件名为vbsjl.vbp,窗体文件名为vbsjl.frm。
(2)在名称为Form1的窗体上画一个名称为Drvl的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。窗体的标题设置为“文件系统控件”。请编写适当的程序,使得这三个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将选中的文件名显示在Label2中,如图3.63所示。

    注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为vbsi2.vbp,窗体文件名为vtsji2.frm。

选项

答案(1)步骤1:新建一个“标准EXE”工程,单击工具箱中的CommandButton控件图标,在窗体Form1上拉出一个命令按钮,在属性设置窗口中该单选按钮名称设置为cmdArray,Width属性值设置为900,Height属性值设置为400。 步骤2:选中cmdArray控件,选择【编辑】→【复制】命令,然后选择【编辑】→【粘贴】命令,在弹出的询问是否建立控件数组的对话框中,选择“是”按钮,如图4.1所示,则可以建立cmdArray控件数组的第2个元素。再次选择【编辑】→【粘贴】命令,建立cmdArray控件数组的第3个元素。 [*] 步骤3:依次选中cmdArray控件数组中各个元素,设置它们的相关属性,属性及其值如表4-38所示。 [*] 步骤4:按要求将文件保存至考生文件夹中。 (2)步骤1:新建“标准EXE”工程,往窗体Form1中加入驱动器列表框、目录列表框控件、文件列表框控件各一个以及两个标签,分别设置它们的相关属性,属性及其值如表4.39所示。 [*] 步骤2:打开代码编辑窗口,输入如下代码。参考代码: Private Sub Drvl_Change() Dirl.Path=Drvl.Drive End Sub PriVate Sub Dirl_Change() Filel.Path=Dirl.Path End Sub PriVate Sub Filel_Click() Label2.Caption=Filel.FileName End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析 (1)本题只需按题目要求在窗体中画一个命令按钮控件数组即可。
    (2)驱动器列表框(Drive ListBox)用来显示当前系统中所有有效磁盘驱动器的列表:目录列表框(Dir List Box)用来分层显示指定磁盘驱动器上的目录列表;文件列表框(File List Box)用来显示指定目录中所选择文件类型的文件列表,默认为*.*。在程序运行时,驱动器列表框的Drive属性用来设置或返回选择的驱动器(缺省值是当前驱动器),目录列表框的Path属性用来设置或返回选择的目录(缺省值是当前路径),文件列表框的Path属性用来设置或返回其当前的目录(缺省值是当前路径),文件列表框的FileName属性可返回所选文件的文件名。
    要在程序运行时,能对系统中的文件进行浏览,就要让驱动器列表框、目录列表框和文件列表框实现同步变化,关键是将驱动器列表框、目录列表框、文件列表框相互关联起来,这可通过编写驱动器列表框、目录列表框的Change事件过程,使三者的路径保持一致来实现。
转载请注明原文地址:https://kaotiyun.com/show/jjGp777K
0

最新回复(0)