锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net显示图片的简单介绍

IT技术显示

VB.net该如何将图片圆形显示？新建一个Winform，拖两个图片框 。图片框1在设计器中选择一个图片（尺寸在图片框容纳为佳） 。如下代码测试通过：
private void button1_Click(object sender, EventArgs e)
{
Image img1 = this.pictureBox1.Image;
Image img2 = CropToCircle(img1);
this.pictureBox2.Image = img2;
}
public Image CropToCircle(Image img1)
{
Image img2 = new Bitmap(img1.Width, img1.Height,
img1.PixelFormat);
Graphics g = Graphics.FromImage(img2);
using (Brush br =
new SolidBrush(SystemColors.Control))//背景色
{
g.FillRectangle(br, 0, 0,
img2.Width, img2.Height);
}
GraphicsPath path = new GraphicsPath();
path.AddEllipse(0, 0, img2.Width, img2.Height);
g.SetClip(path);
g.DrawImage(img1, 0, 0);
return img2;
}
vb.net2010从ACCESS的OLE字段读出图片显示到PictureBox控件上这是vb2005的代码 ， 你试一下 ， 这是我以前做的一段代码，从库中读取到显示 。
olecon = New OleDbConnection(constr)
olecon.Open()
Dim comm As New OleDbCommand("select 照片 from 表 where name='李三', olecon)
Dim reader As OleDbDataReader = comm.ExecuteReader
reader.Read()
Dim photofile() As Byte
photofile = reader.GetValue(0)
Dim streamph As New MemoryStream(photofile)
PictureBox1.Image = Image.FromStream(streamph)
这段代码是我从我做的小软件中截出来的，我在2005中就用着，2005是通过的，不知道加到2010中能否执行 。
-------------------------------
根据你的发的图，我看了，好像你从库中取出的不是一条记录呀，我的代码只能取一条记录的情况，你的明显取出多条记录 ， 代码只认最后一条，你的文件长度为0，当然不行了
select 照片 from 表 where name='李三'，这条语句只能取出单条记录，且ole字段中确定有文件存在的，而且是图片格式才能显示
-------------------------------------------------------
Dim streamph As New MemoryStream(photofile)
你的是 Dim streamph = New MemoryStream(photofile)
这句你的和我的不一样，是不是这里的问题，2010没用过，要是还不行 ， 我也不知道了
vb.net中,如何点击按钮调出选择文件窗口选中图片并在picturebox中显示出来?button , OpenFileDialog , PictureBox , textbox 控件，我把图片显示在 picturebox 中，而路
径存放在 textbox 中，不知道这样行不行 。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim filename As String
OpenFileDialog1.Filter = "jpg files (*.jpg)|*.jpg"
OpenFileDialog1.FilterIndex = 1
If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
filename = OpenFileDialog1.FileName
Else
End
End If
If Not (PictureBox1.Image Is Nothing) Then
PictureBox1.Image.Dispose()
PictureBox1.Image = Nothing
End If
'PictureBox1.Image = System.Drawing.Image.FromFile(filename)
去掉注释后就显示图片
TextBox1.Text = filename
End Sub
picturebox中只记录文件存放的路径，我找了一个 ImageLocation 函数
PictureBox1.ImageLocation = filename 不过还是会显示图片
在VB.NET中，如何让DataGridView中的照片在PictureBox中显示byte[] bytes=(byte[])dt.Rows[0]["Photo"];
System.IO.MemoryStream ms=newSystem.IO.MemoryStream(bytes);
pictureBox1.Image=Image.FromStream(ms);
VB.NET中如何使两个PictureBox显示指定相对应的图片？用一个全局变量保存这个1.jpgvb.net显示图片，如变量avb.net显示图片，vb.net显示图片你按按钮2时，可以简单的在a中插入一个"A"，如a.SubString(0, a.Length-4)"A"a.SubString(a.Length-4)，这样就能把例如"C:/Images/1.jpg"变成"C:/Images/1A.jpg"

推荐阅读


上一篇：点击查看更多再点击收起js，点击查看解决办法

下一篇：读不出独立显卡怎么回事，读取不到独显