Office中国论坛/Access中国论坛

标题: 求助!在语句结尾找到字符是怎么回事? [打印本页]

作者: susu333 时间: 2006-9-20 18:03
标题: 求助!在语句结尾找到字符是怎么回事?
想实现的效果:如果营业性质中包含"非营业"，手续费率等于0.2，包含家庭，手续费率等于0.1，其它手续费率等于0.3，运行之后出现“在语句结尾找到字符”，我哪里错了？

SELECT [0814].签单保费, [0814].核保日期, [0814].使用性质, [0814].手续费
FROM 0814;
Private Sub test();
Dim strSQL As String;
strSQL="UPDATE [0814] SET [手续费] ='" &  myFunction([字段1]) & "'";
DoCmd.Runsql strSQL;
End Sub;
Private Function myFunction(x As string);
Select Case x;
Case like '%家庭%';
myFunction = 0.1;
Case like '%非营业%';
myFunction = 0.2;
Case else;
myFunction = 0.3;
End Select;
End Function;

作者: andymark 时间: 2006-9-20 18:16
符号;是自动生成的,还是自已输入的?

最好把例子传上来

作者: fan0217 时间: 2006-9-20 19:57
你的是那里来的代码啊，怎么这样呢，都以分号结束。

作者: susu333 时间: 2006-9-20 20:30
谢谢，是我自己输入的。不太熟悉sql。[em04]

[此贴子已经被作者于2006-9-20 12:47:49编辑过]

作者: susu333 时间: 2006-9-20 20:35
举例：

想自动更新手续费率和手续费合计。

如果产品大类为数码相机，手续费率为10%，其中奥林巴斯加3%

如果产品大类为摄像机，手续费率为11%

其它产品大类手续费率为12%

如果销售日期等于收款日期，则所有的手续费率在原有基础上加2%。

[attach]20436[/attach]

[此贴子已经被作者于2006-9-20 12:43:51编辑过]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)