天堂v国产精品五月天老熟女久久|天天看黄色免费金沙 无码 中字|亚洲精品无码线AV无码专区在线|加勒比av福利色哟哟—精品人妻|最新黄片免费播了国产精品99ri|麻豆福利在线在线视频 91|无码久久久久每一日精品人妻|av一区亚洲午夜福利电影

下載手機汽配人

VB2010實現Aero?“毛玻璃”界面

用Visual Studio 2010中的Visual Basic 2010。 如何實現? 抱歉我沒多少財富值了
提問者:網友 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
回答者:網友
產品精選
搜索問答
還沒有汽配人賬號?立即注冊

我要提問

汽配限時折扣

本頁是網友提供的關于“VB2010實現Aero?“毛玻璃”界面”的解答,僅供您參考,汽配人網不保證該解答的準確性。
丹阳市| 浦县| 漳浦县| 淮南市| 陇西县| 永嘉县| 浮梁县| 泰顺县| 商都县| 武鸣县| 平南县| 托里县| 方正县| 峡江县| 泗洪县| 叶城县| 玉门市| 新龙县| 永登县| 芮城县| 高陵县| 赞皇县| 青浦区| 北碚区| 金堂县| 房山区| 清水河县| 溧水县| 瓮安县| 深州市| 都江堰市| 双鸭山市| 苏尼特左旗| 元江| 阿图什市| 金平| 从江县| 仙游县| 小金县| 基隆市| 肇东市|