Foxtable(狐表)用户栏目专家坐堂 → 麻烦大佬看看我流程哪里写错了,时好时坏


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

主题:麻烦大佬看看我流程哪里写错了,时好时坏

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


加好友 发短信
等级:童狐 帖子:285 积分:2254 威望:0 精华:0 注册:2011/8/16 10:11:00
麻烦大佬看看我流程哪里写错了,时好时坏  发帖心情 Post By:2023/8/29 22:28:00 [只看该作者]

1、表“教学进度表”

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

2、表“技战术数据库”

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

3、窗体“教学进度设计”

图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

点击按钮“添加”

代码如下:
vars("tbname") = "教学进度表"
Forms("筛选查找").Show


4、弹出窗体“筛选查找”

图片点击可在新窗口打开查看此主题相关图片如下:4.png
图片点击可在新窗口打开查看

点击树形,选择到树形的最后一个条目上,点击按钮“选择”

代码如下:
Dim str As String = Tables("技战术数据库").Current("五级内容")
If forms("教学进度设计").Opened =True Then 
Tables(vars("tbname")).Current("主题内容1") = str 
End If
Forms("筛选查找").Close()


请问:为何没实现选中后写入单元格的功能,是哪一个环节出问题?

[此贴子已经被作者于2023/8/29 22:28:43编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/8/29 22:33:00 [只看该作者]

调试

Dim str As String = Tables("技战术数据库").Current("五级内容")
msgbox(str)
msgbox(forms("教学进度设计").Opened)
If forms("教学进度设计").Opened =True Then 
Tables(vars("tbname")).Current("主题内容1") = str 
msgbox(Tables(vars("tbname")).Current("主题内容1"))
End If
Forms("筛选查找").Close()

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


加好友 发短信
等级:童狐 帖子:285 积分:2254 威望:0 精华:0 注册:2011/8/16 10:11:00
  发帖心情 Post By:2023/8/29 22:40:00 [只看该作者]

谢谢大佬,我去试一试

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


加好友 发短信
等级:童狐 帖子:285 积分:2254 威望:0 精华:0 注册:2011/8/16 10:11:00
  发帖心情 Post By:2023/8/29 22:44:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:68f2b2ce32dfcf1bfa72d327b4508d2.png
图片点击可在新窗口打开查看

上传了源文件



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


加好友 发短信
等级:童狐 帖子:285 积分:2254 威望:0 精华:0 注册:2011/8/16 10:11:00
  发帖心情 Post By:2023/8/29 22:46:00 [只看该作者]

源文件

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:高中篮球技战术系统.foxdb



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


加好友 发短信
等级:童狐 帖子:285 积分:2254 威望:0 精华:0 注册:2011/8/16 10:11:00
  发帖心情 Post By:2023/8/29 23:03:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:b5049d7e5f232db42a19157244ce9cc.png
图片点击可在新窗口打开查看




图片点击可在新窗口打开查看此主题相关图片如下:aa6a1bcf5b154c6c5221b3dd9141451.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2023/8/29 23:03:46编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/8/29 23:05:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:高中篮球技战术系统.zip


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


加好友 发短信
等级:童狐 帖子:285 积分:2254 威望:0 精华:0 注册:2011/8/16 10:11:00
  发帖心情 Post By:2023/8/29 23:09:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:78477ee9e1679434dd91000375105d8.png
图片点击可在新窗口打开查看

能麻烦大佬给个代码吗,我版本太低了,太谢谢了

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


加好友 发短信
等级:童狐 帖子:285 积分:2254 威望:0 精华:0 注册:2011/8/16 10:11:00
  发帖心情 Post By:2023/8/29 23:30:00 [只看该作者]

老大,版本太高打不开,方便给下代码吗?谢谢老大!

 回到顶部
帅哥,在线噢!
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/8/30 8:48:00 [只看该作者]

升级Foxtable

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