VisualStudio 2010中的vb.net

成都創(chuàng)新互聯(lián)主要從事成都網(wǎng)站設(shè)計(jì)、做網(wǎng)站、成都外貿(mào)網(wǎng)站建設(shè)公司、網(wǎng)頁(yè)設(shè)計(jì)、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)萬(wàn)年,十余年網(wǎng)站建設(shè)經(jīng)驗(yàn),價(jià)格優(yōu)惠、服務(wù)專(zhuān)業(yè),歡迎來(lái)電咨詢(xún)建站服務(wù):13518219792
鎖定邊框:
代碼輸入Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Fixed3D
或者在屬性列表里設(shè)置FormBorderStyle 為Fixed3D
最大化不可用:
代碼輸入Me.MaximizeBox = False
或者在屬性列表里設(shè)置MaximizeBox 為 False
實(shí)現(xiàn)方法如下:
1.引用命名空間
using System.Runtime.InteropServices;
2.聲明如下變量:
public class Form1 : System.Windows.Forms.Form
{
//.....
[DllImport("user32.dll",EntryPoint="GetSystemMenu")]
extern static IntPtr GetSystemMenu(IntPtr hWnd, IntPtr bRevert);
[DllImport("user32.dll",EntryPoint="RemoveMenu")]
extern static int RemoveMenu(IntPtr hMenu, int nPos, int flags);
//.....
}
3.在Form的構(gòu)造函數(shù)里加入代碼
public Form1()
{
const int MF_BYPOSITION = 0x0400;
const int MF_REMOVE = 0x1000;
FormBorderStyle = FormBorderStyle.FixedSingle;
MaximizeBox = false;
MinimizeBox = false;
RemoveMenu(GetSystemMenu(Handle,IntPtr.Zero),1,MF_BYPOSITION |MF_REMOVE);
}
就OK啦
vb.net設(shè)置一個(gè)窗體為,寬度不能調(diào)節(jié),而高度可以調(diào)節(jié),
代碼設(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.net,即Visual Basic.NET是基于微軟.NET Framework之上的面向?qū)ο蟮木幊陶Z(yǔ)言。其在調(diào)試時(shí)是以解釋型語(yǔ)言方式運(yùn)作,而輸出為EXE程序是是以編譯型語(yǔ)言方式運(yùn)作。可以看作是Visual Basic在.Net Framework平臺(tái)上的升級(jí)版本,增強(qiáng)了對(duì)面向?qū)ο蟮闹С帧?/p>
有兩種方法實(shí)現(xiàn)窗體固定大小
1)設(shè)置窗體的BorderStyle屬性。如下圖。將屬性設(shè)置為圖中紅色框出的任意一個(gè)值即可實(shí)現(xiàn)窗體大小固定不變。
2)編程控制
如果將Form的BorderStyle設(shè)置為 2 - Sizeable,通過(guò)編程也可以實(shí)現(xiàn)窗體固定大小
Option?Explicit
Dim?frmWidth
Dim?frmHeight
Private?Sub?Form_Load()
'窗體啟動(dòng)時(shí),記錄下窗體的寬度和高度
frmWidth?=?Me.Width
frmHeight?=?Me.Height
End?Sub
Private?Sub?Form_Resize()
'用戶(hù)改變窗體大小時(shí),強(qiáng)制窗體大小固定為原始尺寸
'從而達(dá)到窗體大小固定目的!
On?Error?Resume?Next
Me.Width?=?frmWidth
Me.Height?=?frmHeight
End?Sub
使用SplitContainer1控件不就行了,SplitContainer1控件的Fixedpanel屬性設(shè)置為Panel1
SplitContainer1的Panel2里面再放置一個(gè)SplitContainer2
SplitContainer2控件的Fixedpanel屬性設(shè)置為Panel2
二個(gè)SplitContainer設(shè)置為水平折為器方向
至于播放器控件就放在SplitContainer2控件Panel1里面
播放器控件DOCK設(shè)置為FILL
這樣不管放大縮小界面,播放器控件總是自適應(yīng)窗體大小而菜單按鈕總是在最邊緣
文章標(biāo)題:vb.net窗口固定,vb窗體固定大小
分享地址:http://chinadenli.net/article18/pheogp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供企業(yè)建站、ChatGPT、虛擬主機(jī)、網(wǎng)站制作、響應(yīng)式網(wǎng)站、品牌網(wǎng)站制作
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)