VB 5·1µÚÒ»Ìì
ÉÏÎç:
VB×ܽ᣺
ÏÂͼÊÇÓÃmindmanagerÖÆ×÷µÄVB×ܽámdb£º
³£ÓÿؼþµÄ·ÖÀࣺ
ÊôÐԺ͹ý³Ì£º
·½·¨ºÍ¹ý³Ì
ʼþ¹ý³Ì¡¢Function¹ý³ÌºÍ¹ý³Ì£º
VB×ܽá´óͼ£º
·ÖÆçÈçÏ£º
Êý¾Ý°üÀ¨£ºÊý¾ÝÀàÐÍ¡¢±äÁ¿¡¢³£Á¿¡¢ÔËËã·û¡¢±í´ïʽµÈ¼¸²¿·Ö£¬¶øÁ÷³Ì¿ØÖÆÓï¾äÓ¦²»Ó¦¸Ã¼ÓÈëÆäÖС£
ÎҸоõ²»Ó¦¸Ã£¬ÓÓ±ù¿éÄ£×Ó”Õâ¸öÀý×ӱȽϺÏÊÊ£ºÊǵĽṹºÍ˳ÐòλÖþö¶¨ÁËÄÄЩˮÏȱ»¶³³É±ù¡£Á÷³Ì¿ØÖÆÓï¾äÏ൱ÓÚÄ£×Ó¸ñ£¬¶øÊý¾ÝÀàÐÍ¡¢±äÁ¿¡¢³£Á¿¡¢ÔËËã·û¡¢±í´ïʽµÈËãÊÇÄ£×ÓÀïµÄË®£¬ÊÇÁ÷³Ì¿ØÖÆÓï¾ä¾ö¶¨ÁËÕâЩÊý¾ÝµÄ˳ÐòÖ´ÐУ¬ËùÒÔÓ¦ÓùØÁª£¬¶ø²»ÊÇ´ÓÊô¡£
ÏÂÎ磺
²ð»úÆ÷£º
·¸´íÎóÈçÏ£º²ð»úÆ÷֮ǰºÍ×°»úÆ÷Ö®ºó¶¼Ã»ÓÐÊÔ×Å“µãÁÁ”Ëü£¬×Ô¼ºµ±Ê±¸Ð¾õÓÉ×鳤Ëû»á°²Åźõģ¬×îºó×°ºÃʱÎÒÓÐÏë¹ýÊÔÊÔÄܲ»ÄÜ´ò¿ª×ÀÃæ£¬µ«¿´ÖÜΧͬѧ¶¼Ã»·´Ó³£¬×°ºÃµÄ¶¼×ß¹âÁË£¬×Ô¼ºÒ²Ï´ÊÖ×ßÈË¡£
ÕâÑù¾Í²»È·¶¨×Ô¼ºÊÇ·ñÇ×ÊÖ½«»úÆ÷×é×°³É¹¦£¬ÒÔºóÈç¹û±ðÈËÕÒ×Ô¼º°ï棬ÕâÊÇËæ²¨ÖðÁ÷¶Ôѧϰ̬¶È²»¶ËÕýµÄ±íÏÖ¡£
ºÃ¶àʱºò±ðÈËÎÊ×Ô¼º*****Ôõô×ö£¬×Ô¼ºËµÓ¦¸ÃÊÇ****µØ×ö°É£¬µ«±ðÈËÎÊ×Ô¼ºÈ·¶¨Âð£¬×Ô¼ºÈ´Ëµ²»ÄÜûÊÔ¹ý£¬ÕâÊǺÜÑÏÖØµÄ¡£Ñ§Ï°²»¿ÉàñàðÍÌÔæ£¬±ØÐëÔúʵ¡£
ÒÔºó²»¹Üѧϰʲô£¬¼ÈȻʱ¼ä¸¶³ö¸øËüÁË£¬¾ÍÒªÏñ×ʱ¾¼ÒÒ»Ñù£¬¾¡Á¿¶àµÃեȡÕâ¶Îʱ¼äµÄ×ʱ¾£¬²»¿ÉÈÃ×Ô¼ºµÄÕâ¶Îʱ¼äÃÉ»ì¹ý¹Ø£¬ÕâÊǶÔ×Ô¼ºÕâ¶Îʱ¼äµÄ¸ºÔð£¬Ò²ÊǶÔ×Ô¼ºÉú»îµÄ¸ºÔð¡£
·ñÔò£¬ÒÔºó²»¹ÜÕû×Ô¼ºµÄ»úÆ÷»¹ÊǰïÖú±ðÈ˶¼Ã»µ×£¬ÒòΪ×Ô¼ºÃ»ÓÐÕâ·½ÃæµÄ³É¹¦¾Ñ飬×ÔÐÅÐÄûÓн¨Á¢ÆðÀ´£¬Õâ·ÅÔÚÉú»îÖеķ½·½ÃæÃæ¶¼ÊÊÓã¬Éú»îÖд¦´¦½ÔѧÎÊ£¬¶Ô´ýÈκÎÊÂÇé²»¿Éð½ø£¬±ØÐë¾¹ý×Ô¼ºÑϸñµÄʵ¼ù£¬Õâ²»½öÊǶÔ×Ô¼ºÑ§Ï°¹ý³ÌµÄ¼ìÑ飬¸üÊǶÔÒÔºóÓ¦¶ÔÀ§ÄÑ×ÔÐÅÐĵĽ¨Á¢¡£
Ïà¹ØÎĵµ£º
YXOnlineÒѾ½Ó½üβÉù,ΪÁË´¦ÀíһЩ½çÃæµÄÎÊÌâ,²âÊÔÒ»¸öC++µÄDLL
Ò»¸öº¯Êý,ÓÃdeasambling¿´C++µÄ´úÂëÊÇûÓдíÎóµÄ,µ«Êǵ½ÁËVB,Çë¿´
bµÄ·µ»ØÖµÊÇTrue ²»¹ÜC++ºÍVBÏ໥¼üÔ¼¶¨TrueºÍFalse¸÷¶ÔӦΪʲôÊýÖµ
ÕâÀïÒѾÊÇTrueÁË
µ«ÄÇʱÏÔʾTrue = True ÈԾɲ»Ö´ÐеÚÒ»¸öMsgbox
Ö±½ÓÌøµ½Else
¶øÈç¹ûÊ¡ÂÔb = True Ϊ If b Then ......
¡¡¡¡ÐÅÏ¢¼à¿ØÓëÒþ˽±£»¤ÓÀÔ¶ÊÇÒ»¶Ôì¶Ü¡£
ÔÚ¶Ô¸¶¸÷ÖÖÐÅÏ¢ÇÔÈ¡Èí¼þÉÏ¡£
м¼Êõ×ÜÊDzã³ö²»Çî¡£±¾ÎĽéÉÜÒ»ÖÖ¹ÅÀϵļüÅ̼ǼÆ÷¼¼Êõ£¬È·ÊµºÜ¹ÅÀÏ¡£
DOSʱ´úÈËÃǾÍÔÚÓÃÁË¡£
µ«ÊÇÏÖÔÚËüÈÔÈ»ºÜÓÐЧ£¬ÔÚ¼üÅ̹ýÂËÇ ......
Dim FirstFile As String
Dim SecondFile As String
Dim FinalFile As String
Dim first() As Byte
Dim second() As Byte
Dim file1size As Long, file2size As Long
Private Sub Command3_Click()
SecondFile = Text2.Text
FirstFile = Text1.Text
FinalFile = Text3.Text
Open FirstFile For Binary Access Rea ......
Asp.netÁ¬½ÓSQL Server2000Êý¾Ý¿âÀý³ÌÏê½â:
<%@ Import Namespace="System.Data" %>
<%@ Import NameSpace="System.Data.SqlClient" %>
<script laguage="VB" runat="server">
sub page_load(sender as Object ......