欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

拷過(guò)去放在數據庫中的其他---數據庫script  
   
  Declare   Function   GetActiveWindow   Lib   "user32.dll"   ()   As   Long  
  Declare   Function   SetMenu   Lib   "user32.dll"   (   Byval   hmenu   As   Long,   Byval   newmenu   As   Long   )   As   Integer    
  Dim   hwnd   As   Long  
   
  Sub   Initialize  
  Call   HiddenMenu()  
  End   Sub  
   
  Sub   HiddenMenu()  
  Dim   hwnd   As   Long  
  hwnd   =   GetActiveWindow()  
  Call   SetMenu(hwnd,0)            
  End   Sub