亚洲自慰无码专区|国产又黄又爽又色视频|精品久久久久久天美传媒|欧美成人一区二区三区影院|人妻毛片A一级毛片免费看|最新国产精品拍自在线播放|免费观看av片在线手机观看|国产一区二区三区亚洲欧美软件

下載手機(jī)汽配人

VB2010實(shí)現(xiàn)Aero?“毛玻璃”界面

用Visual Studio 2010中的Visual Basic 2010。 如何實(shí)現(xiàn)？ 抱歉我沒(méi)多少財(cái)富值了
問(wèn) 提問(wèn)者：網(wǎng)友 2018-07-14
最佳回答
程序大框架： Imports System.Runtime.InteropServices Public Structure MARGINS Public cxLeftWidth As Integer Public cxRightWidth As Integer Public cyTopHeight As Integer Public cyBottomHeight As Integer End Structure Public Class Form1 Const WM_NCHITTEST As Integer = &H84 Const HTCLIENT As Integer = &H1 Const HTCAPTION As Integer = &H2 Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message) Select Case m.Msg Case WM_NCHITTEST MyBase.WndProc(m) If m.Result = HTCLIENT Then m.Result = HTCAPTION Case Else MyBase.WndProc(m) End Select End Sub _ Private Shared Function DwmExtendFrameIntoClientArea(ByVal hwnd As IntPtr, ByRef margins As MARGINS) As Integer End Function Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim margins As MARGINS = New MARGINS margins.cxLeftWidth = -1 margins.cxRightWidth = -1 margins.cyTopHeight = -1 margins.cyBottomHeight = -1 Dim hwnd As IntPtr = Me.Handle Dim r
回答者：網(wǎng)友
產(chǎn)品精選
搜索問(wèn)答
還沒(méi)有汽配人賬號(hào)？立即注冊(cè)

我要提問(wèn)

汽配限時(shí)折扣

本頁(yè)是網(wǎng)友提供的關(guān)于“VB2010實(shí)現(xiàn)Aero?“毛玻璃”界面”的解答，僅供您參考，汽配人網(wǎng)不保證該解答的準(zhǔn)確性。
宝山区| 石泉县| 张家界市| 金昌市| 绥中县| 壶关县| 元氏县| 青海省| 秦皇岛市| 东乡族自治县| 九台市| 内乡县| 泾源县| 承德县| 长春市| 含山县| 武平县| 淳安县| 顺平县| 名山县| 株洲市| 肥城市| 资阳市| 定安县| 于田县| 海阳市| 兴隆县| 德阳市| 清原| 疏勒县| 大方县| 道孚县| 临沧市| 称多县| 望谟县| 原阳县| 吉水县| 舞阳县| 浮山县| 武穴市| 合水县|