I have this code here.


Private Sub LoadAvaiablePorts()
Dim conCS As New SqlClient.SqlConnection()
Dim cmdCS As New SqlClient.SqlCommand()
Dim drCS As SqlClient.SqlDataReader
conCS.ConnectionString = "Server = axio-member1;database=axiocs;Trusted_Connection=True;Max Pool Size = 10000"
conCS.Open()
cmdCS.Connection = conCS
cmdCS.CommandType = CommandType.Text
cmdCS.CommandText = "SELECT fldCode + ' - ' + fldName AS fldPort from tblPortsCodes"
drCS = cmdCS.ExecuteReader
While drCS.Read
Me.lstPorts.Items.Add(drCS.GetValue(0))
End While
End Sub


Question !!!
Will this SQL connection still open after "End Sub"? What diference does it make if I put "conCS.Close()" before "End Sub"? Also, please give me some prove or technical resources on your reply?