方法1:通过sql语句完成多表连接
Dim cn As OleDbConnection
Dim da As OleDbDataAdapter
Dim strSql As String = "select a.*,b.* from a,b where a.id=b.fid"
Dim ds As New DataSet()
Dim dt As DataTable
'connection string的值在web.config中设置
cn = New OleDbConnection(ConfigurationSettings.AppSettings("cnstr"))
da = New OleDbDataAdapter(strSql, cn)
da.Fill(ds, "multitables")
方法2:通过DataRelation 实现
详细内容见:http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dv_vstechart/html/vbtchnavigatingmultiplerelatedtablesinadonetdataset.asp