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

1¾äVB´úÂëתVC

Çë½Ì¸ßÊÖ£¬Õâ¾äVB´úÂëת³ÉVCµÄ¸ÃÔõÑùд°¡? °Ýл£¡£¡£¡
VB code:

lPtr = InStrB(1, buff, StrConv("someString", vbfromUnicode)) - 1



char *ptr = strstr( buff, "someString );

Äã·µ»ØµÄÊÇÆ«ÒÆ£¬ÕâÀï·µ»ØµÄÊÇÖ¸Õ룬Á½¸öÖ¸ÕëÏà¼õ¾ÍÊÇÆ«ÒÆ¡£


ÒýÓÃ
char *ptr = strstr( buff, "someString );

Äã·µ»ØµÄÊÇÆ«ÒÆ£¬ÕâÀï·µ»ØµÄÊÇÖ¸Õ룬Á½¸öÖ¸ÕëÏà¼õ¾ÍÊÇÆ«ÒÆ¡£



лл£¡
ÎÒÒ²ÊÇÕâÑùתµÄ£¬µ«ÊÇÓÐÎÊÌ⣡

vbfromUnicode: Converts the given string from Unicode to the system's default code page.

ÔõÑù°Ñ L"someString" ת³ÉϵͳµÄĬÈϱàÂëÄØ£¿

_T("someString")

#include <tchar.h>

LPTSTR lPtr = _tcsstr(_T("someString"));

»ò
LPWSTR lPtr = wcsstr(L"someString");

©µôÁËbuff£¬Ó¦¸ÃÊÇ
LPTSTR lPtr = _tcsstr(_T("someString"), buff);
»ò
LPWSTR lPtr = wcsstr(L"someString", buff);

ÔΣ¬Ð´·´ÁË£¬Á½¸ö²ÎÊý¶Ôµ÷Ò»ÏÂλÖá£
{{


Ïà¹ØÎÊ´ð£º

°ïÎҸĸÄÕâVBÌâ - VB / »ù´¡Àà

°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

vb¿ÉÒÔÕâÑù×ö²»£¿ - VB / ·Ç¼¼ÊõÀà

¿ÉÒÔÂð
ºÃÆæ¹ÖµÄÌâÄ¿¶î£¡£¡

¿ÉÒÔ¸æËßÎÒÃÇÄãµ½µ×ÏëÎÊʲô £¿

2·Ö¸øÎҵϰ¾Í¿ÉÒÔ¡£

........................¿ÉÒÔÂð

¿ÉÒÔ!


  ¾À½á£¬

29. vb¿ÉÒÔÕâÑù×ö²»£¿ ( H )¡Ì
 A. ......

ÓÐûÓÐFOR VB Ë®¾§±¨±íµÄÊé»òÊǵç×ÓÎĵµ°¡

ÓÐûÓÐFOR VB Ë®¾§±¨±íµÄÊé»òÊǵç×ÓÎĵµ°¡£¿ÓÐÐÅÏ¢µÄÅóÓѸæËßÏ ллÁË
ÎÒҲûÕÒµ½

Èç¹ûÄãÓÐ FOR ÆäËü µÄÎĵµ£¬Ò²¿ÉÒԲο¼°É£¡
¡®µÀÀí¡¯ÊÇÒ»Öµģ¬Ö»ÊÇ¡°±í´ï·½Ê½¡±²»Í¬¶øÒÑ¡£


mark

pls learn from ba ......

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

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

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ