首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Forml的窗体上添加一个名称为Commandl的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码: ①设置适当属性,使对话框的标题为
(1)在名称为Forml的窗体上添加一个名称为Commandl的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码: ①设置适当属性,使对话框的标题为
admin
2019-06-24
68
问题
(1)在名称为Forml的窗体上添加一个名称为Commandl的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:
①设置适当属性,使对话框的标题为“打开文件”;
②设置适当属性,使对话框的“文件类型”下拉式组合框中有两项可供选择:“文本文件”、“所有文件”(如图所示),默认的类型是“所有文件”;
③编写命令按钮的事件过程,使得单击按钮可以弹出“打开文件”对话框。
要求:程序中不得使用变量,事件过程中只能写入一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
(2)在名称为Forml的窗体上添加一个名称为Commandl的命令按钮,其标题为“移动本按钮”,如图所示。
要求编写适当的事件过程,使得程序运行时,每单击按钮一次,按钮向左移动100。
要求:程序中不得使用变量,事件过程中只能写入一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:新建一个窗体,按照要求建立控件并设置其属性,如图4.21所示。程序中用到的控件及属性见表4.13。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Commandl_Click() CD1.ShowOpen’显示打开文件时话框 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:新建一个窗体,按照要求建立控件并设置相应属性如表4.14所示。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Command1_Click() Commandl.Left=Commandl.Left-lOO End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)通用对话框是一种ActiveX控件。在一般情况下,启动Visual Basic后,在工具箱中没有通用对话框控件。为了把通用对话框控件加到工具箱中,其操作步骤如下:执行“工程”菜单中的“部件”命令,打开“部件”对话框,在对话框中,选择“控件”选项卡,然后在控件列表框中,选择“MicrosoftCommon Dialog Control 6.0”,再单击“确定”按钮,通用对话框立即被加到工具箱中。通用对话框的属性可以在属性窗口中直接设置。
当通用对话框显示为“打开”或“另存为”类型时,其FileName属性用于返回或设置所选的文件的路径和文件名。Filter(过滤器)属性用于指定在对话框的文件列表中显示文件的类型。语法为“对象名.Filter=‘描述|文件扩展名’”。
打开顺序文件的基本格式为“Open FileNameFor Mode As#FileNumber”。FileName表示要打开的文件的路径;Mode为打开模式,OutPut用于输出、Append用于追加写入、Input用于读取;FileNumber为打开文件时指定的句柄。
(2)在Visual Basic中,通过代码使命令按钮向左移动100,需要用到按钮的Left属性,使其值在每单击一次按钮时减去100。
转载请注明原文地址:https://kaotiyun.com/show/BqUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面的程序运行时,单击窗体后,窗体上显示的结果是()。PrivateSubForm_Click()Dima(1To6)AsIntegerDimmin1%,i%,j%,n%,t%,k%a(1)=8:a(2)=6:a(3)=9:a(4
在文本框控件中,将Text的内容全部显示为用户所定义的字符的属性是()。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Fori=1To4X=4Forj=1To3X=3Fork=1To2X=X+6NextkNextj,iPrintxEnd
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写()。PrivateSubCommand1_Click()DiminDataAsStringText1.T
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。Functionprime(aAsInteger)AsBooleanDimkAsInteger,isprimeAsBooleanIfa<2Then
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0doUnti1x=-1a=InputBox("请输入a的值")a=Val(a)b=InputBox("请输入b的值")b=Val(
在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键,它们称为该表的()。
随机试题
Inancienttimesthemostimportantexaminationswerespoken,notwritten.IntheschoolsofancientGreeceandRome,testingus
肺痈患者的饮食护理中,下列哪项是错误的:
负责静脉用药医嘱或处方适宜性审核的人员应当具有的资质是
中国古代成文法典中的总则“名例律”自()中正式形成。
建设工程的保修期自工程()之日算起。
“对重大危险源的管理”是生产经营单位安全生产的( )保障措施。
某人民团体有A、B两栋办公楼,A占地3000平方米,B占地1000平方米。2014年3月30日至12月31日该团体将B栋出租。当地城镇土地使用税的税率为每平方米15元,该团体2014年应缴纳城镇土地使用税()。
关于地球公转的正确叙述是()。
Thebestwaytopassanexaminationistoworkhardalltheyearround.Youshouldreadoverthequestionpapersverycarefully
A、Aspacerocketcanonlybeusedonce.B、Thepilotcanflyaspaceplanejustlikeanordinaryplane.C、Aspacerockettravels
最新回复
(
0
)