如下:
成都創(chuàng)新互聯(lián)公司自2013年起,先為梁園等服務(wù)建站,梁園等地企業(yè),進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為梁園企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。
PrivateSubForm_Resize()
Command1.Top=(Me.Height-Command1.Height)\2
Command1.Left=(Me.Width-Command1.Width)\2
EndSub
把Command1換成你想要居中的控件名就可以了(正確排版就是上面那樣的)
VB:
VisualBasic(簡稱VB)是Microsoft公司開發(fā)的一種通用的基于對象的程序設(shè)計語言,為結(jié)構(gòu)化的、模塊化的、面向?qū)ο蟮?、包含協(xié)助開發(fā)環(huán)境的事件驅(qū)動為機(jī)制的可視化程序設(shè)計語言。是一種可用于微軟自家產(chǎn)品開發(fā)的語言。[1]
“Visual”指的是開發(fā)圖形用戶界面(GUI)的方法——不需編寫大量代碼去描述界面元素的外觀和位置,而只要把預(yù)先建立的對象add到屏幕上的一點即可?!癇asic”指的是BASIC(BeginnersAll-PurposeSymbolic?InstructionCode)語言,是一種在計算技術(shù)發(fā)展歷史上應(yīng)用得最為廣泛的語言。
VisualBasic源自于BASIC編程語言。VB擁有圖形用戶界面(GUI)和快速應(yīng)用程序開發(fā)(RAD)系統(tǒng),可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫,或者輕松的創(chuàng)建ActiveX控件,用于高效生成類型安全和面向?qū)ο蟮膽?yīng)用程序[2]?。程序員可以輕松的使用VB提供的組件快速建立一個應(yīng)用程序。
首先進(jìn)行一個計算
要讓靜態(tài)文本固定在中間,也就是這種關(guān)系,如圖(label的中心和窗體的中心一樣,label 的高的中心的窗體一樣)
然后寫出關(guān)系 下面是推導(dǎo)過程,要想我最終得到要是left 和 top的值
下面是數(shù)學(xué)關(guān)系,所有學(xué)到計算機(jī)的時候要加上val什么的,你如果有vb基礎(chǔ)就看得懂,不懂追問
然后top同理
最后代碼(假設(shè)這個靜態(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))
上面代碼是實現(xiàn)居中的功能。
然后將這個代碼寫到form的realize過程中即可
Form窗體有一個屬性是StartPosition,把它設(shè)置為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
就是讓窗體居中啦~