MSFlexGrid1.AddItem rs1.Fields("姓名") + vbTab + CStr(rs1.Fields("语文"))    '正确的

str="rs1.Fields(""姓名"") + vbTab + CStr(rs1.Fields(""语文""))"
MSFlexGrid1.AddItem str   '这样为什么就不行了？

我试了一下 完全可以的，不知道你什么情况，报错原因是什么

哦，就是对的，那这样行吗？
strrss = rs1.Fields(rs1(0).Name)
for i = 1 to rs1.Fields.count - 1
strrss = strrss + vbTab + CStr(rs1.Fields(rs1(i).Name))
next i
    Do Until rs1.EOF
        MSFlexGrid1.AddItem strrss
        rs1.MoveNext
    Loop

[ 本帖最后由 txxb 于 2014-12-4 14:34 编辑 ]

str="rs1.Fields(""姓名"") + vbTab + CStr(rs1.Fields(""语文""))"
去掉双引号str是字符串：res.Fields("姓名") + vbTab + CStr(rs1.Fields("语文"))
双引号内的字符均被认为是一字符串。没有变量没有运算符.