在Visual Basic 6.0中如何通过使用一个表中的外键在另一个表中使用外键来获取记录

Question

我在同一数据库中有两个表：

• 表1包含order_no(primery key)和cust_name
• 表2包含order_no(foreign key)（每个订购的食品也有重复的条目），table_no，items，date，cust_name等...

所以我的问题是，如何使用table1的启动键order_no在列表框和datagrid或文本框中显示记录，以便我可以在table2中获得所有分配了具有相同订单号的外键的记录

我正在使用Visual Basic 6.0

Answer 1

尝试这样的事情

Private Sub mLoadData(lOrder_no As Long)
    ' add a reference to Microsoft ActiveX Data Objects 2.8 Library
    ' add a MSHFLXGD (Microsoft Hierarchical FlexGrid) control named grData to form
    Dim rc As ADODB.Recordset
    Dim db As New ADODB.Connection
    Dim sConnString As String, sSQL As String

    'sConnString = create a connection string according to your database - https://www.connectionstrings.com/
    db.Open sConnString

    sSQL = "SELECT * FROM table2 WHERE order_no =" & lOrder_no
    Set rc = db.Execute(sSQL)
    Set grData.DataSource = rc

End Sub