试题 试卷
题型:填空题 题类:模拟题 难易度:普通
试题来源:浙江省杭州市2015年高考信息技术模拟卷8
Private Sub Command1_Click()
Dim s As Integer, j As Integer
s = 0
For j = 1 To 10
If j Mod 2 <> 0 Then
s = s + j
End If
Next j
Label1.Caption = Str(s)
End Sub
收藏 纠错
组卷次数:1次 +选题
Dim x As String, y As String
Dim ans As Integer
x=“5”:y=“20”:ans=0
If x>y Then ans=Val(x)Else ans=Val(y)
ans=ans+Val(x+y)
Text1.Text=Str(ans)
程序运行完后,文本框Text1中显示的是:( )
Dim n As Integer, i As Integer, a As Integer, b As Integer
Randomize
n=5:i=1
Do While i <=n
a= Int(Rnd*90)+ 10
b= Int(Rnd*90)+ 10
If a>b Then
List1.AddItem Str(a)+"-"+ Str(b)+“=“
i=i+1
Loop
执行该程序段后,下列说法正确的是( )
试题篮