二、漢字亂碼問題

　　筆者曾經在使用ADO向SQL　Server 6.5中追加或修改數據后，發現查詢出來的漢字都是亂碼，最初以為是客戶端的環境有問題，后來打開服務器端的數據庫，發現其中的漢字也都是亂碼，費了九牛二虎之力才找到原因：在追加和修改的過程中，ADO將字符進行了自動翻譯(AutoTranslate)，翻譯后就成了亂碼(Microsoft給我們開了一個“小小”的玩笑)，解決的辦法就是不讓它亂翻譯，具體操作如下：

　　如果ADO通過OLE　DB直接連接到數據庫，則在Connection的ConnectionString中加入字符串：AutoTranslate=False;

　　如果ADO通過ODBC連接到數據庫，則在配置ODBC時，將“執行字符數據轉換”一項的勾去掉。

　　三、在SQL中處理含單引號的字符串

　　VB在寫SQL時，對字符串數據都用單引號引起來，如：

　　Select * from MyTable Where ID='FirstID'

　　若其中的FirstID為First'ID，即中間多出一個單引號，則上述寫法將導致錯誤，解決的辦法是將字符串中的每一個單引號用兩雙引號替換，下面的函數StrToSQL完成該功能，并用單引號將處理后的字符串引起來：

　　Private Function StrToSQL(ByVal strValue As String) As String

　　StrToSQL = "'" + Replace(strValue, "'", "'") + "'"

　　End Function

　　在寫SQL時如有字符串數據，不管其中有沒有單引號，都可以這樣使用：

　　strValue="First'Id"

　　strSQL="Select * from MyTable Where ID="+StrToSQL(strValue)

　　四、只返回查詢結果的前N個記錄

　　這是個老生常談的問題，稍有這方面經驗的人都會想到在SQL中用"Select Top"語句來完成此功能，如訪問Access數據庫時為：

　　Select top 50 * From MyTable

　　SQL Server 7.0和SQL Server 2000中都可以這樣，但在SQL Server 6.5中不行，它不支持"Select Top"，筆者采用了一個折衷的辦法，使用SQL Server 6.5的"Set Rowcount"來限制記錄數，例如：

　　MyConnection.Execute "Set Rowcount 50"

　　......'執行查詢

　　MyConnection.Execute "Set rowcount 0"

　　最后一行表示取消記錄數據限制，這句千萬不能少，因為記錄數的限制在MyConnection的生存期都有效，所以其它的查詢也會受此限制，最多只返回50條記錄，筆者曾深受其害。

　　本文中涉及的內容的測試平臺為Visual Baisc 6.0 Enterprise+Service Pack 4。

　　2010年9月計算機等級考試成績查詢時間匯總

　　2011計算機等級考試二級VB考點及習題匯總

　　2011年計算機等級考試二級VB基礎教程匯總

　　2011計算機等考二級VB輔導知識技巧匯總