以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助光标定位直接输入数据问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=130616)

--  作者:丰田
--  发布时间:2019/1/27 8:36:00
--  求助光标定位直接输入数据问题
怎样去掉蓝色而直接输入呢
--  作者:丰田
--  发布时间:2019/1/27 8:40:00
--  
附件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.zip


--  作者:有点甜
--  发布时间:2019/1/27 10:52:00
--  

Dim r As Row = CurrentTable.AddNew()

DataTables("表A").DataCols("机动车号牌号码").Defaultvalue="""辽A"""
e.Form.Controls("TextBox2").Select
e.Form.Controls("TextBox2").SelectionStart = e.Form.Controls("TextBox2").text.length


--  作者:丰田
--  发布时间:2019/1/27 11:17:00
--  
非常感谢 这个代码在第一次启动时不起作用只有入录了一条记录以后才起作用为什么
--  作者:有点甜
--  发布时间:2019/1/27 11:45:00
--  

参考

 

DataTables("表A").DataCols("机动车号牌号码").Defaultvalue="""辽A"""
Dim r As Row = CurrentTable.AddNew()
e.Form.Controls("TextBox2").Select
e.Form.Controls("TextBox2").SelectionStart = e.Form.Controls("TextBox2").text.length