looking in a array and loop it

[abhijit]

I know the values already yeah, and they need to be hardcoded (values never change).

In that case, one way I can think of is

'Declared Array
Dim x(5) As String
Dim iCounter As Integer

Private Sub Command1_Click()
    'Assigned Values
    x(0) = "India": x(1) = "China": x(2) = "Brazil": x(3) = "Russia": x(4) = "Yemen"
    
    'Looped Through Array
    For iCounter = 0 To UBound(x) - 1
            If x(iCounter) = "China" Then
                Debug.Print "Hello China"
            End If
    Next
    
End Sub

[Warbringer]

Okey, my code so far:

'Declared Array
Dim x(6) As String
Dim y(6) As String
Dim iCounter As Integer

Private Sub Command1_Click()
    'Assigned Values
    x(0) = "414,622": x(1) = "431,82": x(2) = "413,685": x(3) = "421,604": x(4) = "429,794": x(5) = "413,557"
	y(0) = "-400,55": y(1) = "-392,107": y(2) = "-380,754": y(3) = "-377,159": y(4) = "-363,381": y(5) = "-360,796"
    
    'Looped Through Array
    For iCounter = 0 To UBound(x) - 1
			'check if something equials the x array
            If x(iCounter) = "China" Then
                Debug.Print "x found"
            End If
			'check if something equials the y array
            If x(iCounter) = "China" Then
                Debug.Print "y found"
            End If
    Next
    
End Sub

Is there something like 'BETWEEN' ? i.e.

'check if something equials the x array
If x(iCounter) BETWEEN x(iCounter) -5 And x(iCounter) +5 Then

so i have a marge of 10 ?

[abhijit]

Okey, my code so far:

'Declared Array
Dim x(6) As String
Dim y(6) As String
Dim iCounter As Integer

Private Sub Command1_Click()
    'Assigned Values
    x(0) = "414,622": x(1) = "431,82": x(2) = "413,685": x(3) = "421,604": x(4) = "429,794": x(5) = "413,557"
	y(0) = "-400,55": y(1) = "-392,107": y(2) = "-380,754": y(3) = "-377,159": y(4) = "-363,381": y(5) = "-360,796"
    
    'Looped Through Array
    For iCounter = 0 To UBound(x) - 1
			'check if something equials the x array
            If x(iCounter) = "China" Then
                Debug.Print "x found"
            End If
			'check if something equials the y array
            If x(iCounter) = "China" Then
                Debug.Print "y found"
            End If
    Next
    
End Sub

Is there something like 'BETWEEN' ? i.e.

'check if something equials the x array
If x(iCounter) BETWEEN x(iCounter) -5 And x(iCounter) +5 Then

so i have a marge of 10 ?

For numeric variables, you could always do a comparison using the standard comparison operators.

If x(iCounter) < 10 AND x(iCounter) > 5 Then
   Debug.print "Number between 10 and 5"
End If