Combobox อยู่บน Form หลักหรือเปล่าครับ ถ้าใช่ ลองแบบนี้นะครับ
Private Sub cbo_CustomerType_AfterUpdate()
Dim myCustomer As String
myCustomer = "SELECT * FROM Asset_all WHERE (((Asset_all.Status)=[forms]![mainform].[Form]![cbo_CustomerType]));"
Forms![mainform]![Subform].[Form].RecordSource = myCustomer
End Sub
Mainform คือชื่อฟอร์มหลัก
Subform คือชื่อฟอร์มย่อย