位置:首页 > 题库频道 > 其它分类 > 计算机其它 > 二级二级VB2009年9月全国计算机等级考试二级笔试试卷(Visual Basic语言程序设计)

在窗体上画1个命令按钮,并编写如下事件过程:Private Sub Command1_Click()For i=5 to 1 step -0.8Print Int(i);Next iEnd Sub运行程序,单击命令按钮,窗体上显示的内容为

发布时间:2024-07-09

A.5 4 3 2 1 1

B.5 4 3 2 1

C.4 3 2 1 1

D.4 4 3 2 1 1

试卷相关题目

  • 1有如下过程代码:Sub var_dim()Static numa As IntegerDim numb As Integernuma=numa+2numb=numb+1print numa;numbEnd Sub连续3次调用var_dim过程,第3次调用时的输出是

    A.2 1

    B.2 3

    C.6 1

    D.6 3

    开始考试点击查看答案
  • 2设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述正确的是

    A.程序运行时,若使滚动块向左移动,滚动条的Value属性值就增加

    B.程序运行时,若使滚动块向左移动,滚动条的Value属性值就减少

    C.由于滚动条的Max属性值下于Min属性值,程序会出错

    D.由于滚动条的Max属性值下于Min属性值,程序运行时滚动条的长度会缩为一点,滚动块无法移动

    开始考试点击查看答案
  • 3设窗体上有名称为Option1的单选按钮,且程序中有语句:If Options.Value=True Then下面语句中与该语句不等价的是

    A.If Option.Value Then

    B.If Option1=True Then

    C.If Value=True Then

    D.If Option1 Then

    开始考试点击查看答案
  • 4窗体上有名称为Command1的命令按钮和名称为Text1的文本框Private Sub Command1_Click()Text1.Text=”程序设计”Text1.SetFocusEnd SubPrivate Sub Text1_GotFocus()Text1.Text=”等级考试”End Sub运行以上程序,单击命令按钮后

    A.文本框中显示的是“程序设计”,且焦点在文本框中

    B.文本框中显示的是“等级考试”,且焦点在文本框中

    C.文本框中显示的是“程序设计”,且焦点在命令按钮上

    D.文本框中显示的是“等级考试”,且焦点在命令按钮上

    开始考试点击查看答案
  • 5在程序运行时,下面的叙述中正确的是

    A.用鼠标右键单击窗体中无控件的部分,会执行窗体的Form_Load事件过程

    B.用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程

    C.只装入而不显示窗体,也会执行窗体的Form_Load事件过程

    D.装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程

    开始考试点击查看答案
  • 6在窗体上画1个命令按钮,并编写如下事件过程:Private Sub Command1_Click()Dim a(3,3)For m=1 To 3For n=1 To 3If n=m Or n=4-m Thena(m,n)=0End IfPrint a(m,n);Next nPrintNext mEnd Sub运行程序,单击命令按钮,窗体上显示的内容为

    A.2 0 00 4 00 0 6

    B.2 0 40 4 04 0 6

    C.2 3 03 4 00 0 6

    D.2 0 00 4 50 5 6

    开始考试点击查看答案
  • 7设有以下函数过程Function fun(a As Integer,b As Integer)Dim c As IntegerIf a<b Thenc=a:a=b:b=cEnd Ifc=0Doc=c+aLoop Until c Mod b=0fun=cEnd function若调用函数fun时的实际参数都是自然数,则函数返回的是

    A.a、b的最大公约数

    B.a、b的最小公倍数

    C.a除以b的余数

    D.a除以b的商的整数部分

    开始考试点击查看答案
  • 8窗体上有1个名称为Text1的文本框;1个名为Timer1的计时器控件,其Interval属性值为5000,Enable属性值是True。Timer1的事件过程如下:Private Sub Timer1_Timer()Static flag As IntegerIf flag=0 Then flag=1flag=-flagIf flag=1 ThenText1.ForeColor=&amp;HFF&amp;  ‘&amp;HFF&amp;为红色ElseText1.ForeColor=&amp;HC000&amp; ‘&amp;HC000&amp;为绿色End IfEnd Sub以下叙述正确的是

    A.每次执行些事件过程时,flag的初始值为0

    B.flag的值只可能取0或1

    C.程序执行后,文本框的文字每5秒改变一次颜色

    D.程序有逻辑错误,Else分支总也不能被执行

    开始考试点击查看答案
  • 9为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:Private Sub Command1_Click()Dim a%,s%,k%s=1a=2For k=2 To 10a=a*2s=s+aNext kText1.Text=sEnd Sub执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是

    A.把s=1改为s=0

    B.把For k=2 To 10改为For k=1 To 10

    C.交换语句s=s+a和a=a*2的顺序

    D.同时进行B)、C)两种修改

    开始考试点击查看答案
  • 10标准模块中有如下程序代码:Public x As Integer,y As IntegerSub var_pub()x=10:y=20End Sub在窗体上有1个命令按钮,并有如下事件过程:Private Sub Command1_Click()Dim x As IntegerCall var_pubx=x+100y=y+100Print x;yEnd Sub运行程序后单击命令按钮,窗体上显示的是

    A.100 100

    B.100 120

    C.110 100

    D.110 120

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