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

vbÖÐλ²Ù×÷ £¨ÔÚÏߵȣ¬ÂúÒâ¼´½áÌù£© - VB / »ù´¡Àà

Ò»¸öÕûÐαäÁ¿ a
ÎÒÏÖÔÚÏëÈ¡ a µÄµÚ¶þ×Ö½Ú ¼ÓÉÏ £¨µÚÒ»×ֽڵĺóËÄ룩 µÄ¼ÆËã½á¹û£¬ÄÄλÄܰïæ£¿
Dim val As Long
  val = &HFFFFFFFF
  val = val And &HFF0F&

  Debug.Print Hex(val)

&HFF0F&
ÊÇʲôÒâ˼£¿


&HFFFFFFFF £¿


val = &HFFFFFFFF»»³ÉÄã×Ô¼ºµÄÖµ

¾ÍÊÇÎÒת»»Ç°µÄ Integer ±äÁ¿£¿


ÄÇ &HFF0F& ÄØ£¬Ê²Ã´Òâ˼£¿ Äã¸øµÄÕâ¸öËã·¨Äܸø½âÊÍÏÂÂð


ÄãÏÈ˵һ¸ö¾ßÌåµÄÀý×Ó£¬integerÊǶàÉÙ£¬¼ÆËãºóÓÖÊǶàÉÙ£¿

ºÃµÄ¡£ÔÚcÀÊÇÕâÑù×öµÄ£¬È¡integerÐͱäÁ¿µÄµÚ¶þ×Ö½Ú£¬µÚ¶þ×Ö½Ú ¼ÓÉÏ £¨µÚÒ»×Ö½Ú and 0F£©
a=19984
ת»»ºó£¬µÃµ½Ê®½øÖƵÄ78

VB code:
Option Explicit

Sub Main()
Dim a As Long
Dim b As Long
a = 19984
b = ((a And &HFF00&) \ &H100&) + (a And &HF&)
Debug.Print b
End Sub


µÚÒ»×ֽڵĵÍËÄλÓëµÚ¶þ×Ö½Ú8λ


Ê×ÏÈ×¢Òâ,VBÖеÄintegerÏ൱ÓÚcÖеÄsigned short,longÏ൱ÓÚsigned int£¬
  Dim a As Integer
  Dim b As Integer
  Dim c As Integer
   
   
  a = 19984
  b = a / 256//Ï൱ÓÚÓÒÒÆ8λ,µÃµ½µÚ¶þ¸ö×Ö½Ú
  c = a And &HF //±£ÁôµÚÒ»×ֽڵĺó4λ
  a = b + c

лл£¬ÎÒµ÷ÊÔÏ¿´¿´

¸ã¶¨ÁË£¬Ð»ÁË


Ïà¹ØÎÊ´ð£º

vb ÖÐ - VB / »ù´¡Àà

ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......

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

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

vb WebBrowser СÎÊÌ⣬Çë½Ì - VB / »ù´¡Àà

vb WebBrowser СÎÊÌ⣬Çë½Ì£º
WebBrowserÀïµÄÍøÖ·Ìø×ªºó£¬ÔõôȡµÃÌø×ªºóµÄÒ³ÃæµÄURLµØÖ·

¶¥Ï¶¥ÏÂ

ÒýÓÃ
BeforeNavigate2
ºÃÏñûÓÐÕâ¸ö°É vb6.0

BeforeNavigate2
Õâ¸ö¿ÉÒÔÓУ¬ºÇºÇ¡£
......

ÇóÖú£ºC´úÂëchange toVB´úÂë - VB / »ù´¡Àà

ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó­¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ