||
最新公告
本人主要开发过软件有:<<工厂生产管理系统>><<人事管理系统>><<货仓管理系统>><<发票管理系统>><<智能IC卡考勤管理系统>><<智能IC卡门禁考勤管理系统>><<指文门禁考勤管理系统>><<智能巡检管理系统>><<酒楼点菜收银系统>>等
天外黑仙个人搞笑音乐网 http://fuhaihua.ik8.com
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
用法:DeleteLineFromFile App.Path & "/test.txt", 3
Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _(ByVal hwnd As Long, ByVal nIndex As Long) As Long
本示例演示把指定名称的任意窗体包容进来.Option Explicit