首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

高手看看简单的判断代码有关问题

2012-03-06 
高手看看简单的判断代码问题?我想声明一个WB变量,当WB1时用通用名查询,WB0用简称查询,初始化WB0 用Comm

高手看看简单的判断代码问题?
我想声明一个WB变量,当WB=1时用通用名查询,WB=0用简称查询,初始化WB=0 用Command1进行切换成WB=1
然后用If语句进行查询,代码如下:

C# code
If WB=1Select 通用名,曾用名,规格,包装,适应症,药品编号 Where 通用名 Like &MyValue. From Tab_Drug Into Cursor Temp_DrugElse MyValue="'%"+Alltrim(This.Value)+"%'"Select 通用名,曾用名,规格,包装,适应症,药品编号 Where 简称 Like &MyValue. From Tab_Drug Into Cursor Temp_DrugEndif

运行后,提示找不到WB变量,还有上面的If语句有问题吗?谢谢!!

[解决办法]
SQL code
表单的 Load 事件加代码:Public WBWB=0Command1 的 Click 事件代码:If WB=0    WB=1Else    WB=0Endif查询按钮的 Click 事件代码:MyValue="'%"+Alltrim(This.Value)+"%'"If WB=1    Select 通用名,曾用名,规格,包装,适应症,药品编号 Into Cursor Temp_Drug From Tab_Drug Where 通用名 Like &MyValue.Else    Select 通用名,曾用名,规格,包装,适应症,药品编号 Into Cursor Temp_Drug From Tab_Drug Where 简称 Like &MyValue.Endif 

热点排行