在VB中，可以使用ADO.NET庫來連接和操作數據庫。下面是一個使用VB調用數據庫數據的示例：
首先，需要在VB中導入ADODB命名空間：
Imports ADODB
然后，創建一個連接字符串來連接到數據庫：
Dim conn As New Connection
Dim connStr As String = "Provider=SQLOLEDB;Data Source=數據庫服務器;Initial Catalog=數據庫名稱;User ID=用戶名;Password=密碼"
接下來，使用連接字符串打開數據庫連接：
conn.Open(connStr)
然后，可以編寫SQL查詢語句來從數據庫中檢索數據：
Dim sql As String = "SELECT * FROM 表名"
接著，創建一個記錄集（Recordset）對象來存儲查詢結果：
Dim rs As New Recordset
rs.Open(sql, conn)
現在，可以通過循環遍歷記錄集來獲取數據庫中的數據：
While Not rs.EOF
Dim id As Integer = rs.Fields("ID").Value
Dim name As String = rs.Fields("Name").Value
' 其他字段...
' 處理數據...
rs.MoveNext()
End While
最后，記得關閉記錄集和數據庫連接：
rs.Close()
conn.Close()
這是一個簡單的示例，你可以根據自己的需求修改連接字符串、SQL查詢語句和數據處理邏輯。
