一个逻辑列的奇怪问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 一个逻辑列的奇怪问题

共有1751人关注过本帖树形打印复制链接主题：一个逻辑列的奇怪问题

happyft

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1930 积分：17564 威望：0 精华：0 注册：2014/7/29 19:09:00

一个逻辑列的奇怪问题 发帖心情

Post By：2017/4/13 12:34:00 [显示全部帖子]

代码中间有一行如下:blog是一个逻辑列

If dr("blog") = true Then '如果用true后面的全部代码都不会执行,用数字 1 就没有问题,不知为什么?

......

end if

谢谢!

HappyFt

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1930 积分：17564 威望：0 精华：0 注册：2014/7/29 19:09:00

Post By：2017/4/13 13:03:00 [显示全部帖子]

真的理解不了?

If dr("isblog") = 1 Then '如果用true程序会停止什么都不显示,不知为什么

msgbox(1)

strlog1 + = "Select " & "'" & Date.Now() & "','" & MyName & "','" & MyGroup & "','新增','" & sqltbn & "','" & r(dr("IDC")) & "','" & r(dr("Idc2")) & "',0" & vbcrlf & "Union All" & vbcrlf '--新增行行号都置为0

msgbox(2)

End If

msgbox(strlog1)

上面的代码运行结果,三个msgbox的弹出框都显示为空的,连msgbox(1)也显示空的,如果true改为 1 则三个弹出框都不弹出,,,为什么?

HappyFt

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1930 积分：17564 威望：0 精华：0 注册：2014/7/29 19:09:00

Post By：2017/4/13 15:17:00 [显示全部帖子]

第一个弹出aaatrue,第二三四个弹出框上全部显示是空的,

下一主题 >> << 上一主题

主题：一个逻辑列的奇怪问题