刷题宝
  • 刷题首页
题库 高中信息

题干

function abc( n as integer) as integer
Abc=n*5+10
End function
Private sub form_click()
Dim x as integer
X=abc(2)+100* abc(1)
Print x
End sub
A.2B.1520C.1500D.700
上一题 下一题 0.99难度 选择题 更新时间:2019-09-06 12:28:25

答案(点此获取答案解析)

同类题1

VB程序中的赋值语句“x=x+1”是合法的。(  )
A.正确B.错误

同类题2

将表达式8=9的结果赋给变量x的是(    )
A.x=8:x=9B.x=8=9
C.8=9=xD.x=8 And x=9

同类题3

某VB程序的一个事件过程如下:
Private sub command1_click( )
Dim i as integer
Dim a(1 to 8 ) as integer
List1.clear
For i="1" to 99
a(i)=i+1
Next i
For i="1" to 8
list1.AddItem   str(a(i))
Next i
End sub
程序运行时,单击命令按钮command1后,将会出现的提示信息是 ( )
A.溢出B.下标越界
C.类型不匹配D.无效的过程调用或参数

同类题4

一个完整的Visual Basic块If语句如下,则划线处应填入的语句是(    )
If a>b then
Max=a

Max=b
End if
A.ElseB.End ifC.Else ifD.If

同类题5

“如果a,b中任意一个为0,那么y=y+l”。能实现该功能的VB语句是(   )
A.If a="0" And b="0" Then y=y+1
B.If a*b="0" Then y=y+1
C.If a="0,b=0" Then y=y+1
D.If a,b="0" Then y=y+1
相关知识点
  • 算法理论
  • 面向对象程序设计 VB开发工具
  • 赋值语句
  • 过程和自定义函数
刷题宝 没有分数是刷题提高不了的! 粤ICP备12066032号

本站仅为免费收集试题提供给学生刷题,不做任何盈利性活动!如无意侵犯您的合法权益,联系站长删除处理(QQ:2572127418)