首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(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
38
问题
(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全国计算机二级
相关试题推荐
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。PrivateSubForm_Click()StaticxAsIntegerClsPri
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1Click()n=5f=1s=0Fori=1Tonf
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
启动窗体在【】对话框中指定。
窗体上有两个按钮,执行程序后按Cancel按钮的输出结果是______。PrivateSubCommandl_Click()Print“北京”;EndSubPrivateSubCommand2,_Click()
有如下事件过程: SubABD(x%,y%,z%) z%=X%+y% EndSub PrivateSubCommand1_Click() a%=30:b%=40 CallABD(a%,b%,c%) Pr
执行如下两条语句后,窗体上显示的是()。a=9.8596PrintFormat(a,“$00,00.00”)
随机试题
可以在不同系统之间传送文件的程序是_______。
阅读艾青《我爱这土地》,然后回答以下小题。假如我是一只鸟,我也应该用嘶哑的喉咙歌唱:这被暴风雨所打击着的土地,这永远汹涌着我们的悲愤的河流,这无止息地吹刮着的激怒的风,和那来自林间的无比温柔的黎明
左心室流人道的入口是()
甲作为乙的行纪人与丙订立买卖合同,由于丙未按约定履行合同致使乙的利益受到损害,对此应承担责任的是()。
甲曾任乙装修公司经理,2018年3月辞职。5月8日,为获得更优折扣,甲使用其留有的盖有乙公司公章的空白合同书。以乙公司名义与丙公司订立合同,购买总价15万元的地板。合同约定:6月7日丙公司将地板送至指定地点;乙公司于收到地板后3日内验货;地板经验收合格后,
所有被删除的文件都可以从回收站中恢复。()
(98年)设有两条抛物线y=nχ2+和y=(n+1)χ2+,记它们交点的横坐标的绝对值为an(1)求两条抛物线所围成的平面图形的面积Sn;(2)求级数的和.
Ifweacceptthatwecannotpreventscienceandtechnologyfromchangingourworld,wecanatleasttryto【C1】______thatthecha
Whenwasthebuildingbeingvisitedconstructed?
在中国,如果不了解“面子”的含义,则很难理解许多行为言辞。面子通常可理解为社会对一个人名誉和声望(prestige)的看法。因此,中国人向来很重视面子问题。丢面子会导致一个人在人际交往中失去权威。中国人通常不会公开指出令人尴尬的事实,从而避免让另一个人丢面
最新回复
(
0
)