首先進(jìn)行一個(gè)計(jì)算
創(chuàng)新互聯(lián)主營沙依巴克網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營網(wǎng)站建設(shè)方案,app軟件開發(fā)公司,沙依巴克h5小程序設(shè)計(jì)搭建,沙依巴克網(wǎng)站營銷推廣歡迎沙依巴克等地區(qū)企業(yè)咨詢
要讓靜態(tài)文本固定在中間,也就是這種關(guān)系,如圖(label的中心和窗體的中心一樣,label 的高的中心的窗體一樣)
然后寫出關(guān)系 下面是推導(dǎo)過程,要想我最終得到要是left 和 top的值
下面是數(shù)學(xué)關(guān)系,所有學(xué)到計(jì)算機(jī)的時(shí)候要加上val什么的,你如果有vb基礎(chǔ)就看得懂,不懂追問
然后top同理
最后代碼(假設(shè)這個(gè)靜態(tài)文本的name叫l(wèi)abel)
Label.left=0.5*(val(me.width)-val(label.width))
Label.top=0.5*(val(me.height)-val(label.height))
上面代碼是實(shí)現(xiàn)居中的功能。
然后將這個(gè)代碼寫到form的realize過程中即可
非常簡單
一:如果知道要選中的行號(hào)
datagridview1.Rows(行號(hào)).Selected
=
True
datagridview1.FirstDisplayedScrollingRowIndex
=
行號(hào)
第一行是選中行號(hào)所在的行,第二行是移動(dòng)滾動(dòng)條將選中的行在顯示區(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ù)某列的值選中行,并且移動(dòng)滾動(dòng)條將選中的行在顯示區(qū)域的第15行顯示。
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
就是讓窗體居中啦~
正確的方法是在屬性窗口中設(shè)置窗體的??StartUpPosition?為 2。
請(qǐng)注意,該屬性只能在屬性窗口中設(shè)置。
如下:
Private Sub Form_Resize()
Command1.Top = (Me.Height - Command1.Height) \ 2
Command1.Left = (Me.Width - Command1.Width) \ 2
End Sub
把Command1換成你想要居中的控件名就可以了(正確排版就是上面那樣的)
VB:
Visual Basic(簡稱VB)是Microsoft公司開發(fā)的一種通用的基于對(duì)象的程序設(shè)計(jì)語言,為結(jié)構(gòu)化的、模塊化的、面向?qū)ο蟮摹瑓f(xié)助開發(fā)環(huán)境的事件驅(qū)動(dòng)為機(jī)制的可視化程序設(shè)計(jì)語言。是一種可用于微軟自家產(chǎn)品開發(fā)的語言。 [1]
“Visual” 指的是開發(fā)圖形用戶界面 (GUI) 的方法——不需編寫大量代碼去描述界面元素的外觀和位置,而只要把預(yù)先建立的對(duì)象add到屏幕上的一點(diǎn)即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic ?Instruction Code) 語言,是一種在計(jì)算技術(shù)發(fā)展歷史上應(yīng)用得最為廣泛的語言。
Visual Basic源自于BASIC編程語言。VB擁有圖形用戶界面(GUI)和快速應(yīng)用程序開發(fā)(RAD)系統(tǒng),可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫,或者輕松的創(chuàng)建Active X控件,用于高效生成類型安全和面向?qū)ο蟮膽?yīng)用程序 [2]? 。程序員可以輕松的使用VB提供的組件快速建立一個(gè)應(yīng)用程序。
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,這樣才能讓要顯示的窗口居中。