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

VBÈçºÎÖÆ×÷Îļþ²¹¶¡£¿ - VB / API

ÎÒÓÃOllydbgµÃµ½Ò»¸öÎļþ123µÄHEXÊý¾Ý£º8B,ÆäµØַΪ£º005C4123
ÎÒÏëÓÃVBÖÆ×÷Ò»¸öС¹¤¾ß£¬½«Õâ¸öÎļþ123µÄ005C4123´¦µÄ¸ÄΪFF£¬²¢
±£´æ£¬¾ÍÏ൱ÓÚÊÇÖÆ×÷Õâ¸öÎļþ123µÄÒ»¸ö²¹¶¡³ÌÐò¡£²»ÖªµÀÕâÑù¿ÉÐÐÂð£¿

ͬ2L£¬¶þ½øÖÆд¾ÍÐÐÁË¡£¡£

¾Ü¾øȨÏÞ¡£¡£¡£¡£¡£

Ð޸IJ»³É¹¦

Ê×ÏÈÈ·¶¨¸Ã´¦ÄÚ´æÊÇ·ñ¿Éд¡£Èç¹ûÊdzÌÐò´úÂ벿·Ö£¬ÊDz»¿ÉÒÔÐ޸ĵġ£Èç¹ûÊÇÁÙʱ¿Õ¼ä£¬Ôò¿ÉÒÔÐ޸ġ£

ÔÚ´úÂ벿·Ö£¬ÐèÒªÏÈÈóÌÐòÖжϣ¬È»ºó»ñµÃ³ÌÐò¿ØÖÆȨ£¬ÐÞ¸ÄÄÚ´æºóÔÙÈóÌÐò¼ÌÐøÅÜ¡£Õâ¸öÓÃvb×÷ºÜÂé·³£¬½¨ÒéÖ±½ÓÓÃ×¢²á»úÐ޸ģ¬»ò»»ÆäËüÓïÑÔ¡£


Dim Bytes(3) As Byte


1)ÉèÖÃÎļþ/Ŀ¼µÄȨÏÞ
2)Ïà¹Ø³ÌÐòÏȲ»ÒªÔËÐÐ

ÕâÑùµÄͨÓõŤ¾ßÓкܶ࣬±ÈÈç Xdelta

ÕâÄÄÊDz¹¶¡£¬ÕâÖÖÐ޸ģţأÅÎļþÄÚÈݵÄÐÐΪ·ÖÃ÷ÊÇ×¢²á»ò¶ñÒâ³ÌÐòµÄÌØÕ÷¡£ÆÕͨµÄ²¹¶¡³ÌÐò¶¼ÊÇÖ±½ÓÌṩһ¸öÍêÕûÎļþÈ¥¸²¸Ç֮ǰµÄÎļþ¡£

ѧϰ£¡~~~

2Â¥ºÍ6Â¥µÄÁ½Î»¸ßÊֵķ½·¨¶¼ÊÔ¹ýÁË£¬ÔËÐÐÖ®ºóÓÃOllydbg²é¿´Õâ¸öµØÖ·Êý¾ÝûÓб仯¡£¡£

˵Ã÷³ÌÐòÖØдÁ˸ÃÎļþ¡£

ÒýÓÃ
˵Ã÷³ÌÐòÖØдÁ˸ÃÎļþ¡£

Õâ²»ÕæµØÔÚÌÖÂÛÆƽâÁËÂð¡£
Â¥Ö÷°ÑÉÏÃæµÄ°ì·¨¶ÔÆäËüÎļþÊÔÑéһϣ¬¿´¶¼ÓÐûÓÐЧ¡£ÎÞЧÊÇÉÏÃæ³ÌÐòµÄÊ£¬ÓÐЧÊÇÄãÒª´¦ÀíµÄÈí¼þµÄÊ£¨ÄǾ͵ÃÑо¿ÄÚ´æÆƽâ»òÕßÊǸú×ٵó¤Ô¶µã£¬°ÑÖØдµÄ²¿·ÖÆÁ±Îµô£©¡£

ÒýÓÃ
˵Ã÷³ÌÐòÖØдÁ˸ÃÎļþ¡£

Õâ²»ÕæµØÔÚÌÖÂÛÆƽâÁËÂð¡£
Â¥Ö÷°ÑÉÏÃæµÄ°ì·¨¶ÔÆäËüÎļþÊÔÑéһϣ¬¿´¶¼ÓÐûÓÐЧ¡£ÎÞЧÊÇÉÏÃæ³ÌÐòµÄÊ£¬ÓÐЧÊÇÄãÒª´¦ÀíµÄÈí¼þµÄÊ£¨ÄǾ͵ÃÑо¿ÄÚ´æÆƽâ»òÕßÊǸú×ٵó¤Ô¶µã£¬°ÑÖØдµÄ²¿·ÖÆÁ±Îµô£©¡£



Ïà¹ØÎÊ´ð£º

vb - VB / »ù´¡Àà

ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£

²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°

Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......

vb - VB / »ù´¡Àà

ÎÒÏë°Ñ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
......

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 / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

VBµ÷ÓÃEXCEL»æͼ£¬ÈçºÎÐÞ¸ÄXÖá×ø±ê - VB / »ù´¡Àà

СµÜÓÃVBµ÷EXCEL×÷ͼ
objExlApp.Workbooks.Add
  objExlApp.Charts.Add
  objExlApp.ActiveChart.ChartType = xlLine
  objExlApp.ActiveChart.HasLegend = True
  objExlApp. ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ