เมื่อปิดฟอร์มย่อย จะให้ฟอร์มหลักรีเฟรชค่ายังไงค่ะ สมมติว่าฟอร์ม A มี combobox แสดงชื่อรายการ a-e

Private Sub A_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ShowProduct()
End Sub

Private Sub ShowProduct()
        sqlPro = "SELECT * FROM tbAddProduct"
        dbDAP = New OleDbDataAdapter(sqlPro, dbConn)
        dbDSP.Clear()
        dbDAP.Fill(dbDSP, "tbAddProduct")
        allPro = Me.BindingContext(dbDSP.Tables("tbAddProduct")).Count
        ReDim ProID(allPro)
        ReDim ProName(allPro)
        For i = 0 To allPro - 1
            ProID(i) = CStr(dbDSP.Tables("tbAddProduct").Rows(i).Item("Number"))
            ProName(i) = CStr(dbDSP.Tables("tbAddProduct").Rows(i).Item("AddProduct"))
            cboProduct.Items.Add(ProName(i))
        Next
    End Sub

 Private Sub btnAddProduct_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAddProduct.Click
       B.Show()
    End Sub

strAdd = "INSERT INTO tbAddProduct ([Number],[AddProduct])"
            strAdd &= " VALUES ('" & str3 & "','" & txtDataProduct.Text & "')"
            dbCommand.CommandType = CommandType.Text
            dbCommand.CommandText = strAdd
            dbCommand.Connection = dbConn
            dbCommand.ExecuteNonQuery()         
            lstData.Items.Add(txtDataProduct.Text)

Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
        Me.Close()
    End Sub