Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]代码求助（已解决）


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

主题：[求助]代码求助（已解决）
帅哥哟，离线，有人找我吗？
yyzlxc
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1530 积分：10633 威望：0 精华：0 注册：2008/9/24 11:16:00 		[求助]代码求助（已解决）  发帖心情 Post By：2016/12/22 23:01:00 [只看该作者]

在MessageBox.Show（）中显示如下效果，括号中的代码如何写，请老师指教，谢谢！

"\\127.0.0.1\QDXT$\手持终端\手持终端" & ""& jwq &"" & ".mdb"
[此贴子已经被作者于2016/12/23 11:57:07编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2016/12/22 23:07:00 [只看该作者]

这个意思？

 

"\\127.0.0.1\QDXT$\手持终端\手持终端" & jwq & ".mdb"


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


加好友 发短信
等级：七尾狐 帖子：1530 积分：10633 威望：0 精华：0 注册：2008/9/24 11:16:00 		  发帖心情 Post By：2016/12/22 23:18:00 [只看该作者]

共享文件路径，jwq为变量

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


加好友 发短信
等级：七尾狐 帖子：1530 积分：10633 威望：0 精华：0 注册：2008/9/24 11:16:00 		  发帖心情 Post By：2016/12/22 23:21:00 [只看该作者]

想将整条代码做成变量

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


加好友 发短信
等级：七尾狐 帖子：1530 积分：10633 威望：0 精华：0 注册：2008/9/24 11:16:00 		  发帖心情 Post By：2016/12/22 23:36:00 [只看该作者]

将代码写成全局变量：_SCLJ = """\\127.0.0.1\QDXT$\手持终端\手持终端" & """""  &  jwq  & """""  & ".mdb"""

运行如下代码
        Dim mg2 As New Merger
        mg2.SourcePath = _SCLJ '指定目标文件
        'mg2.SourcePath = "\\127.0.0.1\QDXT$\手持终端\手持终端" & ""& jwq &"" & ".mdb"
        mg2.SourceTableName = "工具清点明细" 'Acc
        mg2.DataTableName = "工具清点明细2"
        mg2.Filter = "清点日期 = #" & rq1 & "#" '导入条件
        mg2.Merge()

提示文件名无效。而黄色标记的语句运行正确。
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

_SCLJ = "\\127.0.0.1\QDXT$\手持终端\手持终端" & jwq & ".mdb"

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


加好友 发短信
等级：七尾狐 帖子：1530 积分：10633 威望：0 精华：0 注册：2008/9/24 11:16:00 		  发帖心情 Post By：2016/12/23 9:33:00 [只看该作者]

谢谢蓝老师的指教，但是将上述代码保存在项目Initialize事件，提示未声明名称"jwq"。
如果加：Dim jwq As String，可以保存，但是代码运行时，"jwq"变量失效。如何解决这个问题，还请老师指教，谢谢！！
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110750 积分：563676 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/23 10:07:00 [只看该作者]

jwq在什么地方定义和赋值的？

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


加好友 发短信
等级：七尾狐 帖子：1530 积分：10633 威望：0 精华：0 注册：2008/9/24 11:16:00 		  发帖心情 Post By：2016/12/23 10:13:00 [只看该作者]

在菜单按钮

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


加好友 发短信
等级：超级版主 帖子：110750 积分：563676 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/23 11:05:00 [只看该作者]

那没有意义，项目Initialize事件的时候，菜单还不知道在哪。

一定纠结于用变量吗，下面这样用有什么问题
mg2.SourcePath = "\\127.0.0.1\QDXT$\手持终端\手持终端" & ""& jwq &"" & ".mdb"
 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04883 秒, 4 次数据查询