用VB.NET创建一个三层应用程序的例子……

CType(Me.DataGrid1, System.ComponentModel.ISupportInitialize).EndInit()

Me.ResumeLayout(False)

End Sub

#End Region

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim Customer_Ds As New localhost.super_ds()

Dim ser1 As New localhost.Service1()

Customer_Ds.Merge(ser1.Get_Dataset)

DataGrid1.DataSource = Customer_Ds

End Sub

End Class

总结：可见，表示层窗体上完全没有数据库连接控件，它与数据库的连接任务是通过业务层来完成的，这样，程序的结构更加清晰，当然业务层的实现也可以用其他方法，比如：写一个自己的类来完成与数据库的数据传输。