首页 相关文章 建立无模式窗口

建立无模式窗口

'makeanewproject;twoforms
  'onform1acommandbutton
  'putthecodeintherightplaces
  'pressF5
  
  SubForm2_load()
  'intheform2_loadevent
  'besuretomaketheform2smallerthenform1!
  lngOrigParenthWnd=SetWindowWord(Me.hwnd,-8,mdiMain.hwnd)
  
  EndSub
  
  PrivateSubForm_Unload(CancelAsInteger)
  'intheform2_unloadevent
  DimlngResult&
  
  lngResult=SetWindowWord(Me.hwnd,-8,lngOrigParenthWnd)
  
  EndSub
  
  'intheform2_generalsection
  PrivateDeclareF...[ 查看全文 ]

2016-02-19 标签:

建立无模式窗口的相关文章

手机页面
收藏网站 回到头部