如何能简单的重复执行一组语句？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何能简单的重复执行一组语句？

共有2225人关注过本帖树形打印复制链接主题：如何能简单的重复执行一组语句？

pp1210

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：8 积分：117 威望：0 精华：0 注册：2019/1/3 16:04:00

如何能简单的重复执行一组语句？ 发帖心情

Post By：2019/2/18 14:20:00 [只看该作者]

新人请教问题，在窗口操作中，有如下的两组语句需要根据不同的需求执行，如何能简单化？不用每次都把下列语句重复输入

以下内容能通过类似自定义的函数或者模块后调用执行吗？在网站上下载的说明里没看到这部分，请指教

举例

一、设置一批控件不可编辑

TextBox1.locked=true

TextBox3.locked=true

TextBox4.locked=true

DateTimePicker1.locked=true

以上为非规律控件都设置成能显示但不能修改

二、设置一批控件可编辑

TextBox1.locked=false

TextBox3.locked=false

TextBox4.locked=false

DateTimePicker1.locked=false

以上为非规律控件都设置成能显示但不能修改

pp1210

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：8 积分：117 威望：0 精华：0 注册：2019/1/3 16:04:00

Post By：2019/2/18 14:48:00 [只看该作者]

还得请问一句，哪里能获得完整的控件属性？如果设置控件不可用，是用.locked吗？

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110333 积分：561507 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/2/18 15:59:00 [只看该作者]

控件的属性，先去帮助把这个控件的帮助看一看，在把【通用成员】看完：http://www.foxtable.com/webhelp/scr/0713.htm

定义函数：http://www.foxtable.com/webhelp/scr/0985.gif

比如有函数，setControls

dim e = args(0)

Dim value As Boolean = args(1)

e.form.controls("TextBox1").enabled = value

e.form.controls("TextBox2").enabled = value

设置一批控件不可编辑按钮事件

Functions.Execute("setControls",e,false)

设置一批控件可编辑按钮事件

Functions.Execute("setControls",e,true)

下一主题 >> << 上一主题

主题：如何能简单的重复执行一组语句？