Foxtable(狐表)用户栏目专家坐堂 → 日期输入控件问题


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

主题:日期输入控件问题

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


加好友 发短信
等级:婴狐 帖子:4 积分:114 威望:0 精华:0 注册:2012/12/21 16:01:00
日期输入控件问题  发帖心情 Post By:2012/12/25 9:12:00 [只看该作者]

求教:

建立一个窗体,添加一个日期输入控件(不与表绑定),

1、怎样让这个控件第一次运行时显示今天日期?

2、怎样获得这个控件的值?


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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/25 9:29:00 [只看该作者]

 在窗口的AfterLoad事件里写入

 e.Form.Controls("控件名").Text = Date.Today

 获取控件的值

 Dim a As String = e.Form.Controls("控件名").Text

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


加好友 发短信
等级:婴狐 帖子:4 积分:114 威望:0 精华:0 注册:2012/12/21 16:01:00
  发帖心情 Post By:2012/12/25 22:28:00 [只看该作者]

谢谢!

    还有一问题请教:

    在表格控件中选定一行,拉动滚动条使其在窗口中不可见了,

    用什么命令(代码)能让他重新回到可见窗口内?

[此贴子已经被作者于2012-12-26 6:57:45编辑过]

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/26 9:32:00 [只看该作者]

 Tables("xxx").TopVisibleRow = Tables("xxx").RowSel

 回到顶部