VB编程问题

日期:2013-09-16 12:01:11 人气:1

VB编程问题

Private Sub Form_Click() Dim a(100) As Integer, b(100) As Integer Dim n1 As Integer, n2 As Integer, x As Integer, i As Integer x = InputBox("X=") While x -1 If x Mod 2 = 0 Then a(n1) = x: n1 = n1 + 1 Else b(n
    A+
热门评论