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

vbÖÐ×Ö·û´®Ïà¼ÓµÄ¼ÆËãÎÊÌâ

MsgBox Asc("bcd"+"BCD")
ÖÐ"bcd"+"BCD"ÊÇÔõô¼ÆËãµÄ°¡
ΪʲôÊÇ 98
MsgBox Asc("b")
MsgBox Asc("B")

aµÄASCIIÂëµÈÓÚ97
bµÄASCIIÂëµÈÓÚ98

AµÄASCIIÂëµÈÓÚ65
BµÄASCIIÂëµÈÓÚ66

Private Sub Command1_Click()
    m$ = "BCD"
    n$ = "bcd"
    k$ = LCase$(m$)
    j$ = UCase$(n$)
    MsgBox Asc(k$ + j$)
End Sub
Ô­³ÌÐòÊÇÕâÑùµÄ

ΪʲôÊÇ 98°¡ »¹ÓÐcd CD ÄØ

ÒýÓÃ
ASC²ÎÊý˵Ã÷
String
±ØÐè¡£ÈκÎÓÐЧµÄ Char »ò String ±í´ïʽ¡£Èç¹û String ÊÇÒ»¸ö String ±í´ïʽ£¬ÔòÖ»½«×Ö·û´®µÄµÚÒ»¸ö×Ö·ûÓÃÓÚÊäÈë¡£Èç¹û String ÊÇ Nothing »ò²»°üº¬ÈκÎ×Ö·û£¬½«»á³öÏÖ ArgumentException ´íÎó¡£



ÈçÂ¥ÉÏ£ºAsc("bcd"+"BCD")=asc("b")

MsgBox Asc("bcd"+"BCD")
ÖÐ"bcd"+"BCD"ÊÇÔõô¼ÆËãµÄ°¡
ΪʲôÊÇ 98

¡ß "bcd" + "BCD" = "bcd" & "BCD" = "bcdBCD"

¡à Asc("bcd"+"BCD") = Asc("bcdBCD")

¡ß Asc("bcdBCD") = Asc("b")

¡à Asc("bcd"+"BCD") = 98


ÒýÓÃ
MsgBox Asc("bcd"+&


Ïà¹ØÎÊ´ð£º

¹ØÓÚASP.net(vb)²¥·Å¼à¿ØÂ¼ÏñµÄÎÊÌâ

ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£
ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ,
È»ºó¾ÍÖ±½ÓÓúÃÁË.
²»¹ý,Èç ......

vb´òÓ¡ÎÊÌâ

´ó¼ÒºÃ£¬Îʸövb´òÓ¡ÎÊÌâ


printer.print "dsff"
.....
....


Printer.EndDoc


´òÓ¡³É¹¦ºóÎÒ½«Ö´ÐÐ

sqlstr = "update vc_yh set pr=' ÒÑ´òÓ¡ ', ......

VB ×Ö·ûÎÊÌâ

  TF1.text = " <_2_ZCHGZBH> " & MSFlexGrid1.TextMatrix(k, 1) & " </_2_ZCHGZBH> "
   

´ó¼ÒºÃ£¬ÎÒÓÃÉÏÃæÒ»¸ö¶«Î÷¸³Öµ  TF1.text = & ......

VB ÔõôÄÜÌá¸ßÎı¾ÎļþµÄÑ­»·ËÙ¶È

ÌâÄ¿ÃèÊöÓ¦¸Ã²»ÊǺÜ׼ȷ¡£
ÏÖ×´ÊÇ£º¼ÙÈçÒ»¸öÎı¾Îļþ¹²100ÐУ¬ÄÇôÎÒÑ­»·´ÎÊý×î´ó¾ÍÊÇ100×100=10000Ï£¬»¨·Ñʱ¼ä·Ç³£¶à£¬ÇëÎÊÓÐûÓа취Äܹ»Ìá¸ß¶ÔÎı¾ÎļþµÄÑ­»··ÃÎÊËÙ¶È¡£·ÇÊý¾Ý¿â¼¼Êõ¡£
ÄãҪѭ»·×öʲô£ ......

vbµÄ³É¹¦Ö®Â· - À©³ä»°Ìâ / ¹²ÏíÈí¼þ£¨×ßÏòº£Í⣩

ÔÚvbÕâ±à³ÌÀïËÆºõÓкܶàµÄ¶«Î÷ÊÇÏàÁªÏµµÄ£¬ÎªÊ²Ã´ÓÐЩÈ˶ÔvbµÄ±à³ÌÃþ²»µ½Í·ÄÔ°¡£¡²¢ÇÒÓÐЩʺÜÈÝÒ׵쬵«ÊÇÈ´°ÑËüÃǵĴúÂë±ä³É¸´ÔÓ£¬Ò²È¥ÏëһЩ²»ÄÜʵÏֵĶ«Î÷°¡£¡




û·ÖÁË£¬Â¥Ö÷¶àÀ´µã·Ö£¡

À´½Óµã·Ö

......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ