VB.NET中l(wèi)abel顯示的文字怎么居中？

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

成都創(chuàng)新互聯(lián)堅持“要么做到，要么別承諾”的工作理念，服務領域包括：成都網(wǎng)站建設、網(wǎng)站建設、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣等服務，滿足客戶于互聯(lián)網(wǎng)時代的玉環(huán)網(wǎng)站設計、移動媒體設計的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡建設合作伙伴！

不過可以用 PictureBox 控件做到

拖動一個 PictureBox 控件到工程，并命名為 picTextShow，把 AutoDraw 設為 True，加上以下代碼就可以實現(xiàn)：

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

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

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

vb圖片在窗口中居中該怎么編程

如果你用 .NET 做就很好辦了。

滾動條的 Dock 屬性設置為 Left，就在最左邊了，窗體再調(diào)整大小它也跟著調(diào)。

圖片框復雜點，如果不調(diào)整它和窗體的大小，編程時用格式菜單窗體居中就行，如果調(diào)整的話，你需要計算窗體的大?。╢rmMain.Size），然后按照 frmMain 的 Size 的 Width，Height 計算出圖像框該有多大，用另兩個 Integer 保存（Location 設置個固定值即可，Size 的 Width，Height 設置為窗體 Size 的 Width，Height 減去圖像框的 Location 的 X，Y），將這兩個值保存在一個 Point 對象中。然后把圖像框的 SizeMode 屬性設置為 StretchImage，并將其 Size 屬性設置為你保存的那個 Point 對象。這樣就能調(diào)節(jié)圖像框的大小和位置，使其總是正好在窗體中間。

這段代碼寫個子程序，窗體的 Resize、圖像框的 LoadComplete 事件都要調(diào)用它。

Sub PicResize

dim NewX as integer = me.size.width - 10 '假設這是圖像框的 Location

dim NewY as integer = me.size.height - 10

dim NewPoint as new Point(NewX, NewY)

picMain.SizeMode = StretchImage

picMain.size = NewPoint

end sub

如果使用 .NET，你還是用 SplitContainer 非常方便，滾動條和圖像框占用兩邊， Dock 設置為 Fill

如何實現(xiàn)VB.NET實現(xiàn)代碼在datagridview選中行,并在datagridview顯示區(qū)域居中

非常簡單

一:如果知道要選中的行號

datagridview1.Rows(行號).Selected

=

True

datagridview1.FirstDisplayedScrollingRowIndex

=

行號

第一行是選中行號所在的行，第二行是移動滾動條將選中的行在顯示區(qū)域的最上放顯示出來。

二:根據(jù)內(nèi)容選中行并顯示

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

上面的代碼是根據(jù)某列的值選中行，并且移動滾動條將選中的行在顯示區(qū)域的第15行顯示。

網(wǎng)頁標題：vb點虐 窗口居中 vb窗體居中顯示
路徑分享：http://www.rwnh.cn/article36/ddcpjpg.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供面包屑導航、微信公眾號、網(wǎng)站策劃、微信小程序、建站公司、網(wǎng)站設計

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)