|
CDate(DDate.Value) & "'," & _
"'" & CStr(Vendor.Value) & "'," & _
"'" & CStr(PO_NO.Value) & "'," & _
"'" & CStr(LN_No.Value) & "'," & _
"'" & CStr(ITEM.Value) & "'," & _
"'" & CStr(ITEM_Desc.Value) & "'," & _
"'" & CStr(Warehouse.Value) & "'," & _
"" & CLng(PO_Qty.Value) & "," & _
"'" & TxtShipNo.Value & "'," & _
"" & CLng(SHIP_Qty.Value) & "," & _
"" & CLng(RE_Qty.Value) & "," & _
"" & CLng(VAR.Value) & "," & _ 这个就是将字符串转换成数字
"'" & TxtRemark.Value & "'," & _
"'" & CStr(BUYER.Value) & "'," & _
"''," & _ |
|