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

VB ´óµÄÊ®Áù½øÖÆÊýתʮ½øÖÆ Ôõôת

VB ´óµÄÊ®Áù½øÖÆÊýתʮ½øÖÆ Ôõôת
±ÈÈç:&H82A1063F

ÏÖÔÚVBת»»³öÀ´µÄ,¶¼ÊÇ,-2103376321

ÄüÆËãÆ÷ת»»³öÀ´µÄÊÇ,2191590975
¿¼ÂÇÒ»ÏÂÓÃCurrencyÊý¾ÝÀàÐÍ£¿

ºÃÏóûÕâô´óµÄÊý,·Ö³ÉÁ½¶Îת°É 
&H82A1
&H063F

¼ÆËãÆ÷ת³öÀ´µÄÊÇÎÞ·ûºÅÕûÊý£¬VBת³öÀ´µÄÊéÓзûºÅµÄ


ÓзûºÅ 0......2,147,483,647 ,-2,147,483,648 ......-1
ÎÞ·ûºÅ 0 .....2,147,483,647 £¬2,147,483,648........4294967295(2^32-1£©
±ÈÈç FFFFFFFF ¼ÆËãÆ÷ת³öÀ´ÊÇ 4294967295 VBת³öÀ´ÊÇ -1

VBÖÐ ÓÃdouble ´úÌæ Long ¿ÉÒÔʵÏֺͼÆËãÆ÷ת³öÀ´µÄЧ¹ûÒ»Ñù¡£

S$ = "FFFFFFFF"
if clng("&H" & S )< 0 then  
  x# = 2^32 + clng("&H" & S )
else
  x# = clng("&H" & S )
end if

¸öÈËÈÏΪ£¬ÊÇÊý¾ÝÀàÐͶ¨ÒåµÄ²»¶Ô£¬Êµ¼ÊÊýÖµÒѾ­³¬¹ý¹æ¶¨·¶Î§ÁË¡£ÎÒ¾õµÃ¿ÉÒÔ¶¨Òådouble»òcurrency

http://blog.csdn.net/chinaboyzyq/archive/2010/04/09/5466433.aspx

ÕâÀïÓд𰸣º
http://topic.csdn.net/u/20100309/04/ac6d370d-91be-4ea3-b66c-04de0413a9dc.html
¹ØÓÚC#µÄ´úÂëתΪVBµÄ´úÂëÓÐһʲ»Ã÷

ÒýÓÃ
http://blog.csdn.net/chinaboyzyq/archive/2010/04/09/5466433.aspx


ÕâÀïÓнá¹û£¡

VBÖÐLongÊý¾ÝÀàÐÍÊÇ´ø·ûºÅµÄ£¬ËùÒÔ×î´óÖ»Äܱíʾ-2^31ÖÁ2^31-1,³¬³öÕâ¸ö·¶Î§£¬¾ÍÖ»ÄÜÓø¡µãÊýÁË


ʵ¼ÊÉÏÊÇÓзûºÅÊýºÍÎÞ·ûºÅÊýµÄ²î±ð¡£

VB ²»×Ô¶¯Ö§³ÖÎÞ·ûºÅÊý¡£ÐèÒªÓôúÂëÀ´´¦Àí¡£


Ïà¹ØÎÊ´ð£º

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
  ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
  ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb¶ÁÈ¡ÓÃwordת»»³ÉµÄxmlÀïµÄÊý¾Ý - VB / »ù´¡Àà

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

vbÉú³ÉEXE - VB / »ù´¡Àà

form1ÖÐÓÐtext1-8£¬ ºÍcommand1 
text8ÖÐΪ³ÌÐò´úÂ루Éú³É´°ÌåΪform2£¨ÒÑ×öºÃ£©£©
µ¥»÷command1ºó½«text2ÖеĴúÂëÉú³ÉEXEµ½d:\ ²¢ÇÒtext1-7·Ö±ð¶ÔÓ¦
²úÆ·Ãû ¹«Ë¾Ãû ºÏ·¨°æÈ¨ ºÏ·¨É̱ê ÎļþÃèÊö ×¢ÊÍ ±êÌâ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ