首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下: Private Sub Command1_Click() Dim x As Integer,y As Integer x=Val(InputBox("输入整数")) y=Val
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下: Private Sub Command1_Click() Dim x As Integer,y As Integer x=Val(InputBox("输入整数")) y=Val
admin
2016-09-19
76
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=Val(InputBox("输入整数"))
y=Val(InputBox("输入整数"))Print Str(fun(x,y)+x+y)
End Sub
Private Function fun(ByRef m As Integer,ByVal n As Integer)
m=m*m:n=n+n:fun=m+n
End Function
运行程序,单击命令按钮时,出现输入对话框,分别输入3、5,则窗体上显示的是
选项
A、27
B、28
C、33
D、38
答案
C
解析
在Visual Basic中调用过程时,参数有两种传递形式:按值传递(Byval)和按址传递(Byref),默认为按址传递。其中,当参数按址传递时,如果在引用该参数的过程中改变了形参的值,同时也就改变了传递参数时实参变量的值。本题中fun的参数m是按地址传递的,n是按值传递的,因此在f中对m的改变会影响实参x,对n的操作不会影响实参y,即输出的是Str(19+9+5)="33"。
转载请注明原文地址:https://www.kaotiyun.com/show/IOLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
将一个窗体设置为MDI子窗体的方法是
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:DimSWAsBooleanFunctionfunc(XAsInteger)AsInteger IfX<20Then Y=X
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsInteger x=5 y=7
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为PrinvateSubComandl_Click() Fori=1To4 x=4 Forj=1To3
编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode)EndSubPrivateSubFo
事件的方法是用于______。
我们可以在设计时(属性窗口中)和运行时(程序代码中)设置属性的值,以下关于属性设置的说法正确的是()。
当用户()时,会引发焦点所在控件的KeyPress事件。
在窗体上绘制一个名称为Label1的标签,然后编写如下事件过程:PrivateSubForm_Click() Dimarr(10,10)AsInteger DimiAsInteger,jAsInteger
随机试题
=________.
______theirsuggestions,wewilldiscussthemfullyatthenextmeeting.
《中国药典》规定配制标准缓冲液和供试品溶液的水应是新沸过的冷蒸馏水,其pH值应为
断肢保存需要干燥冷藏温度要求在
最先提出“不伤害原则”的西方医学家是()
所有权的客体仅限于财物,而且该财务必须是()。
下列关于固定资产取得时的账务处理,正确的有()。
从整体上看,人类的智方分布基本呈现为()。
如图所示,在边长为24的正方形ABCD上,减去阴影部分四个全等的等腰直角三角形,再沿虚线折起,恰好折成一个立方体包装盒。这个包装盒容积最大为:
Java语言的【】包是编译器自动导入的,因此,编程时使用该包中的类,可省去import导入。
最新回复
(
0
)