 |
VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
sky2046
註冊時間: 2005-02-03
文章: 14
第 1 樓
|
 發表於: 星期六 二月 26, 2005 9:13 pm 文章主題: vfp求助 |
 |
|
With This.Parent
xpath = Alltrim(.txtPath.Value)
xiwant = Alltrim(.txtString.Value)
Do Case
Case Empty(xpath)
MessageBox("",0+16+0,"")
Case Empty(xiwant)
MessageBox("",0+16+0,"")
Otherwise
Select cantopen
Zap
.Grid2.Refresh
Select result
Zap
.Grid1.Refresh
xcheck = .Chk1.Value
ThisForm.Expdir(xpath) ——这句什么意思？
If Reccount("result") = 0
MessageBox("𣐀",0+64+0,"")
Else
MessageBox("",0+64+0,"")
EndIf
EndCase
EndWith
还有就是怎么把它改写成一个关键词的检索？？
_________________
FFXIII |
|
| 回頂端 |
|
 |
syntech
註冊時間: 2003-05-16
文章: 4252
來自: Taipei,Taiwan
第 2 樓
|
| 發表於: 星期六 二月 26, 2005 11:25 pm 文章主題: |
|
|
ThisForm.Expdir(xpath) ——这句什么意思？
你的FORM上有一個自定函式 Expdir()
_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問
請聯絡我們,也許我們幫得上忙 |
|
| 回頂端 |
|
|
|
|
您 無法 在這個版面發表文章
您 無法 在這個版面回覆文章
您 無法 在這個版面編輯文章
您 無法 在這個版面刪除文章
您 無法 在這個版面進行投票
您 無法 在這個版面附加檔案
您 無法 在這個版面下載檔案
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
