打开文件的动态路径怎么写？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 打开文件的动态路径怎么写？

共有4372人关注过本帖树形打印复制链接主题：打开文件的动态路径怎么写？

wukangppbb

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

加好友

发短信

等级：小狐帖子：358 积分：2579 威望：0 精华：0 注册：2020/7/24 10:30:00

打开文件的动态路径怎么写？ 发帖心情

Post By：2022/5/27 14:01:00 [只看该作者]

老师，问一问， doc文件单击打开的代码如下，但是"C:\test.doc" 这是一个动态路径，项目文件拷贝到其他PC机上，怎么保证也能打开呢？

Dim Proc As New Process
Proc.File = "C:\test.doc"
For each Verb As String In Proc.Verbs
Output.Show(verb)
Next

有点蓝

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

加好友

发短信

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

Post By：2022/5/27 14:07:00 [只看该作者]

方法1、限制文件只能复制到项目所在的文件夹里：

Proc.File = projectpath & "test.doc"

方法2、把文件路径保存到表格里

Proc.File = tables("表A").current("文件列")

wukangppbb

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

加好友

发短信

等级：小狐帖子：358 积分：2579 威望：0 精华：0 注册：2020/7/24 10:30:00

回复：（有点蓝）方法1、限制文件只能复制到项目所在的... 发帖心情

Post By：2022/5/27 14:57:00 [只看该作者]

老师，问一下

e.Table.ShowToolTip，这个是文本辅助显示，但是好像显示文本的时候不能按照字节数进行多行显示，如果文本很长就占满整个屏幕的一行，显得不美观，

如果列属性不使用备注型，这个e.Table.ShowToolTip可以怎么修改的？

有点蓝

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

加好友

发短信

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

Post By：2022/5/27 15:16:00 [只看该作者]

自己拆分，比如超过20个字就添加换行

Dim s As String = "判断字符串是否包含给定的子字符串。判断字符串是否包含给定的子字符串。判断字符串是否包含给定的子字符串。"

If s.Length > 20 Then

Dim ss As String = ""

Do While s.Length > 20

ss = ss & vbCrLf & s.Substring(0, 20)

s = s.Substring(20)

Loop

ss = ss & vbCrLf & s

ss = ss.Trim(vbcrlf)

Output.Show(ss)

End If

wukangppbb

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

加好友

发短信

等级：小狐帖子：358 积分：2579 威望：0 精华：0 注册：2020/7/24 10:30:00

回复：（有点蓝）自己拆分，比如超过20个字就添加换行... 发帖心情

Post By：2022/5/27 17:01:00 [只看该作者]

这个是写在表事件的哪个事件里面的？

好像没有用到ShowToolTip 的功能了

[此贴子已经被作者于2022/5/27 17:01:59编辑过]

有点蓝

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

加好友

发短信

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

Post By：2022/5/27 17:08:00 [只看该作者]

我只是举例说明怎么拆分字符串，请理解一下，然后应用到自己需要ShowToolTip 的地方

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

主题：打开文件的动态路径怎么写？