VB.NET中設(shè)定窗體大小

窗體初始化時(shí)，設(shè)定Windowstate= maximized.

網(wǎng)站建設(shè)哪家好，找成都創(chuàng)新互聯(lián)！專注于網(wǎng)頁設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、成都小程序開發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了樺南免費(fèi)建站歡迎大家使用！

窗體分辨率仍然可以設(shè)成1920x1080。設(shè)計(jì)元素的時(shí)候拖拽，或者使用代碼初始化控件。

請(qǐng)幫我修改VB.net代碼窗體風(fēng)格

菜單欄→工具→選項(xiàng)→字體和顏色，如下圖：

比如背景色的修改，就得把“純文本”的前景色設(shè)為白色，背景色設(shè)為黑色。

Private Sub 這塊，就是把“關(guān)鍵字”的前景色設(shè)為黃色。

大致如下圖：

怎么用VB/VB.net/C#修改一個(gè)其他程序的窗口的邊框樣式？

? private const int GWL_STYLE = (-16);

? private const int GWL_EXSTYLE = (-20);

? private const uint WS_EX_LAYERED = 0x80000;

? private const uint WS_EX_TRANSPARENT = 0x20;

? private const uint WS_THICKFRAME = 262144;

? private const uint WS_BORDER = 8388608;

/// summary使指定 「 see cref="IntPtr"/ 句柄」 窗體 邊框樣式變?yōu)闊o邊框。/summary

? public static uint 無邊框窗體(IntPtr 句柄) {

? ? ? uint style = API_窗口.GetWindowLong(句柄, GWL_STYLE);

? ? ? style = ~WS_BORDER;

? ? ? style = ~WS_THICKFRAME;

? ? ? return API_窗口.SetWindowLong(句柄, GWL_STYLE, style); ;

? }

API窗口靜態(tài)類

? [DllImport("user32", EntryPoint = "SetWindowLong")]

? public static extern uint SetWindowLong(IntPtr hwnd, int nIndex, uint dwNewLong);

? [DllImport("user32", EntryPoint = "GetWindowLong")]

? public static extern uint GetWindowLong(IntPtr hwnd, int nIndex);

修改窗口位置

/// summary

? /// 設(shè)置窗體的位置和大小。

? /// /summary

? /// param name="hWnd"/param

? /// param name="hWndInsertAfter"用于標(biāo)識(shí)在z-順序的此 CWnd 對(duì)象之前的 CWnd 對(duì)象。

? /// para/para如果uFlags參數(shù)中設(shè)置了SWP_NOZORDER標(biāo)記則本參數(shù)將被忽略?？蔀橄铝兄抵唬?/p>

? /// para/paraHWND_BOTTOM：值為1，將窗體置于Z序的底部。如果參數(shù)hWnd標(biāo)識(shí)了一個(gè)頂層窗體，則窗體失去頂級(jí)位置，并且被置在其他窗體的底部。

? /// para/paraHWND_NOTOPMOST：值為-2，將窗體置于所有非頂層窗體之上（即在所有頂層窗體之后）。如果窗體已經(jīng)是非頂層窗體則該標(biāo)志不起作用。

? /// para/paraHWND_TOP：值為0，將窗體置于Z序的頂部。

? /// para/paraHWND_TOPMOST：值為-1，將窗體置于所有非頂層窗體之上。即使窗體未被激活窗體也將保持頂級(jí)位置。/param

? /// param name="x"窗體新的x坐標(biāo)。如hwnd是一個(gè)子窗體，則x用父窗體的客戶區(qū)坐標(biāo)表示/param

? /// param name="y"窗體新的y坐標(biāo)。如hwnd是一個(gè)子窗體，則y用父窗體的客戶區(qū)坐標(biāo)表示/param

/// param name="Width"指定新的窗體寬度/param

/// param name="Height"指定新的窗體高度/param

? /// param name="wFlags"/param

? /// returns/returns

? [DllImport("user32.dll", CharSet = CharSet.Ansi, EntryPoint = "SetWindowPos")]

? public static extern int SetWindowPos(IntPtr hWnd, hWndInsertAfter hWndInsertAfter, int x, int y, int Width, int Height, wFlags wFlags);

? /// summary

? /// 調(diào)整指定 「 see cref="IntPtr"/ 句柄」 窗體的位置和尺寸。

? /// /summary

? /// param name="句柄"指定 「 see cref="IntPtr"/ 句柄」 窗體/param

? /// param name="x"橫坐標(biāo)/param

? /// param name="y"縱坐標(biāo)/param

? /// param name="w"寬/param

? /// param name="h"高/param

? public static int 調(diào)整窗體(IntPtr 句柄, int x, int y, int w, int h) {

? ? ? return API_窗口.SetWindowPos(句柄, 0, x, y, w, h, wFlags.SWP_NOZORDER);

? }

? /// summary

? /// 調(diào)整指定 「 see cref="IntPtr"/ 句柄」 窗體的位置。

? /// /summary

? /// param name="句柄"指定 「 see cref="IntPtr"/ 句柄」 窗體/param

? /// param name="x"橫坐標(biāo)/param

? /// param name="y"縱坐標(biāo)/param

? public static int 調(diào)整窗體位置(IntPtr 句柄, int x, int y) {

? ? ? return API_窗口.SetWindowPos(句柄, 0, x, y, 0, 0, wFlags.SWP_NOSIZE | wFlags.SWP_NOZORDER);

? }

怎么在VB.NET中創(chuàng)建模態(tài)窗體

VB用Show方法顯示窗體時(shí)使用style屬性為1，就可使顯示的窗體以模式窗體顯示。 Show 方法，用以顯示 MDIForm 或 Form 對(duì)象。不支持命名參數(shù)。 說明 如果調(diào)用 Show 方法時(shí)指定的窗體沒有裝載，Visual Basic 將自動(dòng)裝載該窗體。

VB.NET 里除了下面的方法，還有沒有什么方法把窗體做成任意形狀？

1）如上所述的API方法

2）使用System.Draw名稱空間中相關(guān)類的方法創(chuàng)建一個(gè)路徑，然后對(duì)窗體進(jìn)行按路徑重畫即可