vb.net图片变换 VB窗体图片转换

在VB.net中如何将图片转换成二进制保存到Accees中

在access数据库里将字段的类型设置为ole对象

成都创新互联公司专注于璧山企业网站建设,成都响应式网站建设公司,商城网站建设。璧山网站建设公司,为璧山等地区提供建站服务。全流程按需设计网站，专业设计，全程项目跟踪，成都创新互联公司专业和态度为您提供的服务

Public img As Byte() '图片处理用的字节数组

img=My.Computer.FileSystem.ReadAllBytes(filePath)'filePath是你图片文件的路径

剩下的就是数据库插入操作了

Dim cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Data.mdb")

Dim comm As OleDb.OleDbCommand

comm = New OleDb.OleDbCommand( _

"INSERT INTO Photo(BuFan_F,PhotoNo,Photo) Values('"  Me.CobBuFan.Text.Trim  "','"  Me.txtNo.Text.Trim  "',@image)", cn)

'向数据库添加存储了图片数据的二进制数组

comm.Parameters.Add("@image", _

OleDb.OleDbType.Binary, img.Length).Value = img

If cn.State = ConnectionState.Closed Then cn.Open() '打开数据库连接

comm.ExecuteNonQuery() '执行数据库命令

If cn.State = ConnectionState.Open Then cn.Close() '关闭数据库连接

MessageBox.Show("图片成功保存到数据库", "完成", MessageBoxButtons.OK, MessageBoxIcon.Information)

vb.net 2008 我想实现4张图片自动切换，怎么做？picture控件和timer控件，我不知道在工具栏哪里。

点击菜单“视图” ---“工具箱”，或者按 Ctrl + Alt + X

这样就可以看见工具箱了，里面有所有常用控件

Vb.net怎么实现图像的处理

这问题有点笼统，软糖来说说把：

图像处理由System.Drawing命名空间负责。

主要是Bitmap类和Graphics类。

Bitmap表示一个位图，可以是BMP,JPG,PNG等文件。

装载位图

Dim 位图 As Bitmap = Bitmap.FromFile("C:\Image1.PNG")

Graphics表示一张画纸，能够进行绘制操作。

它可以被窗体、控件、位图调用CreateGraphics()方法来创建。

然后调用Graphics.Draw开头的一系列函数来绘制图像和图形，Fill开头的填充图形。

创建画纸并绘制位图

Dim 画纸 As Graphics = Me.CreateGraphics()

画纸.DrawImage(位图, 100, 100, 256, 256)

可以将上面三行放到Form1_Load中测试，把路径改一下，

还可以把Me改为能在上面绘图的控件的名称。

更多内容请看MSDN的System.Drawing命名空间。

如满意，请采纳，谢谢。

vb.net 怎样设置背景图片，也就是一个动态按钮效果！

难道我这VS安装的盗版的？

你的意思就是

button不能设置背景图片？

不可能吧？

你不要误导我，哥。

回答：

不是不能设置背景图片哈，关键是你要设置那个控件的背景图片哈，这才是关键！比如说你要设置网页的，那么就修改网页的。如果要设置button的，就修改button的赛。

就是实现一个动态按钮的效果，当鼠标移动到按钮上，背景变换成另外一张图

谁知道vb.net 怎样设置背景图片，也就是一个动态按钮效果！

难道我这VS安装的盗版的？ 你的意思就是 button不能设置背景图片？ 不可能吧？？ 你不要误导我，哥。 回答： 不是不能设置背景图片哈，关键是你要设置那个控件的背景图片哈，这才是关键！比如说你要设置网页的，那么就修改网页的。如果要设置button的，就修改button的赛。 追问： 我就是要设置 botton 的背景图片啊。。。 就是实现一个动态按钮的效果，当鼠标移动到按钮上，背景变换成另外一张图

[vb.net]如何让PictureBox中的图片随着RadioButton的checked与否而变化

在vb2005编写

private sub form_load(......)

picturebox1.image=image.formfile ("....resources\a.wmf")

end sub

private sub radiobutton1_checkedchanged(....)

picturebox1.image=image.formfile ("....resources\a.wmf")

end sub

private sub radiobutton2_checkedchanged(....)

picturebox1.image=image.formfile ("....resources\b.wmf")

end sub