Foxtable(狐表)用户栏目专家坐堂 → 求助!窗口问题


  共有1753人关注过本帖树形打印复制链接

主题:求助!窗口问题

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/29 11:28:00 [显示全部帖子]

keydown事件

 

If e.keycode = keys.Enter Then

    Forms("窗口2").Controls("TextBox2").Text = e.sender.text

End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/29 12:29:00 [显示全部帖子]

  回复3楼,你代码写在什么地方,怎么样调用的?做个例子看看。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/29 12:41:00 [显示全部帖子]

以下是引用kmbn在2017/8/29 12:35:00的发言:
窗口事件  AfterLoad  里

 

timertick事件

 

Dim TextBox2 As WinForm.TextBox = e.Form.Controls("TextBox2")
TextBox2.Select()
TextBox2.SelectionStart = TextBox2.Text.Length

If textbox2.Focused Then
    e.Form.TimerEnabled = False
End If

 

 

http://www.foxtable.com/webhelp/scr/1301.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/29 15:18:00 [显示全部帖子]

Dim cr As Row = Tables("表A").Current
Dim nr As Row = cr.Table.AddNew
nr.Move(cr.Index+1)

 回到顶部