Dim dtb As New DataTableBuilder("日检1")
dtb.AddDef("personid", Gettype(String), 32)
dtb.AddDef("姓名", Gettype(String), 32)
'dtb.AddDef("完成值", Gettype(Double))
For Each v As String In DataTables("daily").GetValues("kmitemid")
Dim dr As DataRow = DataTables("kframe").Find("kmitemid = '" & v & "'")
Dim p As String
If dr("work") Is Nothing Then
p = dr("fruit")
Else
p = dr("work")
End If
dtb.AddDef(v, Gettype(Double),1,p) 老师我要增加列，列的标题是变量P。这句代码怎么写？ Expression 参数是不是没法为空？
Next
dtb.Build()
[此贴子已经被作者于2021/4/16 14:48:01编辑过]
加好友 
发短信
Post By：2021/4/16 14:47:00 [只看该作者]
