计算机二级VB考试题及答案
计算机二级VB考试题及答案
  为了使广阔考生在备战计算机等级考试时，更快的掌握相应知识点，下面是搜索的计算机二级VB考试题及答案，供参考练习，预祝考生们考出自己理想的成绩!
  1.在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：
  Private Sub Command1Click( )
  n = Val(Text1.Text)
  If n2 = n/2 Then
  f = f1(n)
  Else
  f = f2(n)
  End If
  Print f; n
  End Sub
  Public Function f1(ByRef x)
  x=x*x
  f1=x+x
  End Function
  Public Function f2(ByVal x)
  x=x*x
  f2=x+x+x
如何设置文件夹权限  End Function
  程序运行后，在文本框中输入3，然后单击命令按钮，窗体上显示的是(D)(单)
  A.72 36
  B.108 36
  C.72 6
  D.27 3
  2.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
  Private Sub Command1Click( )
  c = "1234"
中国运动品牌  For i = 1 To 4
  c1 = Trim(Str( ))
  Print c1
  Next i
  End Sub
  程序运行后，单击命令按钮，要求在窗体上显示如下内容
  1
  12
  123
  1234
  那么在下划线处应填入的内容为(B)(单)
  A.Right(c1,i)
  B.Left(c1,i)
  C.Mid(c1,i,1)
  D.Mid(c1,i,i)
  3.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：
六年级演讲稿  Private Sub Command1Click( )
  n = Val(Text1.Text)
  For i = 2 To n
  For j = 2 To sqr(i)
  If i Mod j = 0 Then Exit For
  Next j
  If j >Sqr(i) Then Print i
  Next i
  End Sub
  该事件过程的功能是(C)(单)
  A.输出n以内的奇数
  B.输出n以内的偶数
  C.输出n以内的素数
我的世界皮肤怎么用
  D.输出n以内能被j整除的数
  4.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：
  Private Function f(m As Integer)
  If m Mod 2 = 0 Then
  f = m 保护环境的宣传语
  Else
  f = 1
  End If
  End Function
  Private Sub Command1Click( )
  Dim i As Integer
  s = 0
  For i = 1 To 5
  s = s + f(i)
  Next
海南省旅游
  Print s
  End Sub
  程序运行后，单击命令按钮，在窗体上显示的是(C)(单)
  A.11
  B.10
  C.9
  D.8
  5.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
  Private Sub Command1Click( )
  Dim array1(10, 10) As Integer
  Dim i As Integer, j As Integer
  For i = 1 To 3
  For j = 2 To 4
  array1(i, j) = i + j
  Next j
  Next i

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。