首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为CD1的通用对话框,并设置属性使得在打开文件对话框时,其标题为“文件操作”,默认路径为c盘根目录;再画2个命令按钮,名称分别为Command1、Command2,标题分别为“读文件”、“选择颜色”。 请编写适当的事件过程,使得程
在窗体上画一个名称为CD1的通用对话框,并设置属性使得在打开文件对话框时,其标题为“文件操作”,默认路径为c盘根目录;再画2个命令按钮,名称分别为Command1、Command2,标题分别为“读文件”、“选择颜色”。 请编写适当的事件过程,使得程
admin
2020-08-10
47
问题
在窗体上画一个名称为CD1的通用对话框,并设置属性使得在打开文件对话框时,其标题为“文件操作”,默认路径为c盘根目录;再画2个命令按钮,名称分别为Command1、Command2,标题分别为“读文件”、“选择颜色”。
请编写适当的事件过程,使得程序运行时,单击“读文件”按钮后,可以利用CD1弹出打开文件对话框。单击“选择颜色”按钮,可以弹出颜色对话框。设计模式下的窗体外观如图所示。
存盘时,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。
选项
答案
新建一个窗体,在窗体上添加一个通用对话框控件,设置该控件的DialogTitle属性和lnitDir属性;再在窗体上添加两个按钮控件,分别设置按钮控件的Caption属性;最后分别在两个按钮的Click事件中编写代码实现题目要求。 通用对话框是一种Active控件,在一般情况下,启动VB 后,在工具箱中没有通用对话框控件。把通用对话框控件加到工具箱中的步骤为:执行“工程”菜单中的“部件”命令,打开“部件”对话框;在对话框中选择“控件”选项卡,然后在控件列表框中勾选“Microsoft Common DialcogContml 6.0”,单击“确定”按钮。通用对话框的属性可以在属性窗口中直接设置。 步骤1:新建一个窗体。 步骤2:在窗体上添加一个通用对话框控件,根据表3设置控件的相关属性。 [*] 步骤3:在窗体上添加两个按钮控件,根据表4分别设置两个控件的Caption属性。 [*] 步骤4:双击“读文件”按钮,在Command1的Click事件中根据题目要求编写代码。 Private Sub Command1_Click( ) GDI.ShowOpen End Sub 步骤5:双击“选择颜色”按钮,在Command2的Click事件中根据题目要求编写代码。 Private Sub Command2_Click( ) GDI.ShowColor End Sub 步骤6:调试并运行程序,关闭程序后按题目要求存量。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/XvHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
己知a=6,b=15,c=3,则语句PrintSgn(a+bMod6-c\a)&a+b的输出结果为
可设置文字字体为斜体的属性是()。
为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别为“读数据”和“统计”的命令按钮。请画两个标签,其名称分别是Label1和Label2,标题分别为“单词的平均长度为”和“最长单词的长度为”;再画两个名称分别为Text1和Text2、初
以下能对正实数d的第3位小数四舍五入的表达式是
算法的时间复杂度是指
线性表的长度为n。在最坏情况下,比较次数为n-1的算法是()。
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"Text1.SetFocusEndSubPrivateSubText1_GotF
算法的空间复杂度是指( )。
随机试题
指出常用的管路(流程)系统中的阀门图形符号()是“止回阀”。
计算下列矩阵的逆:.
下面不是造成充填中支架移位的原因是A.包埋的石膏强度不够B.未包牢或包埋有倒凹C.填塞时塑料过硬D.充填塑料不足E.支架本身焊接不牢
按五行属性分类.五化中属土者是
投标人在招标投标过程中,因违法行为所应承担的行政法律责任的方式有()。
在下列经济行为中,属于货币执行流通手段职能的是()。
两个4阶矩阵满足A2=B2,则
Howdidthemanspendhisvacation?
Tourismhelpstobetterintroducethecountrytoforeignersand____________(展于悠久的历史和灿烂的文化)totheoutsideworld.
Inmanycountriesseatbeltsarenowcompulsoryforthedriverandthefrontseatpassengeratleast.Doctorsbelievethats
最新回复
(
0
)