Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ÈçºÎÓÃVBд°²È«¿Ø¼þ

×ÜÊö
±¾ÎÄÐðÊöÁËÈçºÎÔÚVBÖÐʵÏֿؼþµÄIobjectSafety½Ó¿Ú£¬ÒÔ±êÖ¾¸Ã¿Ø¼þÊǽű¾°²È«ºÍ³õʼ»¯°²È«µÄ¡£VB¿Ø¼þĬÈϵĴ¦Àí·½Ê½ÊÇÔÚ×¢²á±íÖÐ×¢²á×é¼þÀàÀ´±êʶÆä°²È«ÐÔ£¬µ«ÊµÏÖIobjectSafety½Ó¿ÚÊǸüºÃµÄ·½·¨¡£±¾ÑÔÓï°üÀ¨ÁËʵÏÖ¹ý³ÌÖÐËùÐèµÄËùÓдúÂë¡£
Çë×¢Ò⣬¿Ø¼þÖ»ÓÐȷȷʵʵÊǰ²È«µÄ£¬²ÅÄܱ»±êʶΪ“°²È«µÄ”¡£±¾ÎIJ¢Î´ÂÛ¼°ÈçºÎÈ·±£¿Ø¼þµÄ°²È«ÐÔ£¬Õâ¸öÎÊÌâÇë²ÎÔÄInternet Client Software Development Kit (SDK)ÖеÄÏà¹ØÎĵµ "Safe Initialization and Scripting for ActiveX Controls"£¬ËüÔÚComponent Development À¸Ä¿ÖС£
Ïà¹ØÐÅÏ¢£º
<´Ë´¦ÂÔÈ¥ÁËÒ»¶ÎÒ²ÐíÎ޹ؽôÒªµÄ¾¯¸æ>
ÏÖÔÚ¿ªÊ¼Ñ­Ðò½¥½øµØ¾ÙÀý˵Ã÷ÔõÑù´´½¨Ò»¸ö¼òµ¥µÄVB¿Ø¼þ£¬ÒÔ¼°ÔõÑù½«Ëü±êʶΪ½Å±¾°²È«ºÍ³õʼ»¯°²È«¡£
Ê×ÏÈн¨Ò»¸öÎļþ¼ÐÀ´´æ·ÅÔÚ±¾ÀýÖÐËù²úÉúµÄÎļþ¡£
´ÓVB CD-ROMÈ¡µÃOLE ×Ô¶¯»¯Àà¿âµÄÖÆ×÷¹¤¾ß¡£½«VB°²×°¹âÅÌÖÐ\Common\Tools\VB\Unsupprt\Typlib\Ŀ¼ÏÂËùÓÐÄÚÈÝÒ»²¢¿½±´µ½Ç°ÃæÐ½¨µÄÏîÄ¿Îļþ¼ÐÖС£
°ÑÏÂÁÐÄÚÈÝ¿½±´µ½“¼Çʱ¾”ÖУ¬È»ºó±£´æµ½ÉÏÊöÎļþ¼Ð£¬ÎļþÃûΪObjsafe.odl£º
[
uuid(C67830E0-D11D-11cf-BD80-00AA00575603),
helpstring("VB IObjectSafety Interface"),
version(1.0)
]
library IObjectSafetyTLB
{
importlib("stdole2.tlb");
[
uuid(CB5BDC81-93C1-11cf-8F20-00805F2CD064),
helpstring("IObjectSafety Interface"),
odl
]
interface IObjectSafety:IUnknown {
[helpstring("GetInterfaceSafetyOptions")]
HRESULT GetInterfaceSafetyOptions(
[in] long riid,
[in] long *pdwSupportedOptions,
[in] long *pdwEnabledOptions);
[helpstring("SetInterfaceSafetyOptions")]
HRESULT SetInterfaceSafetyOptions(
[in] long riid,
[in] long dwOptionsSetMask,
[in] long dwEnabledOptions);
}
}
ÔÚÃüÁîÐÐÌáʾ·ûÏÂÇл»µ½ÏîÄ¿Îļþ¼Ð£¬ÊäÈëÏÂÁÐÃüÁî´´½¨Ò»¸ö.tlb Îļþ£º
MKTYPLIB objsafe.odl /tlb objsafe.tlb
ÔÚVBÖÐн¨Ò»¸öActiveX Control ÏîÄ¿¡£ÐÞ¸ÄÊôÐÔ£¬°ÑÏîÄ¿ÃüÃûΪIobjSafety£¬¿Ø¼þÃüÃûΪDemoCtl¡£ÔڿؼþÉÏ·ÅÖÃÒ»¸ö°´Å¥£¬ÃüÃûΪcmdTest£¬ÔÚËüµÄClickʼþÖмÓÈëÒ»¾ä´úÂë MsgBox "Test" ¡£
´ò¿ª²Ëµ¥“¹¤³Ì->ÒýÓÔ£¬µã“ä¯ÀÀ”£¬ÕÒµ½¸Õ¸Õ½¨Á¢µÄObjsafe.tlb£¬°ÑËü¼ÓÈëµ½ÒýÓÃÖС£
Ôö¼ÓÒ»¸öÐÂmoduleÃûΪbasSafeCtl£¬²¢ÔÚÆäÖм


Ïà¹ØÎĵµ£º

VB sytem32\ieframe.dllÕÒ²»µ½µÄ½â¾ö·½°¸

c:\windows\sytem32\ieframe.dll\1ÕÒ²»µ½,´íÎó½â¾ö·½°¸.
Õâ¸öieframe.dllÊÇvbÖÐWebBrowser µ÷ÓõĿؼþ£¬µ±ÄãÓÃvbÔٴδò¿ªÄãµÄ¹¤³ÌÖ®ºó£¬¾Í¿ÉÒÔ·¢ÏÖÒÔǰµÄWebBrowser ¿Ø¼þûÓÐÁË¡£¶øÇÒÔٴμÓÔØÒ²ÊDz»ÄܵÄÁË£¬Õâʱ¾ÍÐèÒªÓõ½ÏÂÃæµÄ·½·¨À´´¦Àí£º
°ÑÒÔÏÂÄÚÈÝ×ö³ÉÒ»¸ö×¢²á±íÎļþfixieframe.reg£¬µ¼Èë×¢²á±í¼´¿É£º
Windows Re ......

vb×öµÄ´óСд×Öĸת»»Æ÷

'´óСд×Öĸת»»Æ÷vb
'½çÃæ°üÀ¨ command¡¢command1¡¢command2¡¢command3 ºÍÒ»¸ö text Îı¾¿ò
'command Ϊ“»¥×ª”°´Å¥£¬command1 Ϊ“ת´ó”°´Å¥£¬command2 Ϊ“תС”°´Å¥£¬command3 Ϊ“Çå³ý”°´Å¥
Private Sub Command_Click()
Dim i As Integer, n As Integer
Dim x As S ......

VB coding

1.ÓÃVB6ÅжÏÎļþ´æÔÚÃî·¨
ÔÚ±à³Ìʱ¾­³£»áÓõ½ÅжÏÎļþÊÇ·ñ´æÔÚ£¬±ÈÈç¶ÔÎļþ×ö¶Áд²Ù×÷ǰ£¬»òÊÇÅжÏÃÜÔ¿ÎļþÊÇ·ñ´æÔڵȡ£Åжϵķ½·¨Óкܶ࣬ÓÐЩ·½·¨ËäºÜʵÓ㬵«Óе㷱Ëö¡£Æäʵ»¹¿ÉÒÔÓиü¼òµ¥µÄ·½·¨£¬¾ÍÊÇʹÓÃVB 6.0ÌṩµÄFileSystemObject¶ÔÏó¡£
¡¡¡¡FileSystemObject¶ÔÏó²»ÊÇVBÄÚÖöÔÏó£¬Ê¹ÓÃǰ±ØÐëÊ×ÏÈÑ¡Ôñ[¹¤³Ì]&rar ......

VBÔËÐÐDOSÃüÁîÉú³ÉÎı¾Îļþ²¢´ò¿ª´¦ÀíµÄÎÊÌâ

ÎÒÓÃVBÖ´ÐÐDOSÃüÁÉú³ÉÎı¾ÎļþËæ¼´´ò¿ª
µ«ÊÇÓÉÓÚÎı¾ÎļþÉú³ÉÐèÒªÒ»¶Îʱ¼ä£¬
»¹Î´µÈÎļþÉú³ÉÍê±ÏVB¾Í´ò¿ªÁËÕâ¸öÎļþ
ÇëÎÊÈçºÎÈóÌÐòµÈ´ýDOSÃüÁîÖ´ÐÐÍê±ÏÔÙ´ò¿ªÕâ¸öÎı¾Îļþ°¡
×îºÃ»¹ÄܼÓÉÏÒ»¸öµÈ´ýµÄ½ø¶ÈÌõÏÔʾÎı¾ÎļþµÄÉú³É¹ý³Ì
´úÂëÈçÏ£º
Shell "cmd  /c dir /s /b e:\ dir.txt"
Open "dir.txt" ......

VB StrConvº¯Êý

StrConvº¯Êý
·µ»Ø°´Ö¸¶¨ÀàÐÍת»»µÄ Variant (String)¡£
Óï·¨
StrConv(string, conversion, LCID)
StrConv º¯ÊýµÄÓï·¨ÓÐÏÂÃæµÄÃüÃû²ÎÊý£º
²¿·Ö
˵Ã÷
string
±ØÒª²ÎÊý¡£Òª×ª»»µÄ×Ö·û´®±í´ïʽ¡£
conversion
±ØÒª²ÎÊý¡£Integer¡£ÆäÖµµÄºÍ¾ö¶¨×ª»»µÄÀàÐÍ¡£
LCID
¿ÉÑ¡µÄ¡£Èç¹ûÓëϵͳLocaleID²»Í¬£¬ÔòΪLocaleID£¨ÏµÍ³ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ