首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为。Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。
(1)在名称为。Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。
admin
2015-10-23
38
问题
(1)在名称为。Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。运行程序后的窗体如图所示。
注意:存盘时必须存放在考牛文件夹下,工程义件名保存为sjt1.vbp,窗体文什名保存为可sjt1.frm。
(2)在名称为Form1的窗体上添加一个名称为Drivel的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件系统控什”,如图所示。请编写适当的程序,使得这二三个文件系统控什可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将在Labe12中显示选中的文件名。
注意:要求程序中不得使用变量,事件过程中只能写一条语句。
存盘时必须存放在考生文什央下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
步骤1:建立界面,添加相应的控件并设置控件的属性。程序中用到的控件及属性见表3.38。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2) 步骤1:新建一个窗体,按照题目要求建立驱动器列表框、目录列表框和文件列表框控件并设置其属性,如图3.28所示。 [*] 程序中用到的控件及属性见表3.39和表3.40。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 Private Sub Dirl_hange() Filel.Path=Dirl.Path’使目录列表框Dir1与文件列表框File1同步 End Sub Private Sub Drivel_Change() Dir1.Path=Drivel.Drive’使驱动列表框Drive 1与目录列表框Dir1同步 End Sub Private Sub Filel Click() Label2=File1.FileName.显示File1中的文件名 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)通过框架的Name、Caption和Enabled属性设置框架的名称、标签以及是否可用。通过单选按钮的Name、Caption和Viue属性设置单选按钮的名称、标签以及是否被选中。
(2)在实际应用中,驱动器列表框、目录列表框和文件列表框通常需要同步操作,这可以通过Path属性的改变引发Change事件来实现。
例如:
PriVate sub Dirl_Change()
File1.Path=Dirl.Path
End Sub
该事件过程使窗体上的目录列表框Dir1和文件列表框Filel产生同步。因为目录列表框的Path属性的改变将产生Change事件,所以在DM_Change事件过程中,把Dir1.Pmh赋给File1.Pmh即可产生同步效果。
类似地,增加下面的事件过程可使三种列表框同步操作。
例如:
PriVate Sub Drive1.Change()
Dirl.Path=Drive1.Drive
End Sub
该过程使驱动器列表框与目录列表框同步,前面的过程使目录列表框与文件列表框同步,从而使三种列表框同步。
转载请注明原文地址:https://jikaoti.com/ti/sIJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果想在程序中反复使用一个日期型数据“01/01/2005”,为了避免在编写程序时反复输入这个数据,也为了一次能够修改程序中所有用到这个数据的语句,可以采用()。
Label控件中内容能垂直方向变化而宽度保持不变则应设置()属性。
下列有关数据库的描述,正确的是
以下程序用来产生20个100以内的随机整数,并将其中的偶数在窗体上显示,请填空。RandomizeFori=1To20x=[5]Ifx/2=[6]ThenPrintXEndI
下面有关注释语句的格式,错误的是()。
设有命令按钮Commandl的单击事件过程,代码如下:PrivateSubCommandl_Click()Dima(30)AsIntegerFori=1To30a(i)=Int(Rnd*100)
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAngKAsIntegerSi
使图像(Image)控件中的图像自动适宜控件的大小需要
首先执行循环体,然后再进行条件判断,决定是否结束循环的循环语句是______。
如果在立即窗口中执行以下操作,则输出结果是()。a=8<CR>b=9<CR>Printa>b<CR>
随机试题
行政法院起源于()
在其他条件不变的前提下,厂商增加投资会导致
正常粪便中可以出现的是A.夏科-莱登结晶B.菱形血晶C.红细胞D.淀粉颗粒E.大吞噬细胞
以下通过补充体内生命代谢物质而发挥药理作用的药物有
【背景资料】A公司在冬季承接了一室外压缩空气管网系统的安装,系统工作压力为2.5MPa。由于工期较紧,A公司将系统中部分规格的直管分包给B公司。A公司和B公司均具备与承包管道系统相符的压力管道施工许可证,管道及管件均由业主提供。管道系统施工完后,B公司
甲公司2015年和2016年12月31日资产负债表部分项目余额如下:假定2016年甲公司发生的部分经济业务如下:(1)3月25日企业购入专项工程A需要安装的设备一台,发票上注明的设备款为20000元,发生运费5000元,购入后发生安装费1000元,全
根据《民法典》的规定,下列关于诉讼时效期间的起算,说法正确的有()。
根据《公司法》规定,下列对股份有限公司的股份转让的限制正确的有()。
有财产的无民事行为能力人、限制民事行为能力人造成他人损害的,从本人财产中支付赔偿费用。不足部分,由监护人赔偿。()
【B1】【B8】
最新回复
(
0
)