If e.Col.Name = "办学性质" Then
Dim s As String = e.Row("办学性质")
If String.TryParse(s) AndAlso s = "[公办](有本科)" Then
e.Style = "小于零值"
End If
End If
这个代码提示我TryParse(s)不是String的成员,如何修改,谢谢老师
[此贴子已经被作者于2024/8/21 16:41:25编辑过]
只能整个单元格设置颜色,无法单独设置其中一个字符的颜色
以下是引用有点蓝在2024/7/2 10:17:00的发言:
只能整个单元格设置颜色,无法单独设置其中一个字符的颜色
是,要的就是字符所在单元格设置颜色。老师代码怎么写?
If e.Col.Name = "办学性质" Then
Dim Str1 As String = e.Row("办学性质")
If Str1 > "" AndAlso Str1.Contains("[公办](有本科)") Then
e.Style = "小于零值"
End If
End If
谢谢老师!!
现在又有新的问题:单元格中:包含”有本科“,显示单元格颜色为"高学费"颜色
,如果:单元格有”有本科“且有”民办“,则单元格不显示为"高学费"颜色
,为正常颜色,这个”民办“如何加上,代码如何修改。谢谢老师!!
If e.Col.Name = "专业简注" Then
Dim Str1 As String = e.Row("专业简注")
If Str1 > "" AndAlso Str1.Contains("有本科") Then
e.Style = "高学费"
End If
End If
[此贴子已经被作者于2024/8/21 16:24:50编辑过]
If Str1 > "" AndAlso Str1.Contains("有本科") AndAlso Str1.Contains("民办")=false Then
[此贴子已经被作者于2024/8/21 16:44:33编辑过]