求帮助啊 我在 resources里面放了五张图片
附代码
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 = Convert.ToInt32(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
都可以运行了 问题 是 如果我把 生成的exe文件连同附带的都拷到别的电脑上 就不能用了 那个图片地址引用 能自动改动吗

@linkha 求大神帮助

Application.StartupPath

那个 我是刚开始才学了4节课 很多都是上网查到 和查不到的问你们这些大神的 这个 真不懂 能麻烦给解释下吗

Image.FromFile("C:\Users\Administrator\Documents\Visual Studio 2008\Projects\Random access card group\Random access card group\Resources\" & i & ".jpg")
你是固定地从 C:\Users\Administrator\Documents\Visual Studio 2008\Projects\Random access card group\Random access card group\Resources\" & i & ".jpg" 这个地址找文件，别人的电脑上没有这个文件，自然发生错误
Application.StartupPath & 文件地址 ，可以从你的程序目录下读取文件，你只要把资源放到自己的程序目录下，就会在程序动态运行中获取程序的主目录，再读取文件了


谢谢 太感谢了 我试试

是这样吗
放到一起
还是不行 提示 还是找不到图片

用 Msgbox(Application.StartupPath) 看看地址后面该填什么

我的 debug 有两个 我两个debug里面都有 那五张图片

再给你看个图
按理说应该可以了啊

Application.StartupPath 是程序启动目录 在debug目录放上你的文件
Application.StartupPath & "\" & 文件名.扩展名

图片也确实放进去相应的目录里了
截个图

谢谢 终于成功了 成功了 是因为 那个 空格的问题 结果 应该在\和 i 之间不加空格还有后面一个地方不加空格的 太感谢了

"\" 这里没有空格 扩展名那里也是......

才注意 从错误提示里才发现的