主题：表达式老写不对

1.

Dim AA4 As String = "201805"
Dim Products As List(Of String)
Products = DataTables("入库记录表").GetValues("入库单号","入库单号 like " & AA4)

2.

Dim aa4 As String = aa2 & aa3
Dim td1 As Integer
With Tables("入库记录表")
    Td1 = .Compute("count(入库单号)" ,"入库单号  like  '" & aa4 & "' ") 
     
End With

第一个是错的，不知怎么改，

第二个运行的结果不对，就找不到