复制
收藏
提问
全网
.[填空题] 运行以下程序,单击命令按钮后,如果用户从键盘上输入1、2、3、4、5、6,则窗体上输出内容为_________。 Private Sub Command1_Click() Dim a() As Integer Dim i As Integer, j As Integer ReDim a(6) For i = 5 To 10 a(10- i + 1) = InputBox("input number") Next i ReDim Preserve a(10) a(10) = a(3) + a(5) Print a(10) End Sub 第1空: 请输入
6月前
理解问题.[填空题] 运行以下程序,单击命令按钮后,如果用户从键盘上输入1、2、3、4、5、6,则窗体上输出内容为_________。 Private Sub Command1_Click() Dim a() As Integer Dim i As Integer, j As Integer ReDim a(6) For i = 5 To 10 a(10- i + 1) = InputBox("input number") Next i ReDim Preserve a(10) a(10) = a(3) + a(5) Print a(10) End Sub 第1空: 请输入
已完成理解「.[填空题] 运行以下程序,单击命令按钮后,如果用户从键盘上输入1、2、3、4、5、6,则窗体上输出内容为_________。 Private Sub Command1_Click() Dim a() As Integer Dim i As Integer, j As Integer ReDim a(6) For i = 5 To 10 a(10- i + 1) = InputBox("input number") Next i ReDim Preserve a(10) a(10) = a(3) + a(5) Print a(10) End Sub 第1空: 请输入」
展开阅读网页
更专业一些
转笔记
专业
.[填空题] 运行以下程序,单击命令按钮后,如果用户从键盘上输入1、2、3、4、5、6,则窗体上输出内容为_________。
Private Sub Command1_Click()
Dim a() As Integer
Dim i As Integer, j As Integer
ReDim a(6)
For i = 5 To 10
a(10- i + 1) = InputBox("input number")
Next i
ReDim Preserve a(10)
a(10) = a(3) + a(5)
Print a(10)
End Sub
第1空:
请输入不在提醒