在VB中，可以使用ADO.NET來讀取SQL數據庫的數據。ADO.NET提供了一系列的類和方法來與數據庫進行交互。

下面是一個讀取數據庫數據的示例代碼：

Imports System.Data.SqlClient
Module Module1
Sub Main()
Dim connectionString As String = "Data Source=YourServerName;Initial Catalog=YourDatabaseName;User ID=YourUsername;Password=YourPassword"
Dim query As String = "SELECT * FROM YourTableName"
Using connection As New SqlConnection(connectionString)
Dim command As New SqlCommand(query, connection)
connection.Open()
Dim reader As SqlDataReader = command.ExecuteReader()
If reader.HasRows Then
While reader.Read()
Console.WriteLine("ID: {0}, Name: {1}", reader("ID"), reader("Name"))
End While
Else
Console.WriteLine("No rows found.")
End If
reader.Close()
End Using
End Sub
End Module

在上面的示例代碼中，首先需要定義連接字符串(connectionString)來連接數據庫。然后定義查詢語句(query)來獲取數據。接著創建一個SqlConnection對象來建立與數據庫的連接。通過SqlCommand對象執行查詢語句，并使用ExecuteReader方法返回一個SqlDataReader對象。最后使用SqlDataReader對象讀取數據庫中的數據。

請注意替換連接字符串中的YourServerName、YourDatabaseName、YourUsername和YourPassword為實際的數據庫信息，以及YourTableName為實際的表名。

此外，還可以使用其他方式來讀取數據庫數據，例如使用Entity Framework或LINQ to SQL等。具體使用哪種方式取決于你的需求和個人偏好。