扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
Declare Function SetSysModalWindow Lib "User" (ByVal hWnd As Integer) As Integer |
Declare Function GetDriveType Lib “Kernel" (ByVal nDrive As Integer) As Integer Global Const DRIVE_REMOVEABLE% = 2, DRIVE_FIXED% = 3 Global Const DRIVE_REMOTE% = 4 |
Public Sub CenterWindow(f As Form) f.Top = (Screen.Height * .5) - (f.Height * .5) f.Left = (Screen.Width * .5) - (f.Width * .5) End Sub |
Dim iNum, iNextNum, iLastNum as Integer |
Dim iNum as Integer Dim iNextNum as Integer Dim iLastNum as Integer |
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。