vb圖片添加文字居中

⑴ 讓VB在圖片指定位置加入文字

VB6.0中使用函數功能,可實現在vb的picture圖中寫文字,且字型大小及字體顏色可按要求改變,代碼如下:
Option
Explicit
Dim
xx,
yy
As
Integer
Dim
fnt
As
Long
Dim
txt
As
String
Dim
colvb
As
String
Dim
wp
As
Variant
Public
Function
xp(colvb
As
Variant,
xx
As
Variant,
yy
As
Variant,
fnt
As
Variant,
txt
As
Variant)
Picture1.ForeColor
=
colvb
'QBColor(14)
Picture1.CurrentX
=
xx
Picture1.CurrentY
=
yy
Picture1.FontSize
=
fnt
Picture1.Print
txt
'
End
Function
Private
Sub
Form_Load()
Picture1.AutoRedraw
=
True
xx
=
500
yy
=
500
fnt
=
24
colvb
=
vbRed
txt
=
"這是VB對PICTURE圖片框的圖片上寫字的演示"
wp
=
xp(colvb,
xx,
yy,
fnt,
txt)
xx
=
500
yy
=
2500
fnt
=
48
colvb
=
vbGreen
txt
=
"字型大小調大的演示"
wp
=
xp(colvb,
xx,
yy,
fnt,
txt)
End
Sub

⑵ vb把一個標簽label中的文字居中，怎麼設定

1、Label 控制項不可以水平，上下居中
2、不過可以用 PictureBox 控制項做到
3、拖動一個 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
這樣文本就可以在圖片框中間顯示了。

⑶ VB 標簽如何設置字體 居中 啊

在VB6中

（1）設置標簽居中方法如下圖

（4）只能設置標簽內容的水平對齊方式。無法設置標簽內容垂直對齊方式

⑷ vb把文字居中，怎麼設定

在Vb中如text和label控制項是沒有垂直居中功能的。

⑸ vb如何將圖片框中的文字居中

是水平居中還是垂直居中？還是兩者都要居中？

水平居中：

DimsAsString
s="要顯示的文字"
WithPicture1
.CurrentX=(.ScaleWidth-.TextWidth(s))2
EndWith
Picture1.Prints

垂直居中：

DimsAsString
s="要顯示的文字"
WithPicture1
.CurrentY=(.ScaleHeight-.TextHeight(s))2
EndWith
Picture1.Prints

完全居中：

DimsAsString
s="要顯示的文字"
WithPicture1
.CurrentX=(.ScaleWidth-.TextWidth(s))2
.CurrentY=(.ScaleHeight-.TextHeight(s))2
EndWith
Picture1.Prints

⑹ VB怎麼把標簽內容設置為居中

利用下面的代碼可實現標簽內容設置為居中：
Label1.Alignment=2

關於Alignment屬性：
設置或返回一個值，決定 CheckBox 或 OptionButton 控制項、控制項中的文本、或 DataGrid
控制項列中的值的對齊方式。對 CheckBox 、 OptionButton 和 TextBox
控制項在運行時為只讀。

語法

object.Alignment [= number]

⑺ VB中，讓文本框文字居中的設置，怎麼搞

在VB中讓文本框文字居中需要設置TextAlign屬性，下面用Visual Studio 2019給大家演示一下：

1、打開Visual Studio，模板選擇Visual Basic的窗體應用程序，如下圖所示

⑻ vb里按鈕加入圖片後怎麼添加文字

我不想拿你的分，不過只想告訴你，在VB里，如果你想只用VB自帶的按鈕控制項，那麼是不可能做到你說的效果的，你要是想實現你的效果，只有以下3個方法：

1、在圖片中加入中文（雖然你認為這是廢話，不過我可以負責任的告訴你，我所讀過的VB程序中都是這么實現的，如果你認為是廢話我也沒辦法）

2、自己編寫自己的按鈕控制項，不用VB自帶的

3、放棄用VB，改用其他語言

雖然可能對你沒什麼幫助，不過只是想告訴你你的問題是多麼無聊！

所有的程序都是以實現功能為最終目的的，如果你什麼都不會，什麼都依賴VB程序自己，估計你也就是一輩子問別人的初級程序員罷了！（哦，那不叫程序員，在我們那裡，這只能叫「寫代碼的」）

⑼ VB.NET中label顯示的文字怎麼居中

1. Label 控制項不可以水平，上下居中

2. 不過可以用 PictureBox 控制項做到

3. 拖動一個 PictureBox 控制項到工程，並命名為 picTextShow，把 AutoDraw 設為 True，加上以下代碼就可以實現：

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

5. picTextShow.Print "要顯示的文本" End Sub

6. 這樣文本就可以在圖片框中間顯示了。

⑽ 關於VB的標簽，怎麼把VB標簽中的字居中

1、label
控制項不可以水平，上下居中
2、不過可以用
picturebox
控制項做到
3、拖動一個
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
這樣文本就可以在圖片框中間顯示了。