日期:2014-05-17 浏览次数:20568 次
Module Module1
Sub Main()
Dim tableName As String = "Clients"
Dim codeRowName As String = "ClientCode"
Dim mark As String = "W"
Dim strSql As String = "select * from " & tableName & " where " & codeRowName & " like '%" & mark & DateTime.Now.ToString("yyyyMMdd") & "%'"
System.Console.WriteLine(strSql)
System.Console.Read()
End Sub
End Module