系统样式设置
DataTable和Table都有个SysStyles集合,用于返回指定名称的系统样式,例如:
DataTables("成绩表").SysStyles("Alternate")
Tables("成绩表").SysStyles("Alternate")
表示成绩表交替行的样式。
系统样式包括:
Normal: 数据区
Frozen: 冻结区
Alternate: 交替行
EmptyArea: 空白区
Fixed: 标题行
Highlight:
选定区域
Focus:
焦点单元格
ModifiedCell: 已修改单元格
SelectedRowHeader: 选定行的行标题
SelectedColumnHeader:选定列的列标题
CurrentRow: 当前行
GrandTotal: 总计行
Subtotal0: 小计行0
Subtotal1: 小计行1
Subtotal2: 小计行2
Subtotal3: 小计行3
Subtotal4: 小计行4
Subtotal5: 小计行5
样式包括以下属性:
BackColor: 背景颜色
ForeColor: 字体颜色
BorderColor: 网格线颜色
FontBold: 逻辑型,设为True,字体加粗
FontItalic: 逻辑型,设为True,字体倾斜
FontStrikeout:逻辑型,设为True,字体带删除线
FontUnderline:逻辑型,设为True,字体带下划线
示例
希望将空白区的背景颜色设为白色:
DataTables(
"表A").SysStyles("EmptyArea").BackColor = Color.White通过DataTable设置SysStyles,对所有基于此DataTable的Table都会生效,你也可以单独针对某个Table进行设置,例如:
Tables("表A").SysStyles("EmptyArea").BackColor = Color.White