Dim dt As String = Format(Date.Today.AddDays(2),"dddd")For Each fdr As DataRow In DataTables("表A").Select("星期 = '" & dt & "'") Next
加好友 
发短信
Post By：2018/11/12 17:53:00 [显示全部帖子]
