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

請問如何判定null值則停止執行

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



註冊時間: 2004-05-30
文章: 50


第 1 樓

發表發表於: 星期日 五月 30, 2004 1:26 pm    文章主題: 請問如何判定null值則停止執行 引言回覆

我以前好像有學過 現在記不起來怎麼寫程式碼了
我想設一個表單可以輸入"委外廠商編號","數量","單位"的文字輸入方塊..
還有一個按扭確定輸入..
想請問前輩們按鈕的"click"程式碼要怎麼寫..
使當使用者在"單位"與"數量"沒輸入數值(null)時停止執行..
跳回表單..
有點小急..麻煩指教一下..
謝謝..
回頂端
檢視會員個人資料 發送私人訊息
an1060



註冊時間: 2004-02-29
文章: 48
來自: 高雄

第 2 樓

發表發表於: 星期日 五月 30, 2004 4:16 pm    文章主題: 引言回覆

不明白你的CLICK事件要寫些什麼東東
沒輸入資料不代表NULL
ISNULL() 是否NULL值
EMPTY() 是否空值
回頂端
檢視會員個人資料 發送私人訊息
iddqd69



註冊時間: 2004-05-30
文章: 50


第 3 樓

發表發表於: 星期日 五月 30, 2004 5:06 pm    文章主題: 引言回覆

an1060 寫到:
不明白你的CLICK事件要寫些什麼東東
沒輸入資料不代表NULL
ISNULL() 是否NULL值
EMPTY() 是否空值


有一個文字輸入方塊..controlsource為A..
click事件: 若A沒有輸入資料的話=messagebox("請輸入資料",64,"訊息視窗")
並跳回表單..重新輸入..
有輸入資料的話則將a的值寫入資料表格data內的Q欄位..
當資料寫入資料表格內後回到表單畫面..且將剛才輸入的A值清除..

大概就是這樣子..麻煩指教一下..
謝謝~
回頂端
檢視會員個人資料 發送私人訊息
Ruey



註冊時間: 2003-03-12
文章: 1698
來自: tunglo

第 4 樓

發表發表於: 星期日 五月 30, 2004 5:29 pm    文章主題: 引言回覆

大概是這樣吧!!
代碼:

IF ALLTRIM(THISFORM.廠商代號.value)==""
   messagebox("請輸入資料",64,"訊息視窗")
   THISFORM.廠商代號.SETFOCUS()
   RETURN
ENDIF
IF THISFORM.數量.value<=0
   messagebox("請輸入資料",64,"訊息視窗")
   THISFORM.數量.SETFOCUS()
   RETURN
ENDIF
IF ALLTRIM(THISFORM.單位.value)==""
   messagebox("請輸入資料",64,"訊息視窗")
   THISFORM.單位.SETFOCUS()
   RETURN
ENDIF

SELECT 委外單
REPLACE 廠商編號 WITH THISFORM.廠商編號.VALUE
REPLACE 單位 WITH THISFORM.單位.VALUE
REPLACE 數量 WITH THISFORM.數量.VALUE

SELECT 委外單
APPEND BLANK
[/code]
_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!

學會VFP使用者社區的搜尋,Code才會更有趣~
#############################
回頂端
檢視會員個人資料 發送私人訊息
iddqd69



註冊時間: 2004-05-30
文章: 50


第 5 樓

發表發表於: 星期日 五月 30, 2004 6:27 pm    文章主題: 引言回覆

Ruey 寫到:
大概是這樣吧!!
代碼:

IF ALLTRIM(THISFORM.廠商代號.value)==""
   messagebox("請輸入資料",64,"訊息視窗")
   THISFORM.廠商代號.SETFOCUS()
   RETURN
ENDIF
IF THISFORM.數量.value<=0
   messagebox("請輸入資料",64,"訊息視窗")
   THISFORM.數量.SETFOCUS()
   RETURN
ENDIF
IF ALLTRIM(THISFORM.單位.value)==""
   messagebox("請輸入資料",64,"訊息視窗")
   THISFORM.單位.SETFOCUS()
   RETURN
ENDIF

SELECT 委外單
REPLACE 廠商編號 WITH THISFORM.廠商編號.VALUE
REPLACE 單位 WITH THISFORM.單位.VALUE
REPLACE 數量 WITH THISFORM.數量.VALUE

SELECT 委外單
APPEND BLANK
[/code]


那如果儲存完資料後要把所有表單內的值清空的話..
使用這程式碼可以嗎?
thisform.setall("Value","","textbox")
謝謝..
回頂端
檢視會員個人資料 發送私人訊息
an1060



註冊時間: 2004-02-29
文章: 48
來自: 高雄

第 6 樓

發表發表於: 星期日 五月 30, 2004 7:37 pm    文章主題: 引言回覆

是可以,但這樣子數量那一個物件傳回之值會變成文字型態,你得再轉成數值,
也就是一開始你就得設為文字型態
IF ALLTRIM(THISFORM.數量.value) == ""
messagebox("請輸入資料",64,"訊息視窗")
THISFORM.數量.SETFOCUS()
RETURN
ENDIF



SELECT 委外單

REPLACE 數量 WITH VAL(THISFORM.數量.VALUE )
回頂端
檢視會員個人資料 發送私人訊息
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

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


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