编写如下程序： Private Sub Command1_Click() Dim x As Integer x = 10 Print fun1(x, 12) + x End Sub Private Function fun1(m As I

admin2020-07-22 39

问题编写如下程序：
Private Sub Command1_Click()
Dim x As Integer
x = 10
Print fun1(x, 12) + x
End Sub
Private Function fun1(m As Integer, n As Integer) As Integer
If n > 10 Then m = n
fun1 = m + n
End Function
程序运行后，单击命令按钮Command1，输出结果为

选项 A、30
B、32
C、34
D、36

答案D

解析 Function fun1函数中的参数都是引用传递，会改变实参的值，执行完后Command1_Click中变量x的值为12。选D）。

转载请注明原文地址:https://www.kaotiyun.com/show/P3Hp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

在窗体上有两个文本框：Text1和Text2，然后编写如下事件过程：PrivateSubForm_Load()ShowText1．Text＝""：Text2．Text＝""：Text2．SetFocusEnd
有如下程序：PrivateSubForm_Click()DimSAsInteger，pAsIntegerp=1Fori=1To4Fori=1Tois=s+jNex
有下面程序代码：PrivateSubCommand1_Click()Fork=5To1Step-1x=k+x*10NextkPrintxEndSub程序运行后，单击命令按钮Command1，输出结果是()。
假定有如下程序：PrivateSubForm_Click()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1：J=J+N*(N+11)
下面程序运行时，若输入395，则输出结果是PrivateSubCommand1_Click()Dimx％x=InputBox("请输入一个3位整数")PrintxMod10，x＼100，(xMod100)＼10EndSu
A、选择B、投影C、自然连接D、并A由关系R到关系S为一元运算，排除C和D。关系S是关系R的一部分，是通过选择之后的结果，因此选A。
设R是一个2元关系，有3个元组，S是一个3元关系，有3个元组。如T=R×S，则T的元组的个数为()。
一棵二叉树中共有80个叶子结点与70个度为1的结点，则该二叉树中的总结点数为
在一棵二叉树上，第5层的结点数最多是()。
线性表的长度为n。在最坏情况下，比较次数为n一1的算法是()。

随机试题

2003年某县发生急性出血性结膜炎流行，当地有关部门采取了相应措施，其措施有效的是
关于施工企业安全费用的说法，正确的是()。
阅读下列程序，给出运行结果。main(){intk=8：switch(k){case?9：k+=1：case10：k+=1：case11：k+=1；break：default：k+=1：}printf(“％dkn”，k
"Igotcancerinmyprostate."DetectiveAndySipowiczofthefictional15thPrecinct,astoic,bigbearofaman,isclearlyin
动物采食后血糖浓度()
国际多式联合运输是以至少两种不同的运输方式将货物从一国境内接受货物的地点运至另一国境内指定交付货物的地点的运输，它由()。
“情人眼里出西施”反映了决策过程中常见的()。
现在很多人的名片上有很多头衔．对于这种头衔膨胀的现象你怎么看?
新形势下党的思想宣传工作的使命任务是：
Mr.Smithisbookingatourforaladyandhimselfatatravelagency.

最新回复(0)

编写如下程序： Private Sub Command1_Click() Dim x As Integer x = 10 Print fun1(x, 12) + x End Sub Private Function fun1(m As I

二级VB

NCRE全国计算机二级

在窗体上有两个文本框：Text1和Text2，然后编写如下事件过程：PrivateSubForm_Load()ShowText1．Text＝""：Text2．Text＝""：Text2．SetFocusEnd

有如下程序：PrivateSubForm_Click()DimSAsInteger，pAsIntegerp=1Fori=1To4Fori=1Tois=s+jNex

有下面程序代码：PrivateSubCommand1_Click()Fork=5To1Step-1x=k+x*10NextkPrintxEndSub程序运行后，单击命令按钮Command1，输出结果是()。

假定有如下程序：PrivateSubForm_Click()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1：J=J+N*(N+11)

下面程序运行时，若输入395，则输出结果是PrivateSubCommand1_Click()Dimx％x=InputBox("请输入一个3位整数")PrintxMod10，x＼100，(xMod100)＼10EndSu

A、选择B、投影C、自然连接D、并A由关系R到关系S为一元运算，排除C和D。关系S是关系R的一部分，是通过选择之后的结果，因此选A。

设R是一个2元关系，有3个元组，S是一个3元关系，有3个元组。如T=R×S，则T的元组的个数为()。

一棵二叉树中共有80个叶子结点与70个度为1的结点，则该二叉树中的总结点数为

在一棵二叉树上，第5层的结点数最多是()。

线性表的长度为n。在最坏情况下，比较次数为n一1的算法是()。

2003年某县发生急性出血性结膜炎流行，当地有关部门采取了相应措施，其措施有效的是

关于施工企业安全费用的说法，正确的是()。

阅读下列程序，给出运行结果。main(){intk=8：switch(k){case?9：k+=1：case10：k+=1：case11：k+=1；break：default：k+=1：}printf(“％dkn”，k

"Igotcancerinmyprostate."DetectiveAndySipowiczofthefictional15thPrecinct,astoic,bigbearofaman,isclearlyin

动物采食后血糖浓度()

国际多式联合运输是以至少两种不同的运输方式将货物从一国境内接受货物的地点运至另一国境内指定交付货物的地点的运输，它由()。

“情人眼里出西施”反映了决策过程中常见的()。

现在很多人的名片上有很多头衔．对于这种头衔膨胀的现象你怎么看?

新形势下党的思想宣传工作的使命任务是：

Mr.Smithisbookingatourforaladyandhimselfatatravelagency.