Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共7 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:焦点文本框输入问题

1楼
飞云 发表于:2023/12/22 15:48:00
Dim t1 As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim t2 As WinForm.TextBox = e.Form.Controls("TextBox2")
If t1.Focused Then
    t1.Text = t1.Text.Insert(t1.SelectionStart, e.Row(e.Col.Name))
    t1.SelectionStart = t1.Text.Length
ElseIf t2.Focused Then
    t2.Text = t2.Text.Insert(t2.SelectionStart, e.Row(e.Col.Name))
    t2.SelectionStart = t2.Text.Length    
End If
点击单元格没有反应,您帮着看看,谢谢老师!
2楼
有点蓝 发表于:2023/12/22 15:55:00
窗口afterload事件

Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim d = txt.BaseControl
d.HideSelection = False

txt = e.Form.Controls("TextBox2")
d = txt.BaseControl
d.HideSelection = False
3楼
飞云 发表于:2023/12/22 16:01:00
老师,以上代码
窗口afterload事件中之前已添加好了,现在又增加了一个text,之前是单独的文本框,想着任一个text获得焦点时,Table单元格点击就能在焦点单元格中录入,但是点击后什么都没有录入
4楼
有点蓝 发表于:2023/12/22 16:08:00
请上传实例测试
5楼
飞云 发表于:2023/12/22 16:34:00
请老师看看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目15.zip

6楼
有点蓝 发表于:2023/12/22 16:47:00
如果点击的是表格,只有表格有焦点,2个文本框都不可能有焦点的。

到文本框的enter事件使用全局变量记录一下最后点击的是那个控件,那么这个控件就是要设置的
7楼
飞云 发表于:2023/12/22 16:56:00
明白了,谢谢老师!
共7 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .05664 s, 3 queries.