[Çë½Ì]vbÖÐÊÇ·ñÓиºÊýµÄÊ®Áù½øÖÆ»¥×ªº¯Êý£¿
Çë½Ì¸ßÊÖ£º
HEX$(-600)µÃµ½µÄ½á¹ûÊÇFDA8
µ«ÊÇClng(FDA8)¾ÍÎÞ·¨µÃµ½-600ÁË
ÇëÎÊÕýÈ·µÄ½«¸ºÊýµÄÊ®Áù½øÖÆ×Ö·û´®×ª»»³ÉÊ®½øÖƵķ½·¨£¿£¿
лл~~
ÓÃcint·´×ª
clngµÃµ½ÕýÊýÊÇÒòΪlongÀàÐͱäÁ¿ÊÇËÄ×Ö½Ú³¤£¬Æä>0µÄÖµ·¶Î§Ô¶´óÓÚfda8£»intÐÍÊÇË«×Ö½Ú£¬ÕýºÃ·ûºÏlz˵µÄÊý×Ö·¶Î§¡£
Çë½ÌÔõô´¦Àí£¿
ÎÒÏÖÔÚÖ»ÖªµÀÊ®Áù½øÖƵÄ×Ö·û´®£¬ÈçºÎ·´×ª³É-600?
thanks~~
VB code:
clng(val("&H" & hex(-600)))
VB code:
Dim sj As String
sj = Hex(-600)
Text1 = sj
Text2 = Val("&H" & sj)
³¤ÕûÊý:
VB code:
Private Sub Command1_Click()
Dim sj As String
sj = Hex(-600)
Text1 = sj
Text2 = Val("&H" & sj & "&")
End Sub
VB code:
hex(clng(-600))
vb °Ñ -32768 µ½ +32767 ĬÈÏΪInteger ,6Â¥ д·¨±ê×¼
clng ¿ÉÒÔÖ±½Ó½ÓÊÜ×Ö·û±í´ïʽ
clng£¨"&H" & "FDA8"£©
dim a as Integer,b as long
Ïà¹ØÎÊ´ð£º
¿ÉÒÔÂð
ºÃÆæ¹ÖµÄÌâÄ¿¶î£¡£¡
¿ÉÒÔ¸æËßÎÒÃÇÄãµ½µ×ÏëÎÊʲô £¿
2·Ö¸øÎҵϰ¾Í¿ÉÒÔ¡£
........................¿ÉÒÔÂð
¿ÉÒÔ!
¾À½á£¬
29. vb¿ÉÒÔÕâÑù×ö²»£¿ ( H )¡Ì
A. ......
DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.
datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
ÎÒÏë°ÑwordÁí´æÎªxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ
ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
A 3
A 4
B 6
... ......