试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省温州市苍南县巨人中学2014-2015学年高二下学期期中考试信息技术试题
Private Sub Label1_Click()
Dim a As Double, b As Single, c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = ( a – b ) / Log(a)
Label1.Caption = Str(c)
End Sub
能运行该段程序的事件过程名是( )
Private Sub Command1_Click()
Dim x As Double
Dim y As Double
x = Val(Text1.Text)
y = Abs(x)
x = int(y)
Text2.Text = Str(x)
此应用程序执行后,出现了如图所示的错误信息,请问产生此错误的原因是( )
Dim a(1 To 15) As Integer
Private Sub Form_Load()
Dim i As Integer, t As Integer
Dim s1 As String, s2 As String
Randomize
s1 = ""
For i = 1 To 15
a(i) = ①
s1 = s1 + Str(a(i))
Next i
Text1.Text = s1
Private Sub Com1_Click()
s2 = ""
s2 = ②
Text2.Text = s2
试题篮