VB.Net 如何用代码为picturebox 打开一张图片

        Dim fn As String = "D:\testjpg"

        '方法1

        MePictureBox1ImageLocation = fn

        '方法2

        MePictureBox1Image = ImageFromFile(fn)

如果只是几张，而且不大，可以在软件界面新建个image数组控件，用循环或随机来显示

for Q=0 to x 'x为你有多少张

picture1picture=image1（Q）picture

next

但太多，生成的exe程序会变得很大，所以最好建立一个文件夹存放文件，程序在别的电脑上使用时，连同此文件夹一起复制过去。

Picture1Picture = LoadPicture(AppPath & "\\My“ & Q & ”bmp") '我这里设置一个My & Q & bmp，有个变量Q这样在加载时可以使用循环加载，让循环显示，也可以使用随机数加载。

当然你如果想做成网络加载，这样可以用网盘，把放在网盘上，使用网络加载，这样的代码网上很多，但加载网络就比较麻烦，网速不佳，体验也就不好了。

你把转为PNG格式，记得要设置透明色，然后再试试

------------------------看图--------------------

Form1的backgroundimage设置了一幅荷花图，Picturebox的image设置了clockpng，是个背景透明的钟，Picturebox的backcolor设置为透明

pictureBoxImage = ImageFromFile("这里面放读取出来的地址");

例如:窗体有个pictureBox1;程序根目录下有个IMAGEJPG文件；

thispictureBox1Image = ImageFromFile(applicationstartuppath+@"\IMAGEJPG");

需要先下载下来的：Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As LongPrivate Sub Form_Load()URLDownloadToFile 0, ByVal "Picture1Picture = LoadPicture("d:\1jpg" target="_blank" >

")End Sub