VB非常见知识总结

1、VB.Net设置Excel中单元格字体

sheet.Range(sheet.Cells(row, stp), sheet.Cells(row, stp)).Font.Name = "Wingdings 2"

设置行row，列stp 的字体样式为[Wingdings 2]

2、Wingdings 2 字体为微软自带的图形字体

例如：£代表未选中的CheckBox，R代表选中的CheckBox

3、清空表数据

truncate table tablename

 

4、表单控件的值取得

5、10进制转为RGB颜色

inputColorIntVal为10进制颜色代码

mDef_GridInputColor = ColorTranslator.FromHtml("#" & Convert.ToString(inputColorIntVal, 16))

RGB转10进制

(( 红 * 256) + 绿) * 256 + 蓝, 然后转为16进制计算器上的按发就是:红数字, *, 256, +, 绿数字, *, 256, +, 蓝数字, 十六进制