 |
VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
iddqd69
註冊時間: 2004-05-30
文章: 50
第 1 樓
|
 發表於: 星期二 十二月 07, 2004 10:41 am 文章主題: 程式碼的問題請問.. |
 |
|
請問幾個問題..
1. 兩個表單內的值如何回傳?
有兩個表單為form1與form2..
form1有兩個文字輸入方塊為a.b...form2有個文字輸入方塊為c..
首先將form1的a值傳到form2..將值顯示在c..
在form2執行後再將值傳回到b..
2. 我有一個table..欄位有"加工1", "加工2", "加工3"..
locate for.........
Z=alltrim(加工1)+","+alltrim(加工2)+","+alltrim(加工3)
if alltrim(加工3)==""
Z=alltrim(加工1)+","+alltrim(加工2)+","+
endif
if alltrim(加工3)=="" and alltrim(加工2)==""
Z=alltrim(加工1)
endif
if alltrim(加工3)=="" and alltrim(加工2)=="" and alltrim(加工1)==""
Z="無加工"
endif
請問以上的程式碼有辦法簡化嗎?
麻煩前輩們替我解惑..謝謝..  |
|
| 回頂端 |
|
 |
yctsai
註冊時間: 2003-04-11
文章: 180
第 2 樓
|
| 發表於: 星期二 十二月 07, 2004 11:57 am 文章主題: |
|
|
z=' '
for i=1 to 3
x='加工'+alltrim(str(i))
z=z+iif(&x<>' ',alltrim(&x)+',',' ')
endfor
if z=' '
z='無加工'
endif
&&如果欄位多,照您的寫法,會寫死..... |
|
| 回頂端 |
|
|
garfield
Site Admin
註冊時間: 2003-01-30
文章: 2160
第 3 樓
|
| 發表於: 星期二 十二月 07, 2004 4:27 pm 文章主題: |
|
|
欄位太多 ==> 寫到手酸 ==> 眼睛"脫窗" ==> 神精錯亂 ==> 寫死
_________________
利用>>搜尋<<的功能會比問的還要快得到答案. |
|
| 回頂端 |
|
|
syntech
註冊時間: 2003-05-16
文章: 4249
來自: Taipei,Taiwan
第 4 樓
|
| 發表於: 星期二 十二月 07, 2004 11:58 pm 文章主題: |
|
|
可是我不覺得有"惑",
我只覺得"懶"......
"惑"可以解,
"懶",我就沒辦法了.
_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問
請聯絡我們,也許我們幫得上忙 |
|
| 回頂端 |
|
|
iddqd69
註冊時間: 2004-05-30
文章: 50
第 5 樓
|
| 發表於: 星期三 十二月 08, 2004 8:11 am 文章主題: |
|
|
| syntech 寫到: | 可是我不覺得有"惑",
我只覺得"懶"......
"惑"可以解,
"懶",我就沒辦法了. |
我有尋找過了.. |
|
| 回頂端 |
|
|
syntech
註冊時間: 2003-05-16
文章: 4249
來自: Taipei,Taiwan
第 6 樓
|
|
| 回頂端 |
|
|
|
|
您 無法 在這個版面發表文章
您 無法 在這個版面回覆文章
您 無法 在這個版面編輯文章
您 無法 在這個版面刪除文章
您 無法 在這個版面進行投票
您 無法 在這個版面附加檔案
您 無法 在這個版面下載檔案
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
