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

vb.net2003如何将二进制流转换成图片显示在网页上?

好像没有什么好办法，你只有不用数值型的文本框，还是改用字符型的，这样不论点击哪里光标都会出现在最前面，然后在代码中用val()函数将其转换为数值型

相关问答

Q1: VB.NET 如何实现图片转PDF呢？

你说的不太满意是什么意思，你莫非是希望图片转换成的pdf能被选中文字并复制粘贴？

Q2: VB.net 如何把文字转换为图片？

         Dim bit As Bitmap=New Bitmap(textBox1.ClientRectangle.Width, _

            textBox1.ClientRectangle.Height, _

            System.Drawing.Imaging.PixelFormat.Format24bppRgb)

        

        textBox1.DrawToBitmap(bit,textBox1.ClientRectangle)

        pictureBox1.Image=bit

        bit.Save("")'保存文件的路径

这是保存文本框内容的方法，保存余下内容的方法我还要点事件弄

Q3: vb中，怎么可以把一张图片旋转起来

这个问题不是小问题。如果只是90度转，vb.net的picture控件有RotateFlip方法。

任意角度，可以参考这个

;cs-lang=csharp

图片的变换涉及坐标处理，要自己算。

还有可以用Windows Presentation Foundation (WPF) 编程，里面的image控件好像也能旋转图片。

如果是VB6，恐怕只能用API函数了，百度一下“vb 旋转图片” “VB api函数”了解一下

Q4: VB.net 旋转图像时，如何指定填充色

绘制线条采用Draw开头的方法，颜色参数用Pen类；

绘制有填充色的封闭图形采用Fill开头的方法，颜色参数用Brush类；

例如：

'绘制一个实心圆，该圆在：直线x=200，y=200，x=200+100，y=200+100所划矩形区域内

Me.CreateGraphics.FillEllipse(New SolidBrush(Color.Orange), 200, 200, 100, 100)

'绘制一个空心圆，该圆在：直线x=200，y=200，x=200+100，y=200+100所划矩形区域内

Me.CreateGraphics.DrawEllipse(New Pen(Color.Black), 200, 200, 100, 100)

Q5: 在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)