试题 试卷
题型:单选题 题类:常考题 难易度:容易
浙江省瑞安中学2015-2016学年高一下学期期初考试技术(信息技术部分)
图a
图b为标准ASCII码表供你参考(其中ASCII为1-32,127的字符为特殊符号,不能用作密码):
图b
实现上述功能的VB程序代码如下,请回答以下问题:
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c = 0: n = 10
For i = 1 To 10 Step 2
If n Mod i = 0 Then
c = c * i
Else
c = c + i
End If
Next i
Text1.Text = Str(c)
End Sub
Private sub Command1_Click()
Dim a As Single
Dim py As String
a= Val (Text1) (1)
If a>0 Then py =”正数”
If a=0 Then py=”零”
If a<0 Then py=”负数”
Label3.Caption=a(2)
当输入a,b的值分别为5,7,该算法的输出结果为( )
试题篮