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

一個迴圈語法錯誤

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



註冊時間: 2006-10-11
文章: 60
來自: 台南市

第 1 樓

發表發表於: 星期四 四月 12, 2007 3:34 pm    文章主題: 一個迴圈語法錯誤 引言回覆

各位大大你們好,小弟有個程式用到迴圈,不過一直語法錯誤,一直看不出哪裡錯,可以請各位大大幫忙嗎,感激不盡!!
For V=1 To 15
X=V+10
Y=V+25
Z=V+40
Thisform.Text&X.value=Alltrim(IIF(Seek(Inspbase.Inb_Code&V,"Inspitem","Ins_code"),Inspitem.Ins_name,''))
Thisform.Text&Y.value=Alltrim(IIF(Seek(Inspbase.Inb_Code&V,"Inspitem","Ins_code"),Inspitem.Ins_sample,''))
Thisform.Text&Z.value=Inspbase.Inb_lstand&V+'---'+Inspbase.Inb_hstand&V
Endfor

語法錯誤指在
Thisform.Text&X.value=Alltrim(IIF(Seek(Inspbase.Inb_Code&V,"Inspitem","Ins_code"),Inspitem.Ins_name,''))

麻煩各位了,謝謝!!
回頂端
檢視會員個人資料 發送私人訊息
syntech



註冊時間: 2003-05-16
文章: 4212
來自: Taipei,Taiwan

第 2 樓

發表發表於: 星期四 四月 12, 2007 4:18 pm    文章主題: 引言回覆

關我屁事!!! ^_^

看你這麼喜歡用 &,
應該就是這裡出錯吧

_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問

請聯絡我們,也許我們幫得上忙
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 AIM Address
shyhpyng



註冊時間: 2006-10-11
文章: 60
來自: 台南市

第 3 樓

發表發表於: 星期四 四月 12, 2007 4:34 pm    文章主題: 引言回覆

syntech 寫到:
關我屁事!!! ^_^

看你這麼喜歡用 &,
應該就是這裡出錯吧


厚!!S大哥,教一下啦!!因為這個寫法是學人家的,他是這麼用
For Vi=1 To 20
VV=Allt(Str(Vi))
VX=Padl(VV,2,'0')
ThisForm.MainGrid.Column&VV..Header1.Caption=''
ThisForm.MainGrid.Column&VV..Header1.Caption=Allt(IIf(Seek(Diespcode.Dpc_spcode&VX,'Diespec'),Diespec.Dp_name,''))
If !Empty(Diespcode.Dpc_spcode&VX)
ThisFormset.End_col=Vi+1
ThisForm.MainGrid.Column&VV..Enabled=.T.
Else
ThisForm.MainGrid.Column&VV..Enabled=.F.
Endi
Endfor

我就依樣畫葫蘆,誰知道不行....可是他這樣用就可以耶!!!球球你!!!
回頂端
檢視會員個人資料 發送私人訊息
abcyei



註冊時間: 2004-01-01
文章: 48


第 4 樓

發表發表於: 星期四 四月 12, 2007 8:55 pm    文章主題: 引言回覆

shyhpyng兄,你也看仔細一點嘛
1.人家的VV=Allt(Str(Vi))是轉成文字ㄟ,你只有X=V+10這是數值ㄟ
2.ThisForm.MainGrid.Column&VV..Header1.Caption=''請注意Column&VV..Header1,&VV之後是..ㄟ不是.而已
這樣你瞭了嗎
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件
shyhpyng



註冊時間: 2006-10-11
文章: 60
來自: 台南市

第 5 樓

發表發表於: 星期五 四月 13, 2007 9:11 am    文章主題: 引言回覆

abcyei 寫到:
shyhpyng兄,你也看仔細一點嘛
1.人家的VV=Allt(Str(Vi))是轉成文字ㄟ,你只有X=V+10這是數值ㄟ
2.ThisForm.MainGrid.Column&VV..Header1.Caption=''請注意Column&VV..Header1,&VV之後是..ㄟ不是.而已
這樣你瞭了嗎


感謝各位指導,真的是這兩個地方有錯!!真是羞愧.....謝謝,謝謝喔! Embarassed
回頂端
檢視會員個人資料 發送私人訊息
garfield
Site Admin


註冊時間: 2003-01-30
文章: 2157


第 6 樓

發表發表於: 星期五 四月 13, 2007 5:37 pm    文章主題: 引言回覆

巨集的變數只能用文字型態
巨集名稱後接上. 表示.以前是巨集名稱(或是說巨集名稱到.為止),
例:
temp1a='aaa'
temp2a='bbb'
for i=1 to 2
macrostr=ltrim(str(i))
? temp&macrostr.a
next


用..的第二個. 你該知道是各個物件名稱的分隔符號

_________________
利用>>搜尋<<的功能會比問的還要快得到答案.
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

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


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