动态更改列名称,不成功呢?怎么办合适?
Dim cmd As New SQLCommand
cmd.C
Dim dt As DataTable
cmd.CommandText = "SEL-ECT * From {学员课时记录表} where 缴费编号='" & r("缴费编号") & "'"
dt = cmd.ExecuteReader()
With dt
.DataCols("点名时间").Caption = "考勤时间"
.DataCols("点名时间"). '此列默认显示YYYY-MM-DD格式,我想带上时\分和秒
.DataCols("任课教师编号").Caption = "上课老师"
.BuildHeader()
End With
Tables(e.form.name & "_Table1").DataSource =dt