先用以下代码建立临时表并动态增加了列名:Dim dtb As New DataTableBuilder("临时表")
dtb.AddDef("描述", Gettype(String), 30)
...
再通过AddNew()增加了一些记录并填入了数据
最后用DataSource的方法将临时表引入到窗口中的一个table表
Dim t1 As Table = Tables("窗口_Table")
t1.DataSource = DataTables("临时表")
用此方法后,在窗口中table表的DrawCell事件中代码无效,请问老师应该如何做?
以下是写入的代码:
If e.Table.Rows.Count > 0 Then
e.Table.DataTable.AddUserStyle("样式3", Color.Transparent,Color.RED)
If e.Row("开盘时间") <> Nothing AndAlso e.Row("开盘时间") < Date.Now Then
e.style = "样式3"
End If
End If