【单选题】有如下程序过程 Private Sub Form_Click() x = Val(Text1.Text) y = Val(Text2.Text) op = Combo1.Text If op = "+" Then Label1.Caption = Str(x + y) ElseIf op = "-" Then Label1.Caption = Str(x - y) ElseIf op = "*" ...
【单选题】设有如下程序: Dption Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim n As Integer n=InputBox('输入数据') If n<10 Then Call GetArray(a, n) End If End Sub Private Sub GetArray(h()As Integer, n As Inte...