重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
在VB中让文本框文字居中需要设置TextAlign属性,下面用Visual Studio 2019给大家演示一下:
为顺河等地区用户提供了全套网页设计制作服务,及顺河网站建设行业解决方案。主营业务为做网站、网站制作、顺河网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!
1、打开Visual Studio,模板选择Visual Basic的窗体应用程序,如下图所示
2、在窗体中放一个文本框,右键文本框选择属性,如下图所示
3、找到外观里面的TextAlign,下拉列表中选择Center,如下图所示
4、运行程序后,在文本框中输入文字就居中了,如下图所示
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
这样文本就可以在图片框中间显示了。
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
就是让窗体居中啦~