【单选题】运行下列程序,单击窗体后输出的结果是( )。 Private Sub Form_Click() Dim a Dim s As Integer, i As Integer a = Array(1, 2, 3, 4, 5, 6) s = 1 For i = 5 To 1 Step -2 s = s * a(i) Next i Print s End Sub
【单选题】在直接或间接持有上市公司已发行一定比例股份的股东单位中任职的人员不得担任独立董事,该比例为( )。
【简答题】下列程序运行后,单击窗体,输出结果是( ) Private Sub Form_Click () S=0 :k=1 Do s=s+k :k=k+1 Loop Until k<=5 Print s End Sub
【单选题】设在窗体上有个文本框,然后编写如下的事件过程。 Private Sub Text1_KeyDown(KeyCode As Integef,Shift As Integer) Const Alt=4 ConstKey_F2=&H71 altdown%=(Shift And Alt)>0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Tex...
【单选题】设在窗体上有个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)>0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Te...
【单选题】设在窗体上有个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)>0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Te...
【单选题】下列程序运行后,单击窗体,输出结果是 。 Private Sub Form_Click() Dim a As Integer, b As Integer a = 3 b = 5 Print a + b; a & b End Sub
【单选题】下列程序运行后,单击窗体,输出结果是。Private Sub Form_Click()Dim a As Integer, b As Integera = 3b = 5Print a + b;a & bEnd Sub