VB中空口前景色和背景色的使用函数以及代码