在VB .NET中，可以使用System.Data.SqlClient命名空間來打開和操作SQL數據庫。以下是一個簡單的示例代碼，演示如何打開一個SQL數據庫：
```vb
Imports System.Data.SqlClient
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim connectionString As String = "Data Source=YourServerName;Initial Catalog=YourDatabaseName;User ID=YourUsername;Password=YourPassword"
Using connection As New SqlConnection(connectionString)
connection.Open()
MessageBox.Show("數據庫已打開")
connection.Close()
End Using
End Sub
End Class
```
在上述示例代碼中，你需要將`YourServerName`替換為SQL服務器的名稱，`YourDatabaseName`替換為要連接的數據庫的名稱，`YourUsername`替換為數據庫的用戶名，`YourPassword`替換為數據庫的密碼。
使用`SqlConnetion`類的`Open()`方法可以打開數據庫連接，使用`Close()`方法可以關閉數據庫連接。在示例代碼中，使用`Using`語句塊來自動處理數據庫連接的打開和關閉，確保在操作完成后正確關閉數據庫連接。
請注意，打開數據庫時可能還需要進行其他操作，如執行SQL查詢、插入數據等等。以上示例代碼僅演示了如何打開數據庫連接。
