窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command1_Click()Dim a As Integer, b As Integera = 8b = 12Print fun(a, b); a; bEnd SubPrivate Function Fun(ByVal a As Integer, b As Integer) As Integera = a Mod 5b = b 5Fun = aEnd Function程序运行时,单击命令按钮,则输出结果是( )。
A.3 3 2
B.3 8 2
C.8 8 12
D.3 8 12
试卷相关题目
- 1设窗体上有一个名为Listl的列表框,并编写下面的事件过程:Private Sub Listl_Click()Dim ch As Stringch=Listl.List(Listl.ListIndex)List1.RemoveItem List 1.ListIndex -List1.AddItem chEndSub程序运行时,单击一个列表项,则产生的结果是( )。
A.该列表项被移到列表的最前面
B.该列表项被删除
C.该列表项被移到列表的最后面
D.该列表项被删除后又在原位置插入
开始考试点击查看答案 - 2窗体上有一个名为Commandl的命令按钮和一个名为Timerl的计时器,并有下面的事件过程:Private Sub Command1_Click()Timerl.Enabled=TrueEndSubPrivate Sub Form_Load()Timerl.Interval=10Timerl.Enabled=FalseEnd SubPrivate Sub Timerl_Timer()Commandl.Left=Commandl.Left+10End Sub程序运行时,单击命令按钮,则产生的结果是( )。
A.命令按钮每10秒向左移动一次
B.命令按钮每10秒向右移动一次
C.命令按钮每10毫秒向左移动一次
D.命令按钮每10毫秒向右移动一次
开始考试点击查看答案 - 3窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command1_Click()Dim a(10), x%For k = 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在窗体上画一个名为Command1的命令按钮,然后编写以下程序:Private Sub Command1_Click()Dim a(10) As IntegerFor k = 10 To 1 Step -1a(k) = 20 - 2 * kNext kk = k + 7Print a(k - a(k))End Sub运行程序,单击命令按钮,输出结果是( )。
A.18
B.12
C.8
D.6
开始考试点击查看答案 - 5阅读程序:Private Sub Command1_Click()Dim arrDim i As Integerarr = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10)For i = 0 To 2Print arr(7 - i);NextEnd Sub程序运行后,窗体上显示的是( )。
A.8 7 6
B.7 6 5
C.6 5 4
D.5 4 3
开始考试点击查看答案 - 6为了从当前文件夹中读入文件File1.txt,某人编写了下面的程序:Private Sub Command1_Click()Open "File1.txt" For Output As #20Do While Not EOF(20)Line Input #20, ch$Print chLoopClose #20End Sub程序调试时,发现有错误,下面的修改方案中正确的是( )。
A.在Open语句中的文件名前添加路径
B.把程序中各处的“20”改为“1”
C.把Print ch语句改为Print # 20,ch
D.把Open语句中的Output改为Input
开始考试点击查看答案
最新试卷
注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它