VB移动没有标题的窗体

我们一般是用鼠标按住窗口的标题栏，然后移动窗口，当窗口没有标题栏时，我们可以用下面的方法来移动窗口：

在 BAS 文件中声明：

Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const HTCAPTION = 2
Private Const WM_NCLBUTTONDOWN = &HA1

'然后，在 Form_MouseDown 事件中：

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

ReleaseCapture

SendMessage hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0&

End Sub

VB部分相关文章推荐

※VB快速读取 TextBox 第 N 行的资料

※VB禁止使用 Alt-Tab 或 Ctrl-Alt-Del

※生成迷宫的程序

※另一方法转换大小写

※VB控件注册 - 利用资源文件将dll、ocx打包进exe文件

※VB利用资源文件进行工作

※[转]vb高效编程（优化）

※VB阳历转阴历

※纯VB代码取得硬盘的物理序列号

※VB获得磁盘的文件系统

※做VB的，经常注册和反注册OCX控件和DLL链

※VB从程序中生成Exe文件

※VB6监视/操作剪贴板示例(VB6.0代码)

※VB6里自动提交/自动填表的一种相对通用的方案

※VB移动没有标题的窗体

※VB随机字母的函数

※VB删除带子文件夹和文件的文件夹

※VB怎样屏蔽 Alt+F4键

※VB 隐藏进程

※vb屏蔽文本框点右键时的弹出菜单

※VB手控Combobox的打开或收起

※在VB中INI文件的读写、删除（对中文支持很好）

※vb全局热键的写法（占很少的资源）

※vb取消文本框的粘贴功能

※VB常用文件操作类

※VB获取特殊文件夹

※VB获取windows各常用目录的函数（模块）

※VB生成太极图

※VB:常用内部函数大全,你会了几个呢?

※vb中SendMessage函数

※精简VB程序的代码

※VB:将数字转换为大写中文

※VB:设定 MsgBox 在若干时间之后若无回应则自动关闭

※VB:读取及设定NumLock/CapsLock/ScrollLock的值

※VB:您知道 Mid$ 函量可以放在 '=' 的左方吗

※VB后台获得按键,并执行自己的函数(非钩子及热键)

※VB:将短文件名格式转成长文件名

※在vb中使用Iphlpapi.dll获取网络信息(上）

※在vb中使用Iphlpapi.dll获取网络信息(下）

VB移动没有标题的窗体相关推荐

C# WinForm 在窗口菜单上显示已打开窗体的标题及其窗体的排列
1. C# WinForm 在窗口菜单上显示已打开窗体的标题设置窗体菜单的MdiList属性为 True 2.窗体的排列 Code // // 平铺 base.LayoutMdi(MdiLayou ...
二级VB培训笔记06：窗体与常用控件综合案例【个人信息注册】
二级VB培训笔记06:窗体与常用控件综合案例[个人信息注册] 一.常用控件属性与方法思维导图二.综合案例--个人信息注册 1.创建工程,修改名称为"个人信息注册",窗体名称设置为 ...
VB讲课笔记11：多重窗体与环境应用
VB讲课笔记11:多重窗体与环境应用主要考查多重窗体的应用以及VB工程结构.以选择题和操作题两种形式考核.选择题中所占分值较少,约占总分的1%,多属于概念题.操作题中,主要出现在简单应用题,操作题试 ...
如何移动没有标题的窗体
★.如何移动没有标题的窗体 △"欺骗"系统,让他认为点中的是窗体的标题行:在FORM的Private定义中作如下声明: Procedure WMNCHitTest(var M: T ...
vb语言中怎样编码窗体中所有字体加粗_VB窗口属性中文对照表
VB 属性对应的中文 A Action 返回或设置被显示的对话框 (CommandDialog) 的类型 , 在设计时无效. ActiveControl 活动控件 ActiveForm 活动窗体 Al ...
vb.net详解MDI窗体操作方法
MDI窗体可以避免打开窗体的时候被无数个子窗体困扰,我将为大家一一的介绍一下vb.net中MDI窗体的操作方法一.如何创建MDI窗体? 1.创建mdi主窗体新建建立一个默认空白的Windows应用 ...
求教如何实现VB.NET控件随着窗体的放大而放大
Option Explicit On Public Class Form1 '窗体最大化定义 Private FormOldWidth As Long '原始宽度 Private FormOldHei ...
[VB.NET]浅谈MDI窗体的多窗体编程
---MDI窗体和多窗体编程--- 目的:在MDI窗体内用ToolBar实现多窗体的实例,在VB.NET中显示窗体一般代码如下 Private Sub ToolBar1_ButtonClick ...
java怎么设置窗体标题_Android窗体自定义标题栏
自定义实现功能图片如下: ? ? ? package com.easyway.titlebar; import android.app.Activity; import android.os.Bund ...

VB移动没有标题的窗体

VB移动没有标题的窗体相关推荐

最新文章

热门文章