me.backgroundimage=image.fromfile(apppath+"picture")
公司主营业务:成都网站建设、网站制作、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。创新互联建站是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联建站推出崇信免费做网站回馈大家。
主要的错误是你的"picture"这里错了,apppath后面就应该接你要载入的图片的名字,比如说是02.jpeg,那就应该是
me.backgroundimage=image.fromfile(apppath+"\02.jpeg"),注意要加\和图片的后缀名。
这是因为你的图片放置方式不是嵌入型,而是其他方式
WORD里如果希望跟处理文字一样对其进行各种属性处理,只能是嵌入型才可以
右键单击图片属性 环绕方式改成 嵌入型就可以了
很简单的方法,貌似没有。这个需要自己写很多代码:
用一个ListView控件。
判断滚动条当前所显示的图片集合,获取它们的物理路径。
用Bitmap.FromImage方法把这些图片读出来,
然后获取缩略图,
把缩略图用Graphics.DrawImage()绘制出来。
我可以提供Bitmap如何获取缩略图的方法:
''' summary必须创建一个委托并将对此委托的引用作为获取缩略图 callback 参数传递,但不使用此委托。/summary
Public Function ThumbnailCallback() As Boolean
Return False
End Function
''' summary返回Image,表示图像指定 宽 和 高 的缩略图。/summary
Public Function 获取缩略图(位图 As Bitmap, 宽 As Integer, 高 As Integer) As Image
Dim myCallback As New Image.GetThumbnailImageAbort(ThumbnailCallback)
Return 位图.GetThumbnailImage(宽, 高, myCallback, IntPtr.Zero)
End Function
Panel控件就是容器,在窗体上添加一个Panel1控件,将其拖放到合适的位置与大小,然后设置Panel1控件的:
AutoScroll 属性为True
Panel1.AutoScrollMinSize 属性
Panel1控件里,添加你的图片框(此时可以滚动Panel1控件里的滚动条)
OK了吧!
点击菜单--项目--WindowsApplication属性(工程属性),在打开的属性窗口,选择”资源“页,点击菜单--添加资源--添加现有文件,将硬盘上图片文件添加进资源文件,文件名自动变为资源名。
在代码中,需要改变按钮图像时,用:
Button1.Image = My.Resources.FACE01 'FACE01是我的资源文件名,你要改成你自己的