textbox簡易除錯 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » textbox簡易除錯

返回列表下一主題上一主題發帖

[發問] textbox簡易除錯

　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生 Rank: 3 Rank: 3

帖子: 852
主題: 79
精華: 0
積分: 918
點名: 0
作業系統: Windows 7 , XP
軟體版本: Office 2007, Office 2003,Office 2010,YoZo Office
閱讀權限: 50
性別: 男
來自: 宇宙
註冊時間: 2011-4-8
最後登錄: 2024-2-21

1^# 跳轉到 »

發表於 2015-4-19 00:33 | 顯示全部帖子

回復 bobomi

看到美女老師回覆，當然要回，
抱歉抱歉，最近雜事比較多，比較慢回 >_
LITTLEFAT7048 發表於 2015-4-17 23:02

個人小見解

1.另類的方式
If tb5 <>"" or tb6 <>"" and tb7<>"" or tb8 <>"" then
MsgBox "請擇一輸入"
GoTo END1
elseif tb5="" and tb6="" and tb7="" and tb8="" then
MsgBox "數值全空白，請重新輸入"
GoTo END1
End If
2.Trim(TB5+TB6)
2-1 TB5="" TB6<>"" >>A = Trim(有資料) >> 移除空白字元後 >> A=有資料
Ex:TB5="" TB6=3 >>A = Trim(""+3) >> 移除空白字元後 >> A=3
2-2 TB5="" TB6="" >>A = Trim(空資料) >> 移除空白字元後 >> A=空資料
Ex:TB5="" TB6="" >>A = Trim(""+"") >> 移除空白字元後 >> A=""

複製代碼

  多做多想多學習，少看少錯少迷途

  多做=多多練習，多多編寫。
  多想=想想為什麼人家程式要那樣寫，如果換成自己，又會怎寫。
  多學習=學習人家的發問並解答，學習人家的寫法

  少看=只看不做也枉然

靜思自在 : 人要知福、惜福、再造福。

返回列表下一主題上一主題