返回列表 上一主題 發帖

[發問] 如何判斷TextBox中無輸入值

acdx

帖子
132 
主題
56 
精華
0 
積分
190 
點名
0  
作業系統
Win10 
軟體版本
Office 365 
閱讀權限
20 
性別
男 
註冊時間
2012-5-17 
最後登錄
2024-4-29 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-12-5 17:45 | 只看該作者

[發問] 如何判斷TextBox中無輸入值

要判斷TextBox1, TextBox3無輸入值, 我使用"<>0"做判斷式, 請問有其他更好的寫法嗎?
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        rpm = Val(TextBox1.Text)
        fan = Val(TextBox2.Text)
        pk = Val(TextBox3.Text)
        n = Val(TextBox4.Text)
        If rpm <> 0 Or pk <> 0 Then
            Exit Sub
        Else
            n = pk * 60 / rpm
        End If
    End Sub
收藏 分享

bigbrain2

帖子
5 
主題
1 
精華
0 
積分
50 
點名
0  
作業系統
windows 7 
軟體版本
6.1 
閱讀權限
20 
註冊時間
2017-3-12 
最後登錄
2023-2-7 
2#
發表於 2017-3-12 09:11 | 只看該作者
可以用len()函數來判斷

TOP

yoyobuy

帖子
8 
主題
2 
精華
0 
積分
10 
點名
0  
作業系統
xp 
軟體版本
xp 
閱讀權限
10 
註冊時間
2015-8-27 
最後登錄
2018-9-12 
3#
發表於 2017-4-10 08:09 | 只看該作者
TextBox1.Text <> ""

TOP

qekqo

帖子
6 
主題
1 
精華
0 
積分
50 
點名
0  
作業系統
xp  
軟體版本
office 2007 
閱讀權限
20 
註冊時間
2011-4-2 
最後登錄
2021-3-9 
4#
發表於 2017-6-28 17:49 | 只看該作者
用Len(rpm)>0來判斷，個人經驗會比較好一些。

TOP

georgehu

帖子
5 
主題
0 
精華
0 
積分
4 
點名
0  
作業系統
win10 
軟體版本
2013 
閱讀權限
10 
註冊時間
2017-6-9 
最後登錄
2021-11-20 
5#
發表於 2017-7-2 16:59 | 只看該作者
Trim(Text1.Value) = vbNullString

TOP

ychuang
　暱稱: 祈為黃文子

中學生Rank: 2

帖子
8 
主題
3 
精華
0 
積分
50 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2013 
閱讀權限
20 
性別
男 
註冊時間
2017-6-6 
最後登錄
2018-8-27 
6#
發表於 2017-7-2 23:21 | 只看該作者
本帖最後由 ychuang 於 2017-7-2 23:22 編輯

下面連結有很多方法與討論:
https://
social.msdn.microsoft.com/Forums/zh-TW/ed212512-c417-4a55-a9ff-8bec944d6259/textbox?forum=236

我沒權限發連結啊!!!請自己接龍一下^^"

TOP

        靜思自在 : 君子如水，隨方就圓，無處不自在。
返回列表 上一主題