开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 其他智力游戏 > 查看源码
mdlMain.bas
资源名称：FindDiff.rar　[点击查看]
上传用户：xxscled
上传日期：2022-05-30
资源大小：108k
文件大小：1k
源码类别：

其他智力游戏

开发平台：

Visual Basic

mdlMain.bas：源码内容
  1. Attribute VB_Name = "mdlMain"
  2. Option Explicit
  3. Public Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
  4. Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
  5. Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
  6. Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
  7. Public Const LWA_COLORKEY = &H1
  8. Public Const LWA_ALPHA = &H2
  9. Public Const GWL_EXSTYLE = (-20)
  10. Public Const WS_EX_LAYERED = &H80000