首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上建立一个名称为cmdArray的命令按钮数组,含3个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消",每个按钮的高、宽均为400、900。窗体的标题为“按钮示例"。运行后的窗体如图3.62所
(1)在名称为Form1的窗体上建立一个名称为cmdArray的命令按钮数组,含3个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消",每个按钮的高、宽均为400、900。窗体的标题为“按钮示例"。运行后的窗体如图3.62所
admin
2017-09-22
54
问题
(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://www.kaotiyun.com/show/jjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。PrivateSubForm_Click()StaticxAsIntegerClsPri
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。PrivateSubCommandl_Click()DiminDataAsString
单击一次命令按钮后,下列程序的执行结果为 PrivateSubCommand1_Click() DimmAsInteger,IAsInteger,x(10)AsInteger ForI=0To4:x(I)=I+1
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是_______。
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是
CommonDialog控件可以显示______种对话框。
编写如下事件过程:PrivateSubForm_keyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_Keypress(
下列语句的输出结果是【】。PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
如果准备读文件,打开顺序文件“text.dat”的正确语句是
随机试题
碘量法测定维生素C注射液含量时,加入丙酮的目的是
细辛的植物来源为()。
A.无色或黄白色,具细密的纵直条纹,间距1μm~7μm,真皮色素较少B.无色或黄白色,具细密的纵直条纹,间距1μm~7μm,真皮素较多C.深棕色或棕黄色,密布乳头状突起,真皮含较多色素D.黄棕色,具纵直条纹,间距17μm~24μm,真皮色素较少E.
【背景资料】某工业厂房的动力站安装工程,该工程的总承包商项目经理部坚持“安全第一,预防为主”的方针,建立了安全管理体系和安全生产责任制,并针对该工程项目的规模、结构、特点、环境、技术含量、施工风险及资源配置等因素进行了施工安全策划,编制了具体化、及时化、
存款性金融机构是吸收个人或机构存款,并发放贷款的金融机构。下列金融机构中,属于存款性金融机构的是()。
下列不属于市场预测主要内容的是()。
下述哪项为支气管哮喘的特征?()
下列关于病理学的叙述错误的是()。
Individualsandbusinesseshavelegalprotectionforintellectualpropertytheycreateandown.Intellectualproperty【C1】_______
不论索引是否生效,定位到相同记录上的命令是()。
最新回复
(
0
)