SMOを使用したコンボボックスでのシステムデータベースのリスト表示と除外

Question

私はChris Diverの投稿を読み、コードが有用であることを発見しました。しかし、私はシステムデータベースを除外したい。コードは次のとおりです。

Dim server As New Microsoft.SqlServer.Management.Smo.Server("localhost") 
For Each db As Database In server.Databases 
    Console.WriteLine(db.Name) 
Next 

出典：Get list of databases from SQL Server

はありがとうございます。

Answer 1

データベースを確認できます。システムDBの場合は追加しないでください。これはコードの一部です

Dim value As Boolean 

For Each db As Database In server.Databases 
    value = db .IsSystemObject 
    if NOT value Then 
     Me.ComboBox1.Items.Add(db.Name) 
    End If 
Next