安徽省淮南市高二第一学期期末教学质量检测信息技术试卷
“一个算法必须保证它的执行步骤是有限的。”这是指算法特征中的( )
A.可行性 | B.确定性 |
C.有穷性 | D.有0个或多个输入 |
列VB表达式的值不等于5的是( )
A.Sqr(2) + 1 | B.Abs(-3) + 2 |
C.int(3.5) + 2 | D.Len("-200") + 1 |
在Visual Basic中,某工程的代码窗口如下图所示:
当前正在编辑的是( )
A.Label1的Click事件过程代码 |
B.Command1的DblClick事件过程代码 |
C.Label1的DblClick事件过程代码 |
D.Command1的Click事件过程代码 |
下列可以作为VB变量名的是( )
A.V&B | B.V+B | C.7VB | D.V_B |
下列VB表达式中:①Sin(x) ②Text1.Text ③Space(x) ④Year(x) ⑤Len(x)值为字符串型的是( )
A.①④⑤ | B.②③⑤ | C.④⑤ | D.②③ |
有如下的Visual Basic程序段:
s = 0
x = 1
Do While x <= 5
s =" s" + x
x =" x" + 2
Loop
该程序段运行后,语句s 的值是( )
A.8 | B.9 | C.10 | D.11 |
在Visual Basic中,某对象的属性窗口如下图所示:
该对象名是( )
A.Text1 | B.Text_1 | C.TextBox | D.Text |
十进制数456转换成二进制数是( )
A.(111001000)2 | B.(10011001)2 | C.(101001010)2 | D.(101010101)2 |
在Visual Basic中,鼠标单击窗体Form触发的事件处理过程名为( )
A.Form_Click | B.Form_load |
C.Text1_DblClick | D.Form_DblClick |
已知x=1,y=2,z=3,下列表达式中值为True的是( )
A.Not (x < y) | B.x > y And y > z |
C.x < y Or x > z | D.x > z |
有如下的程序段:
Private Sub Command1_Click()
Dim m As String
Dim n As String
m = Text1.Text
n = Text2.Text
Label1.Caption=" m" + n
End Sub
运行程序,在对象Text1和Text2中分别输入12和34,则单击命令按钮Command1后,对象Text3中显示( )
A.1234 | B.46 | C.语法错误 | D.3412 |
下列能准确表达“如果明天不上学,那么我们骑车去野餐”的伪代码是( )
A.If(明天上学)Then(我们骑车去野餐) |
B.If(明天不上学)Then(我们骑车去野餐)Else(我们不去野餐) |
C.If(明天上学)Then(我们不去野餐)Else(我们骑车去野餐) |
D.If(明天不上学)Then(我们骑车去野餐) |
某VB的事件过程如下:
Private Sub Command1_Click()
Dim a As Integer
a = Val(Text1.Text)
a =" 2" * a + 1
Text1.Text = StrA.
End Sub
程序运行时,在文本框Text1中输入2,连续三次单击命令按钮Command1后,Text1中显示的内容是( )
A.47 B.5 C. 11 D. 23
求50以内所有能被3整除的自然数之和,算法如下:
①将1赋值给变量i
②判断i除以3的余数是否为0,若是,则将该数累加到变量Sum中
③将变量i加1,若i小于或等于50,转②
④输出变量Sum的值
⑤结束
该算法采用的描述方法属于
A.流程图 | B.伪代码 | C.自然语言 | D.计算机程序语言 |
有如下Visual Basic程序段:
m = a(1)
i =" 2"
Do While i <= 10
If m < a(i) Then m = a(i)
i =" i" + 1
Loop
该程序段执行后,变量m中存储的是( )
A.a(1)至a(10)中的最大值 |
B.a(1)至a(10)中的最小值 |
C.a(2)至a(10)中的最大值 |
D.a(2)至a(10)中的最小值 |
有如下Visual Basic程序段:
m=3
If m>5 Then
n=m*m
Else
n=4*m
End If
该程序段运行后,变量n的值是________。
下面程序的功能是:计算表达式1+3+5+…+(2n-1)的值,在文本框Text1中输入n的值,结果在文本框Text2中输出。则程序中划线处的语句应填____________。
Private Sub Command1_Click()
Dim sum As Long,i As Integer,n As Integer
sum = 0
n = Val(Text1.Text)
For i =" 1" To 2 * n - 1 Step 2
Next i
Text2.Text=Str(sum)
End Sub
下列VB程序运行时,单击命令按钮Command1后,文本框Text1中显示的内容是 ,文本框Text2中显示的内容是 。
Private Sub Command1_Click()
Const n = 4
Dim a(1 To n) As Integer, s As Integer
Dim i As Integer, t As Integer, k As Integer
a(1) =" 1:" a(2) =" 2:" a(3) =" a(1):" a(4) = 0
s =" 0:" k = 0
For i =" 1" To n
t = a(i)
a(i) =" k" + t
k = t
s =" s" + a(i)
Next i
Text1.Text = Str(a(2))
Text2.Text = Str(s)
End Sub