首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Function Func(ByVal x As Integer,y As Integer) y=x*y If y>0 Then Func=x
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Function Func(ByVal x As Integer,y As Integer) y=x*y If y>0 Then Func=x
admin
2009-01-15
70
问题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Function Func(ByVal x As Integer,y As Integer) y=x*y If y>0 Then Func=x Else Func=y End If End Function Private Sub Command1_Click() Dim a As Integer,b As Integer a=3 b=4 c=Func(a,B)Print"a=";a Print"b=";b Print"C=";c End Sub 程序运行后,单击命令按钮,其输出结果为:_______。
选项
A、a=3 b=12 c=3
B、a=3 b=4 c=3
C、a=3 b=4 c=12
D、a=13 b=12 c=12
答案
1
解析
函数Func(3,4)的返回值为3,故c的值为3。由于参数x是按值传递的,a的值仍为3;而参数y是按地址传递的,b的值变为3*4。
转载请注明原文地址:https://www.kaotiyun.com/show/tq2p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序打包到example包,main方法调用线程类输出0~9这10个数,请填写横线处的内容。注意:请勿改动main()主方法和其他已有语句内容,仅在横线处填入适当语句。______interfaceMyInterface
关于以下程序段,正确的说法是()。 (1)Strings1="abc"+"def"; (2)Strings2=newString(s1); (3)if(s1.equals(s2)) (4)System.out.p
下列()可能包含菜单条。
用链表表示线性表的优点是()。
下面是一个Applet程序,其功能是绘制三维矩形以使该矩形面凹下,并将图像放入凹下的矩形面中。请改正程序中的错误(有下划线的语句),使程序能输出正确的结果。注意:不改动程序的结构,不得增行或删行。源程序文件代码清单如下:import
下面Applet程序的功能是统计在平面坐标系中第一象限中,半径大于9,小于10的圆环中坐标值为整数的点有多少?并且给出其坐标值.请改正程序中的错误(有下划线的语句),使程序执行后,能得到预期的结果。注意:不改动程序的结构,不得增行或删行。程
下面是一个Applet程序,其功能是接收用户输入的两个整数,比较它们的大小,并在用户按下“比较大小”按钮后,将Applet中显示的“请先输入两个待比较的整数”,改为“两个整数中最大值是:x”,x是两个数中的最大值。请改正程序中的错误(有下划线的语句),使
栈底至栈顶依次存放元素A、B、c、D,在第五个元素E入栈前,栈中元素可以出栈,则出栈序列可能是
数据处理的最小单位是()。
随机试题
高新技术在医疗卫生应用中的伦理问题是()
病人先见高热口渴,汗出,后出现消瘦,面色淡白,气短乏力,脉细无力,证属
子宫迟缓时不能使用下列哪种方法?()
能敛肺,涩肠,止痛的药是能敛肺,涩肠,安蛔的药是
具有文明的语言习惯,该目标属于《3—6岁儿童学习与发展指南》语言子领域中的()。
2018年3月5日中华人民共和国第()届全国人民代表大会第一次会议在北京召开,听取国务院总理李克强关于政府工作的报告。
金融危机从发生到蔓延,经济学家先后用英文字母V、U、L、W的形状来为世界经济走势画像。这传达一个信息:金融危机现象复杂、形势严峻,即使是受过专门训练的经济学家也难以做到“一叶知秋”,这说明()。
将党在抗日战争时期实行的减租减息政策改变为实行“耕者有其田”政策的是()
Thereseemsnevertohavebeenacivilizationwithouttoys,butwhenandhowtheydevelopedisunknown.Theyprobablycameabout
InatotalofsixstatesinthemiddleofAmerica,15,000assembly-lineworkersare【C1】______Japanesecarstogether.Theseautow
最新回复
(
0
)