老师好! 我有一“登记总表”的一列“第二次按程序接种日期”在表中的样式“顺延”红色。如何能够让它在日期框中按条件显示呢?
If e.Col.Name = "第二次按程序接种日期" Or e.Col.Name = "病人姓名" AndAlso e.Row.IsNull("第二次按程序接种日期") = False Then
If e.Row("疫苗保存") = "保存本门诊" AndAlso e.Row.IsNull("第二次实际接种日期") = True AndAlso Date.today > e.Row("第二次按程序接种日期") Then
e.Style = "顺延"
e.Text = "过期未种" & e.Row("第二次按程序接种日期")
End If
end if
请指教,谢谢!