以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于焦点问题。。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62661)

--  作者:as2517
--  发布时间:2015/1/5 23:35:00
--  [求助]关于焦点问题。。
看图,有几个空的录入框,我在保存里设置了必须输入内容,假如没输入,我点保存它提示 产品名称 内容为空。焦点自动落在这个框框上面。应该怎么写代码 谢谢
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20150105233235.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2015-1-5 23:35:28编辑过]

--  作者:有点甜
--  发布时间:2015/1/5 23:41:00
--  

 判断,比如

 

If e.Form.Controls("TextBox1").Text = nothing Then

    msgbox("不能为空")

    return

End If


--  作者:as2517
--  发布时间:2015/1/6 8:40:00
--  
我的意思是点  保存 以后,必须输入内容的没输入,系统会弹出对话框。用户点了确定以后。鼠标的光标能自动显示在这个没有输入内容的录入框中。
--  作者:Bin
--  发布时间:2015/1/6 8:45:00
--  

If e.Form.Controls("TextBox1").Value= nothing Then

    msgbox("不能为空")

    e.Form.Controls("TextBox1").select()

    return

End If


--  作者:as2517
--  发布时间:2015/1/6 9:40:00
--  
谢谢两位老师,假如是多了录入框的话,改怎么写

"ComboBox1","ComboBox2","DropBox1","TextBox3","TextBox4"

--  作者:有点甜
--  发布时间:2015/1/6 9:42:00
--  
 你就写多行4楼的代码。