vb.net内容设置居中,vb文本居中怎么设置

VB.NET中label显示的文字怎么居中？

Label 控件不可以水平，上下居中

不过可以用 PictureBox 控件做到

拖动一个 PictureBox 控件到工程，并命名为 picTextShow，把 AutoDraw 设为 True，加上以下代码就可以实现：

Option Explicit Private Sub Form_Load() picTextShow.CurrentX=(picTextShow.ScaleWidth-picTextShow.TextWidth("要显示的文本"))/2 picTextShow.CurrentY=(picTextShow.ScaleHeight-picTextShow.TextHeight("要显示的文本"))

picTextShow.Print "要显示的文本" End Sub

这样文本就可以在图片框中间显示了。

相关问答

Q1: VB中，让文本框文字居中的设置，怎么搞？

在VB中让文本框文字居中需要设置TextAlign属性，下面用Visual Studio 2019给大家演示一下：

1、打开Visual Studio，模板选择Visual Basic的窗体应用程序，如下图所示

2、在窗体中放一个文本框，右键文本框选择属性，如下图所示

3、找到外观里面的TextAlign，下拉列表中选择Center，如下图所示

4、运行程序后，在文本框中输入文字就居中了，如下图所示

Q2: VB.NET窗体居中

Form窗体有一个属性是StartPosition，把它设置为CenterScreen就是居中。

代码为 Me.StartPosition = FormStartPosition.CenterScreen。

如果是非要计算分辨率的话：

My.Computer.Screen.Bounds.Width 是分辨率中的宽度

My.Computer.Screen.Bounds.Height 是分辨率中的高度

那么

Me.Top = (My.Computer.Screen.Bounds.Height - Me.Height) / 2

Me.Left = (My.Computer.Screen.Bounds.Width - Me.Width) / 2

就是让窗体居中啦～

Q3: VB 标签如何设置字体 居中 啊？？

在VB6中

（1）设置标签居中方法如下图

（2）设置标签的字体方法如下图

（3）在代码中设置

Option Explicit

Private Sub Form_Load()

    With Label1

        '水平居中

        .Alignment = 2

        '设置字体

        .FontName = "微软雅黑"

        '字体大小

        .FontSize = 10

        '设置为

        .FontItalic = True

    End With

End Sub

（4）只能设置标签内容的水平对齐方式。无法设置标签内容垂直对齐方式

Q4: 如何实现VB.NET实现代码在datagridview选中行,并在datagridview显示区域居中

非常简单

一：如果知道要选中的行号

datagridview1.Rows(行号).Selected

=

True

datagridview1.FirstDisplayedScrollingRowIndex

=

行号

第一行是选中行号所在的行，第二行是移动滚动条将选中的行在显示区域的最上放显示出来。

二：根据内容选中行并显示

For

i

=

To

datagridview1.Rows.Count

-

1

If

datagridview1.Rows(i).Cells("列的名称").Value

=

要选中行列的值

Then

datagridview1.Rows(i).Selected

=

True

datagridview1.FirstDisplayedScrollingRowIndex

=

i

End

If

Next

而且，如果你不想选中的行显示到最上面，可以这样：

For

i

=

To

datagridview1.Rows.Count

-

1

If

datagridview1.Rows(i).Cells("列的名称").Value

=

要选中行列的值

Then

datagridview1.Rows(i).Selected

=

True

Dim

indeI

As

Integer

=

i

-

15

If

indeI

1

Then

indeI

=

1

datagridview1.FirstDisplayedScrollingRowIndex

=

indeI

End

If

Next

上面的代码是根据某列的值选中行，并且移动滚动条将选中的行在显示区域的第15行显示。

Q5: VB 怎么让文字居中？

以Textbox为例说明，其余控件方法类似：

1.Vb中控件一般都是默认文字左对齐的

2.设置“Alignment”属性为2-Center

3.则文字就实现居中对齐了