vb點(diǎn)虐 設(shè)置一個(gè)窗體為,寬度不能調(diào)節(jié),而高度可以調(diào)節(jié),
衡陽(yáng)網(wǎng)站制作公司哪家好,找成都創(chuàng)新互聯(lián)!從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、APP開(kāi)發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)公司等網(wǎng)站項(xiàng)目制作,到程序開(kāi)發(fā),運(yùn)營(yíng)維護(hù)。成都創(chuàng)新互聯(lián)自2013年創(chuàng)立以來(lái)到現(xiàn)在10年的時(shí)間,我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn),來(lái)保證我們的工作的順利進(jìn)行。專(zhuān)注于網(wǎng)站建設(shè)就選成都創(chuàng)新互聯(lián)。
代碼設(shè)置方法:
Dim form_width As Integer = Me.Width
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
If Me.Width form_width Then
Me.Width = form_width
'Debug.Print(TimeString "-" CStr(Me.Width))
End If
End Sub
vb點(diǎn)虐 ,即Visual Basic.NET是基于微軟.NET Framework之上的面向?qū)ο蟮木幊陶Z(yǔ)言。其在調(diào)試時(shí)是以解釋型語(yǔ)言方式運(yùn)作,而輸出為EXE程序是是以編譯型語(yǔ)言方式運(yùn)作??梢钥醋魇荲isual Basic在.Net Framework平臺(tái)上的升級(jí)版本,增強(qiáng)了對(duì)面向?qū)ο蟮闹С帧?/p>
窗體初始化時(shí),設(shè)定Windowstate= maximized.
窗體分辨率仍然可以設(shè)成1920x1080。設(shè)計(jì)元素的時(shí)候拖拽,或者使用代碼初始化控件。
從來(lái)只有高分辨率下為低分辨率環(huán)境開(kāi)發(fā)程序的。既然開(kāi)發(fā)環(huán)境是低分辨率,那就只能利用代碼初始化各個(gè)控件的位置和大小了。隨測(cè)隨改。
'窗體有個(gè)屬性ClientSize?是除去邊框及標(biāo)題欄部分的為工作區(qū)
'你要的應(yīng)該就是這個(gè)了。
'設(shè)置窗體工作區(qū)的大小?例為400*300
Me.ClientSize?=?New?Size(400,300)