首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(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
20
问题
(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全国计算机二级
相关试题推荐
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。PrivateSubCommandl_Click()DiminDataAsString
单击一次命令按钮后,下列程序的执行结果为 PrivateSubCommand1_Click() DimmAsInteger,IAsInteger,x(10)AsInteger ForI=0To4:x(I)=I+1
在窗体上有一个命令按钮,然后编写如下事件过程 PrivateSubCommand1_cickc() a=InputBox("enterthefirstinteger") b=InputBox("enterthesecon
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
定义过程的格式中,Static关键字的作用是指定过程中的局部变量在内存中的存储方式。若使用了Static关键字,则
随机文件使用Put语句写数据,使用【】语句读数据。
窗体上有两个按钮,执行程序后按Cancel按钮的输出结果是______。PrivateSubCommandl_Click()Print“北京”;EndSubPrivateSubCommand2,_Click()
在窗体上画一个名称为Filel的文件列表框,并编写如下程序:PrivateSubFilel_DblClick()x=Shell(Filel.FileName,1)EndSub以下关于该程序的叙述中,错误的是__
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsString,cAsIntegera=1234:
随机试题
一个字长为8位的无符号二进制整数能表示的十进制数值范围是
妊娠五个月,咳嗽不已,干咳少痰,口干咽燥,手足心热,舌红少苔,脉细滑数。
复合树脂充填V类洞,以下设计正确的是
宜采用钢管或机械接口铸铁管的是()燃气管道。
2018年5月份,某投资者卖出一张7月到期、执行价格为14900点的恒指看涨期权,权利金为500点,同时又以300点的权利金卖出一张7月到期、执行价格为14900点的恒指看跌期权。当恒指为()点时,可以获得最大盈利。
在现称为“五大行”的五家商业银行中,最早实行股份制的银行是(),截至2009年尚未完成股份制改造的银行是()。
向阳村村委会向所在乡人民政府建议在全乡范围内开展一次清洁卫生大检查,应使用()行文。
教师让学生即兴回答问题,这是调动学生的()。
教育是什么?选一种观点论述。
A、Numbersofpeopleinvolved.B、Qualityofthisrelationship.C、Commitmentofthisrelationship.D、Membersbeingrelatives.B根据第
最新回复
(
0
)