首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个名称为Command1的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码: ①设置适当属性,使对话框的标题为“打开文件”;
在名称为Form1的窗体上添加一个名称为Command1的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码: ①设置适当属性,使对话框的标题为“打开文件”;
admin
2016-06-23
54
问题
在名称为Form1的窗体上添加一个名称为Command1的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:
①设置适当属性,使对话框的标题为“打开文件”;
②设置适当属性,使对话框的“文件类型”下拉式组合框中有两项可供选择:“文本文件”、“所有文件”(如图所示),默认的类型是“所有文件”;
③编写命令按钮的事件过程,使得单击按钮可以弹出“打开文件”对话框。
要求:程序中不得使用变量,事件过程中只能写入一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
选项
答案
[操作步骤] 步骤1:新建一个窗体,按照要求建立控件并设置其属性,如图3.21所示。程序中用到的控件及属性见表3.13。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考代码 Private Sub Command1_Slick() CD1.ShowOpen’显示打开文件对话框 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/3cLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于顺序文件的叙述中,正确的是
有如下函数过程:FunctionFun(ByValxAsInteger,ByValyAsInteger)AsInteger DoWhileY<>0 reminder=xMody x=
通过对话框中能打开“颜色对话框”的方法是
有如下程序:PrivateSubForm_Click() E=1:F=1 Forj=1To3 E=E+F:F=F+E Next PrintE:FEndSub该程序的
如果希望定时器控件每秒产生10个事件,则要将Interval属性的值设为()。
下面语句的输出结果为______。x!=3.1415926Printx
在下列关于菜单的说法中,错误的是
表达式x=Sqr(a^2-5)+sqr(b^2-5)的类型是
在修改列表框内容时,AddItem方法的作用是
表达式Int(-17.8)+Sgn(17.8)的值是()。
随机试题
既能清气分实热又能退蒸的药是
工程建设项目环境影响评价的“三同时”原则是指环境治理设施应与项目的主体工程()。
背景资料:某二级公路的主要工序见下表。施工单位编制了如下图所示的网络计划。施工中发生了如下事件。事件一:由于施工单位设备故障,导致C工作中断4d。事件二:由于百年一遇的冰雪灾害,导致D工作晚开工15d。
防潮层采用缠绕式保护层的重叠部分应为其带宽的(),缠绕时应裹紧,不得有松脱、翻边、皱褶和鼓包,起点和终点必须用()捆扎牢固,并应密封。
资金成本是指企业为筹措和使用资金而付出的实际费用。()
甲公司为一家上市公司,2014年对外投资有关资料如下:(1)1月20日,甲公司以银行存款购买A公司发行的股票200万股作为可供出售金融资产,实际支付价款11000万元(含已宣告但尚未发放的现金股利20万元),另支付相关税费10万元,占A公司有表决
简述陈鹤琴的“活教育”思想体系。
Theofficersmadeitclearthattheywerelettinghergoonlybecausethatshewasoldandnotbecauseshewasabovesuspicion.
(Ehime-ken)EhimeUniversityinMatsuyamaisseekingEnglishinstructorsforpostsofone-yeardurationattheEnglishEducation
A、Hiscomputerdoesn’tworkwell.B、Heisn’tgettingalongwithhisstaff.C、Hedidn’tregisterforapropercourse.D、Hecan’t
最新回复
(
0
)