求且,引用逻辑字符判断,变化颜色时
'Dim drs1 As List(Of DataRow) = DataTables("个人事务").Select("开始时间=#" & e.Text & "#")
'
'If drs1.Count > 0 Then
'
'Dim drs2 As List(Of DataRow) = DataTables("个人事务").Select("终止") '终止为逻辑字符,希望选择时,单元格颜色变为BJ_终止
'If drs2 = True Then
'e.Graphics.FillRectangle(BJ_终止,单元格)
'Else
'e.Graphics.FillRectangle(BJ_任务,单元格)
'End If
'Else
'e.Graphics.FillRectangle(BJ_当月,单元格)
'End If
---------------------------
错误
---------------------------
编译错误:没有为类型“System.Collections.Generic.List(Of DataRow)”和“Boolean”定义运算符“=”。
错误代码:If drs2 = True Then
---------------------------
确定
---------------------------