Dim st As StringFor Each dr As DataRow In DataTables("预览").Select("")If dr("代码").StartsWith(1) ''假如代码行的数值是以1开头的行.....End IfNext
加好友 
发短信
Post By：2015/12/25 8:11:00 [显示全部帖子]
