Foxtable(狐表)用户栏目专家坐堂 → 请教一个问题?


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

主题:请教一个问题?

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


加好友 发短信
等级:一尾狐 帖子:422 积分:2708 威望:0 精华:0 注册:2012/2/10 18:12:00
请教一个问题?  发帖心情 Post By:2014/7/31 22:16:00 [只看该作者]

请问窗口的属性系统代码是如何输出的?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/31 22:22:00 [只看该作者]

无法输出,取不到值的。

 

运行中的话,可以通过具体的属性获取对应的值。比如 e.Forms.Controls("xxx").Text


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


加好友 发短信
等级:一尾狐 帖子:422 积分:2708 威望:0 精华:0 注册:2012/2/10 18:12:00
  发帖心情 Post By:2014/7/31 22:30:00 [只看该作者]

比如控件中的文本位置(左右中),的代码,我想在交付使用的软件中,让客户使用,

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/31 22:33:00 [只看该作者]

 你可以用代码设置。如果要保存设置,你可以单独做一个表把数据保存。

 

http://www.foxtable.com/help/topics/1861.htm

 


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


加好友 发短信
等级:一尾狐 帖子:422 积分:2708 威望:0 精华:0 注册:2012/2/10 18:12:00
  发帖心情 Post By:2014/7/31 22:40:00 [只看该作者]

 你可以用代码设置,
比如窗口中有个按钮,用于窗口1的TextBox1的文本位置设置,怎写?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/31 22:43:00 [只看该作者]

窗口1,必须打开。

 

Forms("窗口1").Controls("TextBox1").TextAlign = HorizontalAlignment.Right


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


加好友 发短信
等级:一尾狐 帖子:422 积分:2708 威望:0 精华:0 注册:2012/2/10 18:12:00
  发帖心情 Post By:2014/7/31 22:55:00 [只看该作者]

假如用ComboBox1来设置用于窗口1的TextBox1的文本位置左和右,又怎写?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/31 23:00:00 [只看该作者]

 Select Case Forms("窗口1").Controls("ComboBox1").Text

     Case "左"

 

     Case "中"

 

     Case "右"

          Forms("窗口1").Controls("TextBox1").TextAlign = HorizontalAlignment.Right

 End Select


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


加好友 发短信
等级:一尾狐 帖子:422 积分:2708 威望:0 精华:0 注册:2012/2/10 18:12:00
  发帖心情 Post By:2014/7/31 23:21:00 [只看该作者]

不好意思,假如窗口1中有多个TextBox,只用一个ComboBox1来设置文本位置,又怎样?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/8/1 8:55:00 [只看该作者]

用一个全局变量,保存上一步点击获取焦点的文本控件名称

在文本框的Enter事件输入代码
vars("CN")=e.sender.name

 Select Case Forms("窗口1").Controls("ComboBox1").Text

     Case "左"

 

     Case "中"

 

     Case "右"

          Forms("窗口1").Controls(vars("CN")).TextAlign = HorizontalAlignment.Right

 End Select


 回到顶部
总数 35 1 2 3 4 下一页