两个地方:
1:是数据库中查询的列数值为空时.
2:将数据导入到 MSFlexGrid 控件时如果数据为空时.建议你使用断点查找错误地方.
第一个地方时: rs_data1.Fields(0).value & "" 使用这个方法可解决一部分问题.
你的表头设定建议:一维数组加循环更好并做一个单独函数.
行赋值的操作也采用一维数组加循环来操作.
If IsNull(rs_data1.Fields(0)) Then MSFlexGrid1.Text = rs_data1.Fields(0) Else
isnull 如果表达式为 Null，则 IsNull 返回 True；否则 IsNull 返回 False
setgridhead() 过程设定表头及宽度
setgrid() 过程设定总列数与总行数
你所说的错误估计在过程 displaygrid1() 中吧?
'rs_data1.MoveNext 这一句你为何在循环中要注销呢.
循环前已判断 EOF 为何还在前面使用 NOT EOF 呢 不必要了.
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024