首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("输入数据")) Text1=
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("输入数据")) Text1=
admin
2018-12-20
50
问题
窗体上有一个名称为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 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的整数倍时返回该值的2倍,否则返回该值的平方。过程Fun的参数指定为ByRef方式,即按址传递,因此会影响实参的值。Str函数是将数值转换为字符串。过程fun定义时没有指明返回类型因此默认为Variant类型,它可以表示任何值,因此A)选项的说法不正确。
转载请注明原文地址:https://kaotiyun.com/show/qAFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个通用对话框,其名称为CommonDialog1,则下列与CommonDialog1.ShowOpen方法等效的语句是( )。
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:PrivateSubcommand1_Click() Dimn IfText1.Text"123456"Then n=n+1 Print"口令输入
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈,然后再依次出栈,则元素出栈的顺序是
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是( )。
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是( )。
下面不能作为结构化方法软件需求分析工具的是()。
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为( )。
随机试题
古某2003年在外资企业工作,年薪6万元;利用业余时间在民营企业兼职,年薪3万元;购买股票分得红利2万元;出租住房收入2万元;转让自己开发的一项技术获得3万元收入。那么,按照我国现行劳动收入与非劳动收入的划分,古某2003年的劳动收人应计算为( )
患者男性,40岁,近4个月常感右下腹痛,伴间隙性腹泻,粪便呈糊状,无脓血便,食欲减退。查体:T37.5℃,消瘦,右下腹压痛(+),似可扪及边界欠清晰包块,杵状指。Hb89g/L,WBC12.5×109/L,ESR46mm/h,PPD试验:(一)。X
患儿,女,5个月。支气管肺炎,突然呼吸急促,面色苍白,烦躁不安,三凹征明显。心率185次/分,心音低钝,肝肋下3.8cm。该患儿可能并发了
第11胸椎的体表定位标志是
下列不属于海马和锁阳共有的功效是()
从实施管理的范围来看,()属于资源利用许可证
下列关于特殊的普通合伙企业的说法不正确的是?
场景中项目部对成本的控制过程,体现了()的基本方法论。派驻某施工现场的甲监理机构受建设单位委托对乙施工单位施工阶段的施工活动实施监理。甲监理机构旁站监理员王某发现乙施工单位在主体结构的施工中有违反工程建设强制性标准的行为,则旁站监理员王某(
房屋建设的地基基础工程和主体结构工程的最低保修期为()。
在VisualFoxPro中,使用SEEK命令查找匹配的记录,当查找到匹配的第一条记录后,如果还需要查找下一条匹配的记录,通常使用命令
最新回复
(
0
)