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

vb °Ù¶È×¢²áµÇ¼

   ×î½üÔÚÀûÓÃvb±àд¹ØÓڰٶȿռäÑéÖ¤Âë×Ô¶¯Ê¶±ðµÄ³ÌÐò£¬µ«ÊÇһֱûÄÜʵÏÖ£¬Ô­Òò¾ÍÊÇÎÒµÄˮƽ»¹ÊÇÌ«²Ë¡£ÓÚÊÇ´ÓÍøÉÏѰÕÒÁËºÜ¶à¹ØÓÚÑéÖ¤Âëʶ±ðµÄÔ´´úÂ룬´ÓÀïÃæÑ§µ½²»ÉÙ¶«Î÷£¬ËãÊÇû°×ŬÁ¦°É¡£ÔÚ´Ë×ܽáÒ»ÏÂѧµ½µÄ¶«Î÷£¬Ï£ÍûÄܶÔÅóÓÑÃÇÓÐЩ°ïÖú°É¡£
  Ê×ÏÈÕûÀíϱàдÑéÖ¤Âëʶ±ðµÄ˼·°É£º
  1£¬Ê×Ïȱàд»ñÈ¡ÑéÖ¤ÂëͼƬµÄ³ÌÐò£¬ÒÔ»ñÈ¡°Ù¶È¿Õ¼äÁôÑÔΪÀý£¨×¢£ºÒÔϽÔÒ԰ٶȿռäÁôÑÔÑéÖ¤ÂëΪÀý£©¡£
  2£¬Æä´Î±àд´¢´æÑéÖ¤ÂëͼƬµÄ³ÌÐò£»
  3£¬½«Í¼Æ¬ÖеÄÏñËØ½øÐйéÀà£¬Ö»Çø·Ö°×É«ºÍºÚÉ«£¬²¢½«ºÚÉ«µÄ×ø±ê¼Ç¼£»
  4£¬Çø·ÖËĸöÑéÖ¤Âë µÄλÖ㬽«Ã¿¸öÑéÖ¤ÂëµÄ×ø±ê¹éµ½µ¥¶ÀµÄÊý×éÖÐÈ¥£»
  5£¬½«Ã¿¸öÑéÖ¤ÂëµÄÏßÌõ½øÐÐÆ½¾ù»¯£¬²¢½«ÑéÖ¤ÂëµÄ


Ïà¹ØÎĵµ£º

VBʵÏÖÊý×Öµ½ÖÐÎĽð¶îµÄת»»º¯Êý

Private Function NMoneyToSMoney ( NMoney As Variant )   As String
      If IsNumeric ( NMoney )     =   False Then
            NMoneyToSMoney   =   "²»ÊÇÊý×ÖÀ ......

£¨×ª£©VBÇ¿ÖÆÀàÐÍת»»º¯Êý

ת×Ô£ºhttp://tieba.baidu.com/f?kz=139765011
ÿ¸öº¯Êý¶¼¿ÉÒÔÇ¿ÖÆ½«Ò»¸ö±í´ïʽת»»³ÉijÖÖÌØ¶¨Êý¾ÝÀàÐÍ¡£
Óï·¨
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression) ......

VB½Ø»ñWindowsÏûÏ¢µÄ¹³×Ó

±¾ÎÄÒý×Ô¡£¸Ðлԭ´´£¡http://useway.blog.51cto.com/736087/176913
VBÎÞËù²»ÄÜÖ®Èý£ºVB½Ø»ñWindowsÏûÏ¢µÄ¹³×Ó
——×÷ÕߣºÖÓÉù
²©¿ÍµØÖ·£ºhttp://useway.blog.51cto.com
 
    VBÒ»Ö±±»ÈÏΪÊÇÒ»¸ö¿ÉÒÔͨ¹ý¼òµ¥µÄ·½·¨£¬Íê³ÉWindows½çÃæÓ¦ÓóÌÐòµÄÒ»¸öÓïÑÔ¡£¶ÔWindowsϵͳ·½ÃæµÄ±à³ÌËÆºõÊ× ......

pb調ÓÃVB寫µÄDLL·½·¨

1¡¢ÏȰÑVB±àÒëºÃµÄDLLÎļþ·Åµ½ÏµÍ³µÄSYSTEM32Îļþ¼ÐÏÂ
2¡¢ÓÃregsvr32×¢²áÕâ¸öDLLÎļþ
3¡¢Pbϵ÷ÓÃ
oleobject   ole_1
ole_1=create   oleobject
long   ll_ret
ll_ret=ole_1.connecttonewobject( 'add.addstring ')//ÆäÖÐaddΪVBµÄ¹¤³ÌÃû£¬addstringΪVBµÄÀàÄ£¿éÃû
string   ls_message, ......

VBÖд¦Àí¼ÓÁËÃÜÂëµÄMDBÎļþ

µ±MDB Îļþ¼ÓÁËÃÜÂ룬ֱ½ÓÓÉ   Access   ´òÓ¡MDBÎļþʱ£¬»á³öÏÖÃÜÂë¶Ô»°¿ò£¬Ñ¯ÎÊÃÜÂë¡£µ«ÊÇÈôÒªÓÉ   VB   ³ÌÐòÖдòÓ¡£¬±Ø須¸ü¸Ä   VB³ÌÐòÖдò¿ªMDBÎļþµÄÖ¸Á·ñÔò»á³öÏÖ´íÎóÐÅÏ¢£¡ÒÔÏÂÕë¶Ô¸÷ÖÖÇé¿ö£¬·Ö別¼ÓÒÔ˵Ã÷£º  
   
  1¡¢   ʹÓà   D ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ