以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求助!窗口问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105922) |
-- 作者:kmbn -- 发布时间:2017/8/29 11:19:00 -- 求助!窗口问题 请教老师: 如何实现窗口1中的文本框1内容回车后,在窗口2的文本框2中显示 求代码 在帮助中木有找到内容
![]() ![]() |
-- 作者:有点甜 -- 发布时间:2017/8/29 11:28:00 -- keydown事件
If e.keycode = keys.Enter Then Forms("窗口2").Controls("TextBox2").Text = e.sender.text End If |
-- 作者:kmbn -- 发布时间:2017/8/29 12:22:00 -- 再请教老师一个“焦点”问题: 窗口如果为独立的代码能生效,但是窗口为主窗体后代码无效,请老师指点,代码如下: \'文本框获取焦点 Dim TextBox2 As WinForm.TextBox = e.Form.Controls("TextBox2") TextBox2.Select() TextBox2.SelectionStart = TextBox2.Text.Length |
-- 作者:有点甜 -- 发布时间:2017/8/29 12:29:00 -- 回复3楼,你代码写在什么地方,怎么样调用的?做个例子看看。 |
-- 作者:kmbn -- 发布时间:2017/8/29 12:35:00 -- 窗口事件 AfterLoad 里 |
-- 作者:有点甜 -- 发布时间:2017/8/29 12:41:00 -- 以下是引用kmbn在2017/8/29 12:35:00的发言:
窗口事件 AfterLoad 里
timertick事件
Dim TextBox2 As WinForm.TextBox = e.Form.Controls("TextBox2") If textbox2.Focused Then
http://www.foxtable.com/webhelp/scr/1301.htm
|
-- 作者:kmbn -- 发布时间:2017/8/29 14:32:00 -- 老师: InsertNew() 这个参数是向前加一行,如果要是当前行向后加一行,要用到那个参数呢!求教了
![]() |
-- 作者:有点甜 -- 发布时间: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) |