我先定义一个数组
Private Sub Form_Load()
Dim a(1 To 10) As Integer
For i = 1 To 10
a(i) = i
Next i
然后 b = 8
问题是,下面想用一个条件语句,如果b在数组里,回怎么怎么样,
请问这个语句怎么写

解决方案 »

  1.   

    我是楼主,意思还不清楚?!
    好吧,我把代码全搬来
    Private Sub Form_Load()
    Dim a(1 To 10) As Integer
    For i = 1 To 10
    a(i) = i
    Next i
    b = 8
    If b = a(i) Then
    Print b
    End If
    End Sub
    出错误的是这一句 If b = a(i) Then
    就是说如果5 这个数在这个数组里,就print b,问题是“如果5 这个数在这个数组里”这个if语句怎么写
      

  2.   

    Private Sub Form_Load() 
    Dim a(1 To 10) As Integer 
    For i = 1 To 10 
    a(i) = i 
    Next i 
    b = 8 
    If b = a(i) Then 
    Print b 
    else
    Print "不在数组中"
    End If 
    End Sub 
      

  3.   

    我怀疑6楼是否试过了,If b = a(i) Then这个语句存在语法错误!
      

  4.   

    Private Sub Form_Load() 
    Dim a(1 To 10) As Integer 
    For i = 1 To 10 
    a(i) = i 
    Next i 
    b = 8
     
    FOR I=1 TO 10
    If b = a(i) Then 
    Print b 
    End If 
    NEXTEnd Sub