表达式错误 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 表达式错误

共有5941人关注过本帖树形打印复制链接主题：表达式错误

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2015/4/10 13:55:00 [显示全部帖子]

今天居然这么多人问这个问题，你是从哪里学到这样的写法？

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2015/4/10 14:02:00 [显示全部帖子]

以下是引用jiangyong在2015/4/10 13:59:00的发言：
s="A|B|C|D"

s1=

if d in ('A','B','C','D') then

这段话出在哪里，是谁教你的？

[此贴子已经被作者于2015/4/10 14:02:40编辑过]

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2015/4/10 14:08:00 [显示全部帖子]

正确的代码：

Dim cmd As New SQLCommand
cmd.Connection Name = ""数据源
cmd.CommandText = "SELECT Count([_Identify]) Fro m {合同} where 项目名称 = '" & Vars("xmmc") & "' And 合同对象 = '" & & e.Table.Current("费用对象") & "'"
If cmd.ExecuteScalar > 0 Then
Forms("待办").Controls("Button14").Visible = True
End If

[此贴子已经被作者于2015/4/10 14:08:05编辑过]

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2015/4/10 14:13:00 [显示全部帖子]

还可以参考我在另一个帖子的回复：

dim s as string = "123,124,235"

dim vs() as string = s.split(",")

for each v as string in vs

if v = e.table.current("列名") then

执行代码

exit for

end if

in是表达式和sql语句的用法，不是代码的用法

[此贴子已经被作者于2015/4/10 14:13:26编辑过]

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

主题：表达式错误