在VB中，可以使用ADO.NET来读取SQL数据库的数据。ADO.NET提供了一系列的类和方法来与数据库进行交互。

下面是一个读取数据库数据的示例代码：

Imports System.Data.SqlClientModule Module1Sub 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 ThenWhile reader.Read()Console.WriteLine("ID: {0}, Name: {1}", reader("ID"), reader("Name"))End WhileElseConsole.WriteLine("No rows found.")End Ifreader.Close()End UsingEnd SubEnd Module

在上面的示例代码中，首先需要定义连接字符串(connectionString)来连接数据库。然后定义查询语句(query)来获取数据。接着创建一个SqlConnection对象来建立与数据库的连接。通过SqlCommand对象执行查询语句，并使用ExecuteReader方法返回一个SqlDataReader对象。最后使用SqlDataReader对象读取数据库中的数据。

请注意替换连接字符串中的YourServerName、YourDatabaseName、YourUsername和YourPassword为实际的数据库信息，以及YourTableName为实际的表名。

此外，还可以使用其他方式来读取数据库数据，例如使用Entity Framework或LINQ to SQL等。具体使用哪种方式取决于你的需求和个人偏好。