首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(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
22
问题
(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
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了在窗体上建立2组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
下列语句的输出结果是【】。PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")
以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。PrivateSubCommand1_Click()DimaAsInteger,bAsSt
要把一个命令按钮设置成无效,应设置属性______的值为False。
窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1)。要求程序运行后,如果在文本框中输入字符,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是______。
设已经在菜单编辑器中设计了窗体的快捷菜单,某顶级菜单为al,且取消其"可见"属性。运行时,可以使快捷菜单的菜单项响应鼠标左键单击和右健单击的事件过程是
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是()。
随机试题
点(2,3,1)在直线上的投影为________.
微分方程y"-y’=0的通解为().
关于牙体缺损修复后具有稳定而协调的关系的叙述,错误的是
在一份保险合同履行过程中,当事人就合同所规定的意外伤害条款的含义产生了不同理解,投保人认为其所受伤害应属于赔付范围,保险公司则认为投保人所受伤害不属于赔付范围,两种理解各有其理。在此情形下,法官应当如何解释条款的含义?
某企业位于市区,为增值税一般纳税人。假定2019年度购进和销售货物的增值税适用税率均为13%,年末增值税无留抵税额和待抵扣进项税额。2019年度按会计核算的利润总额为依据预缴企业所得税,享受的税收优惠政策及资产损失能提供留存备查的相关资料。2019年度利润
下列关于保证责任的说法,错误的是()。
运输企业市场营销的外部环境归纳为()。
信息共享是指不同人员、不同部门、不同层次之间,利用网络平台,对相关信息进行系统连接。使信息资源得到充分的开发利用。下列不属于信息共享的是:
咀嚼运动中产生的自洁作用不是指()。
Notonly______(这家工厂完成了生产任务)lastyear,butitalsodoubleditsoutput.
最新回复
(
0
)