uname = Text1.Text          '输入用户名                 

   psd = Text2.Text            '输入密码

   vcode = Val(Text3.Text)     '输入验证码 

   If vcode <> Val(Label3.Caption) Then      

   MsgBox “ ”       ' Label3显示的是随机验证码

   ElseIf uname <> "admin" Or psd <> "123456" Then

   MsgBox “ ”

   Else

   MsgBox “ ”

   方框中正确的语句是（   ）。

Dim j  As Integer, k  As Integer

List Clear

  For k = 1 To 100

     j = Int(Sqr(k))

     If j * j = k Then list1.AddItem Str(k)

 Next k

    分析程序功能，该程序的功能是（   ）

Private Sub Command1_Click()

 Dim i As Integer

 Dim a(10)As Integer    ‘①

 For i=1 To 10    ‘②

  a(i)=Rnd* 100    ‘③

 Next i

 Label1.Caption=Str(a(i))    ‘④

End Sub