首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("输入数据")) Text1=Str(x+
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("输入数据")) Text1=Str(x+
admin
2020-04-18
39
问题
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序:
Private Sub Command1_Click()
Dim x As Integer
x=Val(InputBox("输入数据"))
Text1=Str(x+fun(x)+fun(x))
End Sub
Private Function fun(ByRef n As Integer)
If n Mod3=0Then
n=n+n
Else
n=n*n
End If
fun=n
End Function
对于上述程序,以下叙述中错误的是( )。
选项
A、语句fun=n有错,因为n是整型,fun没有定义类型
B、运行程序,输入值为5时,文本框中显示655
C、运行程序,输入值为6时,文本框中显示42
D、ByRef表示参数按址传递
答案
A
解析
过程fun的功能是将传入的值运算后返回,当传入数值为3的整数倍时返回该值的2倍,否则返回该值的平方。过程Fun的参数指定为:ByRef方式,即按址传递,因此会影响实参的值。Str函数是将数值转换为字符串。过程fun定义时没有指明返回类型因此默认为Variant类型,它可以表示任何值,因此A)选项的说法不正确。
转载请注明原文地址:https://jikaoti.com/ti/62x0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下能够正常结束循环操作的程序段是
以下关于变量作用域的叙述中,错误的是
有如下过程代码:Subvar_dim()StalicnumaAsIntegerDimnumbAsIntegernuma=numa+2numb=n
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮.然后编写如下事件讨程,PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori=
使用()方法,可清除列表框中所有的列表项。
要求在程序运行时,如果按住鼠标左键不放而移动鼠标,鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中,如右图所示,放开鼠标左键后,停止同步显示。下面可以实现此功能的程序是( )。
下列关于栈的叙述中,正确的是
在一棵二叉树上,第5层的结点数最多是()。
下列控件属性中,属性值的类型不相同的一项是()。
设某二叉树的前序序列与中序序列均为ABCDEFGH,则该二叉树的后序序列为
随机试题
上消化道是指()
某商业中心地上4层、地下1层,建筑高度为20m,耐火等级一级,每层层高均为5m,每层建筑面积均为10000m2,按有关国家工程建设消防技术标准配置了自动喷水灭火系统、火灾自动报警系统等消防设施及器材。某歌舞厅位于该商业中心的地下一层至地上四层,每
金融衍生工具的基本特征是()。Ⅰ.跨期性Ⅱ.杠杆性Ⅲ.联动性Ⅳ.高风险性
根据贷款用途的不同,()可以分为个人经营专项贷款和个人经营流动资金贷款。
2007年7月5日,甲授权乙以甲的名义将甲的一台笔记本电脑出售,价格不得低于8000元。乙谎称该电脑属于自己,以6000元的市场价将电脑卖给了不知情的丙并交付。根据合同法律制度的规定,下列说法中,不正确的有()。
行政处罚是指行政机关依法对违反行政管理秩序的公民、法人或其他组织给予制裁的行政行为。据此,下列属于行政处罚的是:
设总体X服从标准正态分布,(X1,X2,…,Xn)为总体的简单样本,则().
有以下程序:#include<stdio.h>main(){inti,j,k,a=5,b=6;i=(a==b)?++a:--b;j=a++;k=b;printf("%d,%d,%d\n",i,j,k);}程序的运行结果是()。
Everyoneofuslivesandworksonasmallpartoftheearth’ssurface,movesinasmallcircle,andoftheseacquaintanceskno
Weshowldn’tdothatdangerousexperiment______theteacheriswithus.
最新回复
(
0
)