VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

有關inlist函數

 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
alung



註冊時間: 2005-11-23
文章: 80


第 1 樓

發表發表於: 星期五 十一月 13, 2015 10:48 am    文章主題: 有關inlist函數 引言回覆

aa='c020'
inlist(aa,'c02') 卻傳回 .T.
不知是哪裡出問題, 有人知道嗎? 謝謝
回頂端
檢視會員個人資料 發送私人訊息
215001



註冊時間: 2003-06-11
文章: 389


第 2 樓

發表發表於: 星期五 十一月 13, 2015 11:41 am    文章主題: 引言回覆

aa='c020'

set exact on
? inlist(aa,'c02')

set exact off
? inlist(aa,'c02')
回頂端
檢視會員個人資料 發送私人訊息
alung



註冊時間: 2005-11-23
文章: 80


第 3 樓

發表發表於: 星期五 十一月 13, 2015 12:08 pm    文章主題: 引言回覆

哦~謝謝215001的幫忙
回頂端
檢視會員個人資料 發送私人訊息
alung



註冊時間: 2005-11-23
文章: 80


第 4 樓

發表發表於: 星期五 十一月 13, 2015 2:24 pm    文章主題: 引言回覆

select unit from taba
kind_w="'"+'c01'+"'"+","+"'"+'c02'+"'"+","
?kind 出現 'c01','c02',
kind_w=substr(kind_w,1,len(kind_w)-1)
?kind_w 出現 'c01','c02'
if inlist(unit,kind_w) 有資料卻都撈失敗?? 謝謝幫忙
回頂端
檢視會員個人資料 發送私人訊息
alung



註冊時間: 2005-11-23
文章: 80


第 5 樓

發表發表於: 星期五 十一月 13, 2015 2:56 pm    文章主題: 引言回覆

alung 寫到:
select unit from taba
kind_w="'"+'c01'+"'"+","+"'"+'c02'+"'"+","
?kind 出現 'c01','c02',
kind_w=substr(kind_w,1,len(kind_w)-1)
?kind_w 出現 'c01','c02'
if inlist(unit,kind_w) 有資料卻都撈失敗?? 謝謝幫忙

改成if inlist(unit,&kind_w) 就ok了,感謝
回頂端
檢視會員個人資料 發送私人訊息
alung



註冊時間: 2005-11-23
文章: 80


第 6 樓

發表發表於: 星期五 十一月 13, 2015 3:20 pm    文章主題: 引言回覆

alung 寫到:
alung 寫到:
select unit from taba
kind_w="'"+'c01'+"'"+","+"'"+'c02'+"'"+","
?kind 出現 'c01','c02',
kind_w=substr(kind_w,1,len(kind_w)-1)
?kind_w 出現 'c01','c02'
if inlist(unit,kind_w) 有資料卻都撈失敗?? 謝謝幫忙

改成if inlist(unit,&kind_w) 就ok了,感謝

雖然 ok 只是吶悶
?&kind 會顯示 c01 c02 但卻可已成功撈到~有人知道原因嗎? 謝謝
回頂端
檢視會員個人資料 發送私人訊息
perry



註冊時間: 2014-07-20
文章: 203


第 7 樓

發表發表於: 星期五 十一月 13, 2015 3:38 pm    文章主題: 引言回覆

不知下面這個函數是不是更好用一點!!
aa='c01,c02,'
bb='c02'
?at(bb+',',aa)
回頂端
檢視會員個人資料 發送私人訊息
perry



註冊時間: 2014-07-20
文章: 203


第 8 樓

發表發表於: 星期五 十一月 13, 2015 4:25 pm    文章主題: 引言回覆

a1='c01'
a2='c02'
aa='a1,a2'
?&aa ->&等於拿掉左右的單引號 變成 ?a1,a2
回頂端
檢視會員個人資料 發送私人訊息
alung



註冊時間: 2005-11-23
文章: 80


第 9 樓

發表發表於: 星期五 十一月 13, 2015 4:33 pm    文章主題: 引言回覆

select unit from taba
恩恩~改成
kind_w=kind_w+勾選單位代碼變數+","
if at(unit+',',kind_w)>0 這方法剛也測試 ok
謝謝 perry 先進提供比較簡單的方式哦
回頂端
檢視會員個人資料 發送私人訊息
ezpos



註冊時間: 2011-04-20
文章: 323


第 10 樓

發表發表於: 星期五 十二月 30, 2016 3:57 pm    文章主題: 引言回覆

inList另外一種做法...


lc_str ="住宿"
lc_arryString1=";
[住宿],;
[休息],;
[預備],;
[打掃],;
[巡房],;
[管制],;
[修繕],;
[備註],;
[提醒]"

lc_arryString2=";
[空房],;
[退房],;
[正常]"


****按照底下的動作 分別執行
DO case
CASE Inlist( lc_str , &lc_arryString1)
thisform.do_01(to_Object)

CASE Inlist( lc_str , &lc_arryString2)
thisform.do_02(to_Object)
ENDCASE

_________________
ezPos收銀機 簡單好用低成本 http://www.ezpos.info
全新美觀的POS收銀機.POS軟硬體耗材.
軟體客制化.網站規劃....能賺錢的都可以找我

http://www.twelife.com 台灣生活網
回頂端
檢視會員個人資料 發送私人訊息 參觀發表人的個人網站
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作