制造出透明的窗体(Form)

a乔铎铎

a乔铎铎

2016-02-19 18:27

今天图老师小编给大家精心推荐个制造出透明的窗体(Form)教程,一起来看看过程究竟如何进行吧!喜欢还请点个赞哦~
注释:form上有Command1,command2两个Button并事先设定form之BorderStyle=0
  
  OptionExplicit
  PrivateDeclareFunctionGetWindowLongLib"user32"Alias"GetWindowLongA"(ByValhwndAsLong,ByValnIndexAsLong)AsLong
  PrivateDeclareFunctionSetWindowLongLib"user32"Alias"SetWindowLongA"(ByValhwndAsLong,ByValnIndexAsLong,ByValdwNewLongAsLong)AsLong
  ConstGWL_EXSTYLE=(-20)
  ConstWS_EX_TRANSPARENT=&H20&
  PrivatePreValueAsLong
  
  PrivateSubCommand2_Click()注释:还原变成不透明
  CallSetWindowLong(Me.hwnd,GWL_EXSTYLE,PreValue)
  Me.Hide
  Me.Show
  EndSub
  
  PrivateSubForm_Load()
  DimiAsLong
  
  i=GetWindowLong(Me.hwnd,GWL_EXSTYLE)
  注释:变成透明的Form
  PreValue=SetWindowLong(Me.hwnd,GWL_EXSTYLE,iOrWS_EX_TRANSPARENT)
  Me.Show
  DoEvents
  Command1.Refresh注释:令Command1可见
  Command2.Refresh注释:令Command2可见
  EndSub->

展开更多 50%)
分享

猜你喜欢

制造出透明的窗体(Form)

编程语言 网络编程
制造出透明的窗体(Form)

PS制造出水滴的透视效果

PS
PS制造出水滴的透视效果

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

男人如何制造出质量好的精子

男人 男人养生
男人如何制造出质量好的精子

PS做景深拼接制造出清晰效果

PS
PS做景深拼接制造出清晰效果

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

PS简单步骤为照片制造出雪景效果

电脑网络
PS简单步骤为照片制造出雪景效果

如何利用PS做景深拼接 制造出清晰效果

电脑网络
如何利用PS做景深拼接 制造出清晰效果

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

word如何隐藏回车换行符?找不到显示段落标

word如何隐藏回车换行符?找不到显示段落标

利用API创建文件目录

利用API创建文件目录
下拉加载更多内容 ↓