新手请问：一段代码中* 和& 的解读

Private Sub Text2_Change()
'子窗体筛选代码如下
    Dim strWhere As String


    strWhere = Trim$(Me.Text2.Text)
    If Len(strWhere) > 0 Then
        strWhere = " where [企业_名称] & [工商_注册号] & [Key号] & [组织机构_代码证号] & [税务_登记号] & [受理号] & [受理_方式] & [经办人] Like '*" & strWhere & "*'"


    End If
    Me.list10.RowSource = "SELECT * FROM 供应商资料表" & strWhere

End Sub

请问 strWhere = " where [企业_名称] & [工商_注册号] & [Key号] & [组织机构_代码证号] & [税务_登记号] & [受理号] & [受理_方式] & [经办人] Like '*" & strWhere & "*'"  这段代码中： *  和&   单引号和双引号   用法 和  意思？谢谢！