vb程序代码编写:VB编写最前窗体方法和代码来源: 发布时间:星期四, 2008年9月25日 浏览:266次 评论:0
(1)启动API浏览器,通过该浏览器复制“SetWindowPos”函数的声明语句。(2)启动Visual Basic,新建一个标准EXE工程。(3)使用“工程”|“添加模块”菜单项,添加一个新的模块文件。(4)打开模块的代码窗口,将“SetWindowPos”函数的声明语句粘贴进去。(5)打开Form1窗体的代码窗口,编写如下程序。
view plaincopy to clipboardprint? Private Sub Form_Load() retnum = SetWindowPos(Me.hwnd, -1, 600, 200, 100, 100, &H40) If retnum = 0 Then MsgBox "顶层窗口设置失败!", vbOKOnly + vbExclamation End If End Sub Private Sub Form_Load() retnum = SetWindowPos(Me.hwnd, -1, 600, 200, 100, 100, &H40) If retnum = 0 Then MsgBox "顶层窗口设置失败!", vbOKOnly + vbExclamation End If End Sub (6)运行程序。 0
相关文章
读者评论
发表评论 |