vb.net创建图片 vb打开图片

vb.net 图形创建与保存问题。详见问题补充。

Dim bmp As New Bitmap("打开图片的路径")

我们拥有10年网页设计和网站建设经验，从网站策划到网站制作，我们的网页设计师为您提供的解决方案。为企业提供成都网站制作、做网站、微信开发、小程序制作、手机网站制作设计、H5页面制作、等业务。无论您有什么样的网站设计或者设计方案要求，我们都将富于创造性的提供专业设计服务并满足您的需求。

bmp.Save("保存图片的路径")

Dim t As New TextBox()

Dim p As New PictureBox

p.Image = bmp 'picture等支持image的控件。

t.CreateGraphics.DrawImage(bmp, New Point) '文本控件。

Me.BackgroundImage = bmp '窗体

VB.NET 动态创建picturebox后如何用其image属性

这样了：

CType(Me.Controls("PictureBox11"), PictureBox).Image = My.Resources.image1

Find 返回数组，元素类型为Object。

Item() 可以把控件名作关键字，但也返回Object。这个方法是默认的，可以省略。

CType 转换引用类型。

大概如此，我是2008，没vb6那般的控件数组。

vb.net中，如何像下图一样，用很简单的办法，导入1000张图片。

很简单的方法，貌似没有。这个需要自己写很多代码：

用一个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