新聞中心
vb.net文本框輸入后按回車或tab判斷是不是數(shù)字,不是就跳出提示框,怎么打,我哪里打錯(cuò)啦
你用的都是vb6的代碼,改成:
創(chuàng)新互聯(lián)是專業(yè)的全南網(wǎng)站建設(shè)公司,全南接單;提供做網(wǎng)站、網(wǎng)站制作,網(wǎng)頁設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行全南網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴(kuò)展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來合作!
Private Sub TextBox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus
If IsNumeric(TextBox1.Text) = False Then
MsgBox("輸入有非數(shù)字字符,請重新輸入", vbOKOnly, "友情提示")
TextBox1.Focus()
Return
End If
End Sub
vb 怎么在文本框顯示提示“請輸入”,當(dāng)文本框獲得焦點(diǎn)時(shí)清空“請輸入
Private?Sub?Form_Load()
Text1.Text?=?"請輸入"
End?Sub
Private?Sub?Text1_GotFocus()
If?Text1.Text?=?"請輸入"?Then?Text1.Text?=?""
End?Sub
Private?Sub?Text1_LostFocus()
If?Text1.Text?=?""?Then?Text1.Text?=?"請輸入"
End?Sub
補(bǔ)充說明:不提倡你的做法。盡管這是目前軟件或網(wǎng)頁比較流行的提示用戶輸入的方式,但別忘了VB6是上世紀(jì)的古董級程序設(shè)計(jì)語言,當(dāng)時(shí)的軟件界面設(shè)計(jì)中并沒有這種方式的,而我上面提供的用代碼來解決的方式必然會(huì)增加系統(tǒng)負(fù)擔(dān)。所以最好還是用標(biāo)準(zhǔn)方式即Label標(biāo)簽控件來進(jìn)行提示。
VB.NET ,文本框限制輸入數(shù)字個(gè)數(shù)。例如不低于5位數(shù)而不大于11位數(shù)。違反則有提示。
input type="text" maxlength="11" /這是控制最大輸入字?jǐn)?shù)至于不能少于11個(gè)字,需要在點(diǎn)擊保存按鈕時(shí),通過.length來控制
分享名稱:包含vb.net文本輸入提示的詞條
文章位置:http://fisionsoft.com.cn/article/ddogiss.html