Foxtable(狐表) → 用户栏目 → 专家坐堂 → 预设值表如何在窗口保存数据和提取数据


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

主题：预设值表如何在窗口保存数据和提取数据
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		预设值表如何在窗口保存数据和提取数据  发帖心情 Post By：2021/11/20 5:10:00 [显示全部帖子]

预设值表如何在窗口保存数据和提取数据
图片点击可在新窗口打开查看此主题相关图片如下：qq截图20211120045023.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20211120050048.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20211120050234.jpg
图片点击可在新窗口打开查看

 

 

 

预设值表的数据如上面操作虽然可以保存和提取全局值，但是如果顺序一变就会出错，所以一定要强调按顺序保存提取才行。还有其他的更好的方法吗？例如：1、怎样直接定义函数名列为变量，文本为值？

               2、怎样把窗口每一个文本框保存为一行数据？
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/20 10:01:00 [显示全部帖子]

我是想：在各个模块设置里，都可以预设些资料或二选一的选择性项目或会计凭证科目，在各模块的操作中就直接调用这些预设资料来进行自动处理数据，例如：应收帐款的管理就直接调用预设科目来批量生成凭证。
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/20 10:31:00 [显示全部帖子]

我个人觉得，使用全局变量就灵活些，在模块内都可以任意使用

1、这个解决了窗口文本框与表之间数据的保存修改。
如果一定要使用文本框，建议使用find等函数查表获取对应的行，然后和文本框值对应起来，比如：
给控件赋值，建议表格增加一个索引列，和控件的名称对应起来，比如表格索引1，对应文本框textbox1、索引2，对应文本框textbox2，然后代码
for each dr as datarow in datatables("预设值").select("类别=‘基本资料’")
e.form.controls("textbox" & dr("索引")).text = dr("文本")
next

从控件取值
for each dr as datarow in datatables("预设值").select("类别=‘基本资料’")
dr("文本") = e.form.controls("textbox" & dr("索引")).text 
next
二、怎样给变理赋值呢？？
其次全局代码的用法完全是错误的
1、不能在全局代码定义变量的时候直接给变量赋值
2、全局代码初始化的时候表格还没有，不能使用
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/20 10:54:00 [显示全部帖子]

这个代码怎样写呢？昨晚试了很久都不行？
“函数名”列名=文本的值

for each dr as datarow in datatables("预设值").select("类别=‘基本资料’")
 dr("函数名").text = dr("文本")
next
这个试过也不行？？？?
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/20 11:14:00 [显示全部帖子]

我还傻傻的在试，呵呵

 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/20 11:30:00 [显示全部帖子]

是，使用字典好些，使用表初始化时会被删除的
字典又可以有机会学习使用下了
其实学这个都是要自已使用到才能学得会的
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/27 11:54:00 [显示全部帖子]

For i As Integer = 1 To 11 
   dict(e.Form.Controls("ddt0"& i).Name) = e.form.controls(("ddt0"& i).text
Next

或者这样，都是出错
For i As Integer = 1 To 11 
   dict(e.Form.Controls("‘“ddt0”’& i“).Name) = e.form.controls(("‘“ddt0”’& i“).text
Next
这个需要怎样改
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/27 12:16:00 [显示全部帖子]

提示出错
图片点击可在新窗口打开查看此主题相关图片如下：dingtalk_20211127121642.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2035 积分：6610 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2021/11/27 12:19:00 [显示全部帖子]

哦，是我加多了一个（造成的错误
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05859 秒, 5 次数据查询