Select Case e.DataCol.Name Case "chuhuodate" Dim dr As DataRow=e.DataRow dr("chuhuodan2") =dr("_Identify")
End Select
其中 dr("chuhuodan2") =dr("_Identify")
想转换成 dr("chuhuodan2") = 'XS' + SubString('000000', 1, 6 - Len(Convert([_Identify],'System.String'))) + Convert([_Identify], 'System.String')
可是这样的格式不正确,谁能帮我转换一下代码呢?