首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,一个名称为Textl的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox(”输入数据”))
窗体上有一个名称为Commandl的命令按钮,一个名称为Textl的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox(”输入数据”))
admin
2019-06-11
145
问题
窗体上有一个名称为Commandl的命令按钮,一个名称为Textl的文本框。编写如下程序:
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 Mod 3=0 Then
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整除,若可以整除则将n翻倍,否则将n变为n的平方返回。在函数头部没有声明函数的返回值类型,默认为变体型,可以接受任何数据类型的赋值;ByRef表示参数按址传递,对形参的改变将会影响实参;当输入5的时候输出5+25+625=655;当输入6的时候输出6+12+24=42。
转载请注明原文地址:https://kaotiyun.com/show/78Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了下面的程序PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=InputBox("请输入整数"):b=InputBox("请输入整数")proa:probCallp
对于长度为n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是
某二叉树共有7个结点,其叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)
设有如下关系表:则下列操作中正确的是
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click()m=-3.6IfSgn(m)Thenn=Int(m)Elsen=Abs(m)EndIfPrintnEndSub运
下列选项中不属于软件生命周期开发阶段任务的是
下面不属于软件工程过程的4种基本活动
假设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
以下()操作不能触发滚动条Change事件。
随机试题
结合实际论述影响随机样本容量的大小的因素。
脘腹痞闷,食少难消,大便溏薄,倦怠乏力,苔腻萎黄,脉虚弱者,治宜选用()
A、清热润肠通腑胃B、顺气行滞C、养血润燥D、温通开秘E、补气行滞津枯血燥型便秘的治法是
政策性银行应()。
下列合同计价方式中,建设单位容易控制造价,施工承包单位风险大的是()。
背景材料:某动力站安装工程项目,该动力站的散装锅炉施工主要包括锅炉钢构架、锅筒与集箱、受热面管束胀管、省煤器、空气预热器、过滤器和炉排、锅炉安全附件的安装;对锅炉本体、管道和阀门的试验以及烘炉与煮炉。该工程施工项目经理部在施工过程中对所耗费的生产资料和生
在财产保险合同中,( )允许保险单随保险标的所有权的转移而自动转让,无须征得保险人的同意而继续有效。
中国居民纳税人王伟2005年8月取得以下8项所得,计算每项收入应缴纳的所得税。出租家中富余的汽车一辆,取得租金2000元;()元
流动资产投资管理的核心问题是()。
(Agreatmanyteachers)(firmly)believeEnglishisoneofthe(poorest-taught)subjectsinhighschools(atpresent).
最新回复
(
0
)