请问一下各位,为甚么我下面这段程序总是没用啊?(在VB.NET+SQL)        
我监视了rs.RecordCount(),它的值总是为-1,就是没有执行啊,要怎么修改呢?        Dim sql As String
        Dim rs As New ADODB.Recordset()
        Dim i As Integer = 0
        sql = "select distinct * from tct1_1 where Region ='" & dataname & "'"
        Call rs.Open(sql, conn)        Me.ComboBox5.Items.Clear()        Dim t As Integer = rs.RecordCount()
        For i = 0 To t - 1
            Me.ComboBox5.Items.Insert(i, rs.Fields("Zone").Value)
        Next