|
½ûÓÃÖ÷´°¿Ú×î´ó»¯ºÍ×îС»¯°´Å¥
ÉùÃ÷
Private Declare Function GetSystemMenu Lib "user32.dll" _
(ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32.dll" _
(ByVal hMenu As Long, ByVal uPosition As Long, ByVal uFlags As Long) As Long
ʹÓÃ
Private Sub Form_Load()
Dim hSysMenu As Long
Dim retval As Long
hSysMenu = GetSystemMenu(hWndAccessApp, 0)
retval = RemoveMenu(hSysMenu, &HF120;, &H0;)
hSysMenu = GetSystemMenu(Me.hwnd, 0)
retval = RemoveMenu(hSysMenu, &HF120;, &H0;)
End Sub
--------------------------------------------------------------------------------
Ïà¹ØÎÄÕÂ
²»Ê¹ÓÃAPI»ñµÃÖ¸¶¨Îļþ¼ÐÎļþÁбí 2004-10-14 10:16:51
ÆÊÎö Declare Óï¾ä 2004-1-28 15:08:06
Á˽â¾ä±ú 2004-1-28 15:03:43
ʲôÊÇ API£¿ 2004-1-28 15:01:53
¶Ô×¢²á±í²Ù×÷¼¼ÇÉ-½«³ÌÐòÔÚ¿ª»úʱÔËÐÐ 2003-11-18 9:24:59
officeXPÏÂʹÓÃÎļþ¶Ô»°¿òµÄÁíÍâÒ»ÖÖ·½·¨ 2003-11-17 8:47:04
ÕæÕýʵÏÖÔÚwindows2000ϹػúµÄÔ´´úÂë 2003-11-14 8:32:00
»ñÈ¡WindowsÓû§µÇ¼Ãû 2003-11-7 8:42:45
»ñÈ¡Íø¿¨ÎïÀíµØÖ· 2003-11-7 8:40:48
Òþ²ØAccessÖ÷´°¿ÚÖ®¶þ 2003-11-7 8:34:20
ÈçºÎÈô°Ìå×ÜÔÚ×îÇ°Ã棿 2003-11-7 8:25:19
ÈçºÎ¹Ø±Õ¼ÆËã»ú£¿ 2003-11-7 8:24:43
ÈçºÎ½¨Á¢¼òµ¥µÄ³¬¼¶Á¬½Ó£¿(ShellExecute) 2003-11-6 20:39:18
ÈçºÎÈô°ÌåµÄ±êÌâÌõÉÁ˸ÒÔÒýÆðÓû§×¢Ò⣿ 2003-11-6 20:38:43
ÔõÑùÕÒµ½Êó±êÖ¸ÕëµÄXY×ø±ê£¿ 2003-11-6 20:37:33
ÔÚ³ÌÐòÖÐÈçºÎ´ò¿ªºÍ¹Ø±Õ¹âÇýÃÅ£¿ 2003-11-6 20:20:00
ÔõÑùʹCtrl-Alt-DeleteÎÞЧ£¿ 2003-11-6 20:19:25
ÈçºÎÒƶ¯Ã»ÓбêÌâÀ¸µÄ´°¿Ú£¿ 2003-11-6 20:17:30
ÑÓʱº¯Êý 2003-11-6 20:16:53
Èÿؼþ×ÔÊÊÓ¦ÆÁÄ»·Ö±æÂÊ 2003-10-18 9:58:33
¼üÅ̳£ÓôúÂëÒ»ÀÀ±í 2003-10-17 19:54:02
ÖØж¨Î»Á´½Ó±í¶þ²½×ß 2003-10-17 19:00:07
ADOÁ¬½ÓÊý¾Ý¿â×Ö·û´®´óÈ« 2003-10-17 18:40:47
ÈçºÎÈ·¶¨µ±Ç°ÆÁÄ»·Ö±æÂÊ 2003-10-14 8:41:00
»ñÈ¡windows°²×°Â·¾¶ 2003-10-14 8:39:08
½« Microsoft Access ÓÃ×÷ Automation ·þÎñÆ÷ 2003-10-14 8:37:19
ÓÅ»¯Microsoft AccessÌá¸ßËÙ¶È 2003-10-6 10:31:55
|
