Foxtable(狐表)用户栏目专家坐堂 → 焦点文本框输入问题


  共有953人关注过本帖平板打印复制链接

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

帅哥哟,离线,有人找我吗?
飞云
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:472 积分:5597 威望:0 精华:0 注册:2015/4/5 14:08:00
焦点文本框输入问题  发帖心情 Post By: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
点击单元格没有反应,您帮着看看,谢谢老师!

 回到顶部