首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序功能为:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请在程序空白处填入适当内容使程序完整。 Sub PrintOut() Dim a As Integer a = MsgBox("输出结果?", vblnfo
下列程序功能为:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请在程序空白处填入适当内容使程序完整。 Sub PrintOut() Dim a As Integer a = MsgBox("输出结果?", vblnfo
admin
2013-04-11
28
问题
下列程序功能为:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请在程序空白处填入适当内容使程序完整。
Sub PrintOut()
Dim a As Integer
a = MsgBox("输出结果?", vblnformation + vbYesNo, "提示:")
If a = ______ Then
Print "Myresult"
End If
End Sub
选项
答案
vbYes(或6)
解析
MsgBox函数在对话框中显示消息,等待用户单击按钮,并返回一个Integer告诉用户单击哪一个按钮。返回值是一个整数,这个整数与选择的按钮有关,如下表所示。
转载请注明原文地址:https://kaotiyun.com/show/cihp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
程序执行结果S的值是【】。PrivateSubCommand1_click()i=0Doi=i+1s=i+sLoopUntili>=4P
窗体、图片框或图像框中的图形通过对象的【】属性设置。
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种:前序遍历、【】遍历和后序遍历。
编写如下事件过程:PrivateSubFormMouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6A
若在Shape控件内以FillStyle属性所指定的图案填充区域,而填充图案的线条的颜色由FillColor属性指定,非线条的区域由BackStyle属性填充,则应______。
用Write和Print语句向文件中写入多个数据的差别在于______。
在窗体上画一个命令按钮,然后编写如下事件过程:OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4)j=1
文件列表框控件的______属性用来确定在列表框中显示的文件类型。
数据库管理系统常见的数据模型有层次模型、网状模型和【】3种。
在窗体上画1个文本框(名称为Text1,初始内容为空白,字体大小为12,允许多行显示)和1个命令按钮(名称为C1,标题为“存盘”),编写适当的事件过程。程序运行后,把考生文件夹下in.txt文件的内容读入内存,并在文本框中显示出来,如图3—1所示;然后在文
随机试题
Inthemeetingheldlastnightthevicepresidentrefusedtomakeanycommentonthematterbeforemakingdueinvestigation.
简述行政组织理论的研究意义。
我国《银行业从业人员职业操守》于()起正式通过并实施。
中国公民王某系国内某公司高级管理人员,2008年12月的收入情况如下:(1)当月工资薪金收入8000元(已扣除“三险一金”等免税项目金额),全年一次性奖金收入20000元。(2)从所任职公司取得股息红利收入10000元。(3)从某杂志社取得发表
某市大型商贸公司为增值税一般纳税人,兼营商品加工、批发、零售和进出口业务,2009年12月相关经营业务如下:(1)进口化妆品一批,支付国外的买价220万元、由本公司负担的包装材料费用6万元、国外的经纪费4万元;支付运抵我国海关地前的运输费用20万
在中国减少疾病危险的声称属于保健食品管理。()
快递公司服务范围即服务网络能覆盖或到达的范围,是衡量快递公司竞争力的最重要因素,也是快递企业提供快递服务的物质基础,服务范围决定了快递公司快件所能到达的服务区域,对于客户来说,快递公司能提供的服务范围当然是越大越好。以下哪项如果为真,不能支持上述判断?(
以下关于中国古代医学,说法不正确的是()。
有以下程序intadd(inta,intb){return(a+b);}main(){intk,(*f)(),a=5,b=10;f=-add;}
CultureShockCultureshockisapainfulexperiencewegothroughwhenweencountermanynewthingsinanothercountryandw
最新回复
(
0
)