位置:首页 > 题库频道 > 其它分类 > 计算机其它 > 二级二级VB2002年9月全国计算机等级考试二级VB真题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then xit forNextText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是

发布时间:2024-07-09

A.2

B.3

C.4

D.5

试卷相关题目

  • 1在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim x As Integer,n As Integerx=1n=0Do While x<20x=x*3n=n+1LoopText1.Text=Str(x)Text2.Text=Str(n)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别是

    A.15和1

    B.27和3

    C.195和3

    D.600和4

    开始考试点击查看答案
  • 2图像框有一个属性,可以自动调整图形的大小,以适应图像框的尺寸,这个属性是

    A.Autosize

    B.Stretch

    C.AutoRedraw

    D.Appearance

    开始考试点击查看答案
  • 3在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_Click() For I=1 To 4 For J=0 To 1 Print Chr$(65+I); Next J Print Next IEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是

    A.BBCCDDDDEEEEE

    B.ABBCCCDDDD

    C.BCCDDDEEEE

    D.AABBBCCCCDDDDD

    开始考试点击查看答案
  • 4为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是

    A.Value

    B.Default

    C.Cancel

    D.Enabled

    开始考试点击查看答案
  • 5在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”;一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中,则能够实现上述要求的语句序列是

    A.Option1.value=TrueCheck1.Value=False

    B.Option1.Value=TrueCheck1.Value=True

    C.Option2.Value=FalseCheck1.Value=True

    D.Option1.Value=TrueCheck1.Value=1

    开始考试点击查看答案
  • 6在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10,10) As IntegerDim i,j As IntegerFor i=1 To 3For j=2 To 4array1(i,j)=i+jNext jNext IText1.Text=array1(2,3)+array1(3,4)End Sub程序运行后,单击命令按钮,在文本框中显示的值是

    A.12

    B.13

    C.14

    D.15

    开始考试点击查看答案
  • 7在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Command1_Click()Dim i As Integer,j As IntegerDim a(10,10)As IntegerFor i=1 To 3For j=1 To 3a(i,j)=(i-1)*3+jPrint a(i,j);Next jPrintNext jEnd Sub程序运行后,单击命令按钮,窗体上显示的是

    A.123246369

    B.234345456

    C.147258369

    D.123456789

    开始考试点击查看答案
  • 8设有如下程序:Option Base 0Private Sub Form_Click()Dim aDim i As Integera=Array(1,2,3,4,5,6,7,8,9)For i=0 To 3Print a(5-i);Next End Sub程序运行后,单击窗体,则在窗体上显示的是

    A.4 3 2 1

    B.5 4 3 2

    C.6 5 4 3

    D.7 6 5 4

    开始考试点击查看答案
  • 9下列叙述中正确的是

    A.在窗体的Form_Load事件过程中定义的变量是全局变量

    B.局部变量的作用域可以超出所定义的过程

    C.在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程

    D.在调用过程时,所有局部变量被系统初始化为0或空字符串

    开始考试点击查看答案
  • 10在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述功能的代码是

    A.Private Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function

    B.Private Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd Function

    C.Private Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfEnd Function

    D.Private Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function

    开始考试点击查看答案
返回顶部