Private Sub Command1_Click() Dim A(1 To 5) As Intege试题答案_出自国家开放大学系统国家开放大学Visual Basic6.0程序设计

本题添加时间：2023/5/30 20:11:00
圆梦客服：王老师 19139051760(微信同号) 19139051760(微信同号)
Private Sub Command1_Click() Dim A(1 To 5) As Integer Dim x As Integer For i = 1 To 5 A(i) = i Next i i = 1 Do While x < 2 A(i) = A(i) * x x = x + 1 i = i + 1 Loop Text1.Text = A(1) Text2.Text = A(2) End Sub 程序运行后，单击Command1后按钮，文件框Text1、Text2中的结果是（）。 A、2 0 B、0 2 C、2 4 D、2 5
答案是:B 出自国家开放大学Visual Basic6.0程序设计国家开放大学系统南昌大学
更多试题>>>> 1、Private Sub Command1_Click() Dim A(1 To 5) As Integer Dim x As Integer &# 2、Private Sub Form_Click() Dim A(1 To 3) As String Dim c As Integer Dim j As Integer A(1) 3、Private Sub Form_click() b = 1 Do While b < 40 b = b * (b + 1) Loop 4、Private Sub Form_Click() Dim i As Integer, k As Integer Static c As Integer For i = 1 To 6 5、Private Sub Form_Click() Dim c As Integer, j As Integer, k As Integer k = 1 c

教育服务