VB如何讓控件在窗體居中？

如下：

創(chuàng)新互聯(lián)是一家專(zhuān)業(yè)提供肥城企業(yè)網(wǎng)站建設(shè),專(zhuān)注與做網(wǎng)站、成都網(wǎng)站制作、HTML5建站、小程序制作等業(yè)務(wù)。10年已為肥城眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專(zhuān)業(yè)網(wǎng)絡(luò)公司優(yōu)惠進(jìn)行中。

Private Sub Form_Resize()

Command1.Top = (Me.Height - Command1.Height) \ 2

Command1.Left = (Me.Width - Command1.Width) \ 2

End Sub

把Command1換成你想要居中的控件名就可以了（正確排版就是上面那樣的）

VB：

Visual Basic（簡(jiǎn)稱(chēng)VB）是Microsoft公司開(kāi)發(fā)的一種通用的基于對(duì)象的程序設(shè)計(jì)語(yǔ)言，為結(jié)構(gòu)化的、模塊化的、面向?qū)ο蟮?、包含協(xié)助開(kāi)發(fā)環(huán)境的事件驅(qū)動(dòng)為機(jī)制的可視化程序設(shè)計(jì)語(yǔ)言。是一種可用于微軟自家產(chǎn)品開(kāi)發(fā)的語(yǔ)言。 [1]

“Visual” 指的是開(kāi)發(fā)圖形用戶(hù)界面 (GUI) 的方法——不需編寫(xiě)大量代碼去描述界面元素的外觀和位置，而只要把預(yù)先建立的對(duì)象add到屏幕上的一點(diǎn)即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic ?Instruction Code) 語(yǔ)言，是一種在計(jì)算技術(shù)發(fā)展歷史上應(yīng)用得最為廣泛的語(yǔ)言。

Visual Basic源自于BASIC編程語(yǔ)言。VB擁有圖形用戶(hù)界面（GUI）和快速應(yīng)用程序開(kāi)發(fā)（RAD）系統(tǒng)，可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫(kù)，或者輕松的創(chuàng)建Active X控件，用于高效生成類(lèi)型安全和面向?qū)ο蟮膽?yīng)用程序 [2]? 。程序員可以輕松的使用VB提供的組件快速建立一個(gè)應(yīng)用程序。

vb.net 窗體位置

form窗體有一個(gè)屬性是startposition，把它設(shè)置為centerscreen就是居中。

代碼為

me.startposition

=

formstartposition.centerscreen。

如果是非要計(jì)算分辨率的話：

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

就是讓窗體居中啦～

VB.NET 可視化窗體應(yīng)用程序設(shè)計(jì)的時(shí)候窗體在屏幕的位置

StartPosition屬性有如下選項(xiàng)，分別含義如下：

CenterParent 窗體在其父窗體中居中。

CenterScreen 窗體在當(dāng)前顯示窗口中居中，其尺寸在窗體大小中指定。

Manual 窗體的位置由Location屬性確定。

WindowsDefaultBounds 窗體定位在Windows默認(rèn)位置，其邊界也由Windows默認(rèn)決定。

WindowsDefaultLocation 窗體定位在Windows默認(rèn)位置，其尺寸在窗體大小中指定。

CenterScreen的意思并不是屏幕居中(是相對(duì)的),它是在"當(dāng)前顯示窗口"中居中。當(dāng)用Show()方法時(shí)應(yīng)選擇CenterScreen,用ShowDialog()方法時(shí)應(yīng)選擇CenterParent,這樣才能讓要顯示的窗口居中。

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

非常簡(jiǎn)單

一：如果知道要選中的行號(hào)

datagridview1.Rows(行號(hào)).Selected

=

True

datagridview1.FirstDisplayedScrollingRowIndex

=

行號(hào)

第一行是選中行號(hào)所在的行，第二行是移動(dòng)滾動(dòng)條將選中的行在顯示區(qū)域的最上放顯示出來(lái)。

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

For

i

=

To

datagridview1.Rows.Count

-

1

If

datagridview1.Rows(i).Cells("列的名稱(chēng)").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("列的名稱(chēng)").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ù)某列的值選中行，并且移動(dòng)滾動(dòng)條將選中的行在顯示區(qū)域的第15行顯示。