7,764
社区成员
发帖
与我相关
我的任务
分享求教一个小问题 实在不知道怎么办了
我的图片 是存在一个文件夹里的。 看前面我的代码也能发现 这个是读取的图片地址 我在想 这个程序 会自动生成exe 把生成的都拷给别人的话 那个地址 就不管用了 有什么办法呢 谢谢
给个代码
Public Class Form1 Dim Iamge As Object
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Randomize() Dim i As Integer = int(Rnd() * 4 + 1)
PictureBox1.Image = Image.FromFile("C:\Users\Administrator\Documents\Visual Studio 2008\Projects\Random access card group\Random access card group\Resources\" & i & ".jpg")
End Sub
End Class
想问下 我的是vb2008 net 如果 我把自动生成的exe 和其他附属文件 都拷到别的电脑上 那个图片地址就会改变了
就没法用了 这个要怎么办呢
给个代码
Public Class Form1 Dim Iamge As Object
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Randomize() Dim i As Integer = int(Rnd() * 4 + 1)
PictureBox1.Image = Image.FromFile("C:\Users\Administrator\Documents\Visual Studio 2008\Projects\Random access card group\Random access card group\Resources\" & i & ".jpg")
End Sub
End Class
想问下 我的是vb2008 net 如果 我把自动生成的exe 和其他附属文件 都拷到别的电脑上 那个图片地址就会改变了
就没法用了 这个要怎么办呢
...全文
请发表友善的回复…
发表回复
clear_zero 2012-05-30
- 打赏
- 举报
用相对路径
你可以把路径放到config文件中，代码里面读取就好了
你可以把路径放到config文件中，代码里面读取就好了
shinni987654 2012-05-30
- 打赏
- 举报
App.Path & "\" & i & ".jpg"
zdingyun 2012-05-30
- 打赏
- 举报
用相对路径解决.
安装方法：
1、将包内文件上传到论坛目录。
2、打开Default.asp
3、找到以下代码
-----------代码片段star------------
<%
End If
Rs.Close
-----------代码片段end------------
4、在上面代码的最后Rs.Close下另起一行加入以下代码
-----------代码片段star------------
%>
<%
-----------代码片段end------------
5、浏览网站看看能不能调用了`
6、能正常显示的话`恩```都看到幻灯片了吧？这个幻灯片的图片不是自动提取的`那是自己添加的``
你可以打开Other/IndexPic.xml修改或者添加要显示的图片```大小什么的自己把握```就不详解了`实在弄不明白可以加Q群19126452求教。
附注：本插件应BBSXP注册会员[啸傲]要求修改放出，本人只作稍微修改`原版忘记在哪个喀喀了```不过搜索应该能搜索出来的`就不多说版权问题了`大家用起满意就成`由于时间比较紧`BBSXP新版的字段跟以前的字段略有不同`如有问题`请进群提出，我会尽快完善。
| 公告 |
