Question

I've been getting a lot of useful help on loops. however, I'm finding each situation is different when dealing with different objects. I have run into a situation where I want to dynamically use different SQL command strings.

Basically, I need help to turn:

SqlCommand(queryString1, connection)

into something like:

SqlCommand(queryString(i), connection)

I need to loop queryString1 - queryString10

For i As Integer = 1 To 10
    Using connection As New SqlConnection(SQLConnectionStr)
        Dim command As New SqlCommand(queryString1, connection)
        connection.Open()
        Dim reader As SqlDataReader = command.ExecuteReader()
        While reader.Read()
            Controls.Item("LblStckRnk" & i).Text() = reader("EMPLOYEE")
        End While
        reader.Close()
    End Using
Next
Was it helpful?

Solution

Use string(10) like this :

 Dim queryString(9) As String
 queryString(0) = "queryString1"
 queryString(1) = "queryString2"
 queryString(2) = "queryString3"
 queryString(3) = "queryString4"
 queryString(4) = "queryString5"
 queryString(5) = "queryString6"
 queryString(6) = "queryString7"
 queryString(7) = "queryString8"
 queryString(8) = "queryString9"
 queryString(9) = "queryString10"

 Using connection As New SqlConnection(SQLConnectionStr)
    For i As Integer = 0 To 9
    Dim command As New SqlCommand(queryString(I), connection)
    connection.Open()
    Dim reader As SqlDataReader = command.ExecuteReader()
    While reader.Read()
        Controls.Item("LblStckRnk" & i+1).Text() = reader("EMPLOYEE")
    End While
    reader.Close()

    Next
End Using
Licensed under: CC-BY-SA with attribution
Not affiliated with StackOverflow
scroll top