Include text in a ProgressBar

Question

Include text in a ProgressBar

Navigation

#1 by (1 votes)

1

I am trying to include a text in a ProgressBar (which I have modified to be in vertical mode) so that I will update it when I change the value, I have tried trying to write the text HELLO but it does not include it in any way , the code is as follows:

    Dim gr As Graphics
    gr = Me.MyVerticalProgessBar1.CreateGraphics()
    gr.DrawString("HOLA",
    SystemFonts.DefaultFont,
    Brushes.Black,
    New PointF(Me.MyVerticalProgessBar1.Width / 2 - MeasureString("HOLA",
    SystemFonts.DefaultFont).Width / 2.0F),
    Me.MyVerticalProgessBar1.Height / 2 - (gr.MeasureString("HOLA",
    SystemFonts.DefaultFont).Height / 2.0F)))

I include a screenshot to see that it does not appear:

vb.net progressbar

asked by marcss 27.09.2018 в 10:15

source

1 answer

Enter variable in regular expressions Insert values in a row with auto-increment

score 1 · Accepted Answer

You have the final position of the controls wrong, this code will solve it ...

Dim gr As Graphics
    gr = Me.MyVerticalProgessBar1.CreateGraphics()
    gr.DrawString("HOLA",
    SystemFonts.DefaultFont,
    Brushes.Black,
    New PointF((Me.MyVerticalProgessBar1.Width / 2) - (MeasureString("HOLA",
    SystemFonts.DefaultFont).Width / 2)),
    (Me.MyVerticalProgessBar1.Height / 2) - (gr.MeasureString("HOLA",
    SystemFonts.DefaultFont).Height / 2)))