Question

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

做成这样

求大神指点 要怎么才能这样显示呢? 文字下的颜色. 和文字. 用代码来设置,
求大神指点.要怎么设置?????





Answer 1

    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

追问

嘻嘻,这是在图片框固定画面有效,,,,如果图片框 时时变化的话没有效果

我想到一个 可以吧图片框下移一些, 然后在上面加一个 标签

但是 我不知道 标签, 怎么 自定义高度宽度 和颜色 字体位置

大神有办法实现么?

还有大神会 缩放图片么,   把一张1024x768的图片 缩放到图片框一样高一样宽显示,

我这个缩放显示不够理想....没显示全

追答

Label1.Location = New Point(x, y) '位置
Label1.Size = New Size(w, h) '大小
其它你在属性面板里调整好了