试题

试题 试卷

logo

题型:单选题 题类:模拟题 难易度:普通

2017年浙江省高考信息技术模拟试卷(一)

【加试题】设窗体上已经添加了command1、text1、label1对象,当文本框中输入8时下列代码段运行后的结果会是(   )

Private Sub Command1_Click()

Dim s As Integer

Dim n As Integer

Dim i As Integer

n = Val(Text1.Text)

s = 1

For i = 2 To n

  s = s * i

Next i

Label1.Caption = Str(n) + "!=" + Str(s)

End Sub

A、程序有语法错误 B、出现“溢出”错误 C、8!= 4032 D、8!= 40320
返回首页

试题篮