vb access ADO *********************
dim sql as string
dis rs as new adodb.recordsetsql = "select a,b,c from tmpdbf"
rs.Open sql, cnn, adOpenStatic, adLockOptimisticset mshflexgrid1.datasource = rs*****************注:A 是一个逻辑型字段我用sql语句将符合条件的记录显示在mshflexgrid中我的问题是:如何将a 为 否的值显示为红色的呢?请高手指点一下。谢谢
dim sql as string
dis rs as new adodb.recordsetsql = "select a,b,c from tmpdbf"
rs.Open sql, cnn, adOpenStatic, adLockOptimisticset mshflexgrid1.datasource = rs*****************注:A 是一个逻辑型字段我用sql语句将符合条件的记录显示在mshflexgrid中我的问题是:如何将a 为 否的值显示为红色的呢?请高手指点一下。谢谢
解决方案 »
- 用户控件
- 如何在mdi窗体中的甲窗体调用乙窗体时实现类似 .show 1的效果
- 帮我找错误!
- 关于ADO的基础操作问题。
- 如何在NumLock为关闭状态时还能从小键盘输入数字.
- 在线等待回复,我是初学者,帮帮我?
- VB6在windowsXP中,无法用RmDir命令删除文件夹,只能删除文件,怎么回事?如何解决?在windows98中可以删除。
- 菜鸟请求一简单SQL语句~~
- 我用SetScrollRange给pictureBox控件添加了滚动条,但是怎么也不能滚动,不知怎么回事?
- 请介绍一下WINSock控件下使用"GET"及其他命令的用法。
- 怎样根据一个PID,得到相应软件的顶级窗口的句柄?
- VB中的msgbox 能控制它的字体类型和大小的吗.??
if MSgrid1.TextMatrix(i, 1) = "否" then
MSgrid1.CellBackColor = &HD0FFE0 '寫成紅色
end if
next
for i=0 to mshflexgrid1.rows-1
if mshflexgrid1.TextMatrix(i, 1) = "否" then
mshflexgrid1.CellBackColor = &HD0FFE0 '寫成紅色
end if
next