设有下列程序Private Sub Form Click( )X=50For i=1 T0 4y=InputBox("请输入一个整数")y=Val(v)If y Mod 5=0 Thena=a+yx=yElsea=a+xEnd IfNext iPrint aEnd Sub程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为( )。
A.100
B.50
C.120
D.70
试卷相关题目
- 1下面程序运行时,若输入“Visual Basic Prograrmming”,则在窗体上输出的是( )。Private Sub Command1Click( )Dim cout(25)As Integer,ch As Stringch=Ucase(Int,utBox("请输入字母字符串"))For k=1 To i en(ch).n=ASC(Mid(ch,k,1))-Asc("A")If n>=0 Thencount(n)=count(n)+1End IfNext km=count(0)For k=1 To 25If m<COUNT(K)THENm=count(k)End IfNext kPrint mEnd Sub
A.0
B.1
C.2
D.3
开始考试点击查看答案 - 2下列关于栈的叙述正确的是( )。
A.栈顶元素最先能被删除
B.栈顶元素最后才能被删除
C.栈底元素永远不能被删除
D.以上三种说法都不对
开始考试点击查看答案 - 3窗体上有一个名为Command1的命令按钮,并有如下程序:Private Sub Command1Click( )Dim a(10),x%Fork=1 To 10a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Next kPrint XEnd Sub程序运行后,单击命令按钮,输出结果是( )。
A.10个数中奇数的个数
B.10个数中偶数的个数
C.10个数中奇数的累加和
D.10个数中偶数的累加和
开始考试点击查看答案 - 4设X是整型变量,与函数IIf(x>0,-x,x)有相同结果的代数式是( )。
A.|X|
B.-|X|
C.X
D.-X
开始考试点击查看答案 - 5下列不能扫开菜单编辑器的操作是( )。
A.按“Ctrl+E”组合键
B.单击工具栏中的“菜单编辑器”按钮
C.执行“工具”菜单中的“菜单编辑器”命令
D.按“Shift+AIt+M”组合键
开始考试点击查看答案 - 6下面正确使用动态数组的是( )。
A.Dim arr( )As Integer…ReDim arr(3,5)
B.Dim arr( )As Integer…ReDim arr(50)As String
C.Dim arr( )…RcDim arr(50)As Integer
D.Dim arr(50)AS Integer…ReDim arr(20)
开始考试点击查看答案 - 7在窗体上面有一个命令按钮,然后编写如下事件过程:Private Sub Command1 Click( )MsgBox Str(123+321)End Sub程序运行后,单击命令按钮,则在信息框中显示的提示信息为( )。
A.字符串“123+321”
B.字符串“444”
C.数值“444”
D.空白
开始考试点击查看答案 - 8窗体上有一个名称为Command1的命令按钮,其单击事件过程及有关函数过程如下:Private Sub Command1 Click( )Dim n As Integern=add(5,10)Print nEnd SubFunction add(v1 As Integer,v2 As Integer,Optiona1 v3)As IntegerIf Not IsMissing(v3)Thenadd=v1+v2+v3Elseadd=v1+v2End IfEnd Function运行程序,单击命令按钮,以下叙述中正确的是( )。
A.程序不能正常运行,因为函数add的参数定义有错
B.程序不能正常运行,因为函数定义与函数调用语句的参数个数不匹配
C.程序能正常运行,结果是在窗体上显示15
D.程序能正常运行,结果是在窗体上显示510v3
开始考试点击查看答案 - 9以下叙述中正确的是( )。
A.窗体及窗体上所有控件的事件过程代码都保存在窗体文件中
B.在工程中只有启动窗体可以建立菜单
C.窗体名称必须与窗体文件的名称相同
D.程序一定是从某个窗体开始执行的
开始考试点击查看答案 - 10窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器,并有下面的事件过程:Private Sub Command1_Click( )Timer1.Enabled=TrueEnd SubPrivate Sub Form_Load( )Timer1.Interval=10Timer1.Enabled=FalseEnd SubPrivate Sub Timer1 Timer( )Command1.Left=Command1.Left+10End Sub程序运行时,单击命令按钮,则产生的结果是( )。
A.命令按钮每10秒向左移动一次
B.命令按钮每10秒向右移动一次
C.命令按钮每10毫秒向左移动一次
D.命令按钮每10毫秒向右移动一次
开始考试点击查看答案
最新试卷
注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它