如何在VB.NET中的表单上显示图片?

时间:2013-11-28 09:45:50

标签: vb.net vba

我正在使用VB.NET和SQL创建调查问卷,我现在的问题是如何将数据库中已存在的图像显示在表单上?请注意,由于表单是问卷调查表,因此可以通过在数据集中向上或向下的行进行导航。例如,单击“下一步”按钮时,数据集中的行将变为+1。那么为了在图像上显示图像,我该怎么做呢?

这是我保存图像的代码

Dim ms As New MemoryStream()
PictureBox1.Image.Save(ms, PictureBox1.Image.RawFormat)
Dim data As Byte() = ms.GetBuffer()
Dim x As New SqlParameter("@image", SqlDbType.Image)
x.Value = data
cmd.Parameters.Add(x)

用于在单个表单中导航数据集行之间的代码:

RichTextBox1.Text = dsquestionnaire.Tables(0).Rows(qsno).Item("Question") .....

qsno + 1 (As a part of the NEXT button click event)

提前致谢..

1 个答案:

答案 0 :(得分:1)

您可以将数据从DB加载到图片框中,如下所示:

Using ms As New IO.MemoryStream(CType(row("image", Byte()))

Dim img As Image = Image.FromStream(ms)
Image1.Image = img

对于click事件,您可以将其放在方法中,并在单击下一个按钮时调用它将图像加载到Picture框中