深入浅出之 两种方法显示输入的10个数

来源:互联网 发布:现在学php有前途吗 编辑:程序博客网 时间:2024/06/10 12:13

方法一:
             Dim a(9)

             

               Private Sub Form_click()
                     For i = 0 To 9
                           a(i) = Val(InputBox("请输入"))
                           Print a(i)

                      Next i


             End Sub
方法二:
             Dim a(9)



             Private Sub Form_Click()
  
                    For i = 0 To 9
                             a(i) = Val(InputBox("请输入"))
                    Next i
  
  
                   For i = 0 To 9
                              Print a(i)
                    Next i
  
            End Sub


       一种方法每输入一个数就在窗体上显示一个数,另一种方法输入十个数后一块儿在窗体上显示。

                     

原创粉丝点击