vb.net字图 vbnet font

VB.net中如何画图？

VB.net与VB不同。

VB.net已经有专门绘图的类。

可以定义笔刷然后用Drawing类中的方法绘制。

Private Sub DrawEllipse()

Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)

Dim formGraphics as System.Drawing.Graphics

formGraphics = Me.CreateGraphics()

formGraphics.DrawEllipse(myPen, New Rectangle(0,0,200,300))

myPen.Dispose()

formGraphics.Dispose()

End Sub

Private Sub DrawRectangle()

Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)

Dim formGraphics as System.Drawing.Graphics

formGraphics = Me.CreateGraphics()

formGraphics.DrawRectangle(myPen, New Rectangle(0,0,200,300))

myPen.Dispose()

formGraphics.Dispose()

End Sub

VB.NET中怎么在图片上直接输出文字。向VB中有Print的方法

两种方法：

图片框上盖个Label 向其输入内容。

载入图片vb.net字图，通过内存直接 DrawImage绘制个新图，然后在图上盖文字。最后赋值给图片框。

VB6vb.net字图的print 实质是向图片框打印文字，不管有无图都能在上面Print. 考虑速度和实现难度问题，如果纯粹显示，最好直接盖个Label最简单。第二种方法 需要考虑文字大小、颜色、坐标定位等等。如果一行文字显示不下，不会自动换行，得自己切。

求大神指点 vb.net 怎么绘制一张有文字的图呢?并用 PictureBox1 显示出来

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim nBrush As New SolidBrush(Color.Red)

        Dim font As New Font("宋体", 12)

        Dim bmp As Bitmap = Bitmap.FromFile("c:\123.jpg")

        Dim info As String = "完成"

        Dim g As Graphics = Graphics.FromImage(bmp)

        Dim sizef As SizeF = g.MeasureString(info, font)

        Dim left As Single = (PictureBox1.Width - sizef.Width) / 2

        Dim top As Single = (PictureBox1.Height - sizef.Height) / 2

        g.DrawString(info, font, nBrush, left, top)

        g = PictureBox1.CreateGraphics

        g.DrawImage(bmp, 0, 0)

        g = Nothing

        bmp = Nothing

    End Sub

VB.NET中能否做一个像QQ那样的聊天框，可以输入文字和图片？

第一个问题 qq聊天室 必须能 用vb都可以做

第二个问题 vb.net插入数学公式 可以把这些公式封装到一个类中vb.net字图，调用就是vb.net字图了

求大神指点.vb.net 的PictureBox1的抬头处怎么输入文字 和改变一部分颜色,下面有两张图

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim font As New Font("宋体", 16)

        Dim g = PictureBox1.CreateGraphics

        Dim str As String = "a001"

        Dim x As Integer = (PictureBox1.Size.Width - g.MeasureString(str, font).Width) / 2 '文字居中

        Dim y As Integer = 0

        Dim nBrush As New SolidBrush(Color.Turquoise)

        g.FillRectangle(nBrush, 0, 0, PictureBox1.Size.Width, g.MeasureString(str, font).Height)

        nBrush = New SolidBrush(Color.Red)

        g.DrawString(str, font, nBrush, x, y)

        g = Nothing

    End Sub

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("")'保存文件的路径

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

关于vb.net字图和vbnet font的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。