VB °æ (¾«»ªÇø)

·¢ÐÅÈË: bloom (©À©Á©Â©Ã©Ä©Æ©Ç¨), ÐÅÇø: VB
±ê  Ìâ: GetKeyboardType(Ó²¼þÓëϵͳ)(תÔØ)
·¢ÐÅÕ¾: ¹þ¹¤´ó×϶¡Ïã (2000Äê09ÔÂ07ÈÕ18:38:03 ÐÇÆÚËÄ), ×ªÐÅ

¡¾ ÒÔÏÂÎÄ×ÖתÔØ×Ô cnTemp ÌÖÂÛÇø ¡¿
¡¾ Ô­ÎÄÓÉ catchy Ëù·¢±í ¡¿
·¢ÐÅÈË: yucheng (ÎÞ»°¿É˵), ÐÅÇø: VisualBasic
·¢ÐÅÕ¾: BBS Ë®Ä¾Ç廪վ (Wed Mar 29 23:47:20 2000) WWW-POST

GetKeyboardType 

VBÉùÃ÷ 
Declare Function GetKeyboardType Lib "user32" Alias "GetKeyboardType" (ByVal 
nTypeFlag As Long) As Long 
˵Ã÷ 
Á˽âÓëÕýÔÚʹÓõļüÅÌÓйصÄÐÅÏ¢ 
·µ»ØÖµ 
Long£¬Áã±íʾ³ö´í¡£·ñÔò·µ»ØÏÂÊöÖµÖ®Ò» 
nTypeFlag=0 1¡ª¡ªPC»ò¼æÈݵÄ83¼ü¼üÅÌ£»2¡ª¡ªOlivetti102¼ü¼üÅÌ£»3¡ª¡ªAT»ò¼æÈÝ84¼ü
¼üÅÌ£»4¡ª¡ªÔöÇ¿ÐÍ£¨IBM£©101»ò102¼ü¼üÅÌ£»5¡ª¡ªNokia1050¼üÅÌ£»6¡ª¡ªNokia9140¼üÅÌ
£»7¡ª¡ªÈÕÎļüÅÌ 
nTypeFlag=1 ÈκÎÖµ£¬Óɳ§É̾ö¶¨ 
nTypeFlag=2 1¡ª¡ª10¸ö¹¦Äܼü£¨¼´ F? ¼ü£©£»2¡ª¡ª12»ò18¸ö¹¦Äܼü£»3¡ª¡ª10¸ö¹¦Äܼü
£»4¡ª¡ª12¸ö¹¦Äܼü£»5¡ª¡ª10¸ö¹¦Äܼü£»6¡ª¡ª24¸ö¹¦Äܼü£»7¡ª¡ªÓɳ§É̾ö¶¨ 
²ÎÊý±í 
²ÎÊý ÀàÐͼ°ËµÃ÷ 
nTypeFlag Long£¬¿ÉÉèΪÏÂÊöÖµÖ®Ò» 
0¡ª¡ª·µ»Ø¼üÅÌÀàÐÍ 
1¡ª¡ª·µ»Ø¼üÅÌ×ÓÀàÐÍ 
2¡ª¡ª·µ»Ø¼üÅÌÉϵŦÄܼüÊýÁ¿ 


--

--
¡î À´Ô´:£®¹þ¹¤´ó×϶¡Ïã bbs.hit.edu.cn£®[FROM: casi.bbs@smth.org]
--
¡ù ×ªÔØ:£®¹þ¹¤´ó×϶¡Ïã bbs.hit.edu.cn£®[FROM: 202.118.247.254]
[°Ù±¦Ïä] [·µ»ØÊ×Ò³] [Éϼ¶Ä¿Â¼] [¸ùĿ¼] [·µ»Ø¶¥²¿] [Ë¢ÐÂ] [·µ»Ø]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
Ò³ÃæÖ´ÐÐʱ¼ä£º2.715ºÁÃë