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

vbµ÷ÓÃvc±àдµÄDLL£¬ÎÊÌ⣡

ÎÒÏëʵÏÖÕâÑùÒ»¸öЧ¹û£º
ÎÒÓÃVC±àдÁ˸öDLL £¬VB µ÷ÓÃÀïÃæµÄÒ»¸öº¯Êý£¬·µ»Ø¸øVBÒ»¸ö×Ö·û´®£¬
ĿǰҪ²»¾ÍÊÇÂÒÂ룬Ҫ²»¾ÍÊDZÀÀ££¡ÎÒ²éÁËÍøÉϺܶà×ÊÁÏ£¬¶¼Ã»Óгɹ¦ £¡
Çë´óϺÃÇ99999ÎÒ°¡ £¡
Àý×ÓÈçÏ£º
VC£º
SQLCE3_DRIVER_API BSTR TestString(LPCTSTR InStr)
{

CString Buf;  
  Buf = "²âÊÔÓÃÀý";  
  return Buf.AllocSysString();  
   
}
VB:
Private Declare Function TestString Lib "Sqlce3_Driver.dll" Alias "?TestString@@YAPA_WPB_W@Z" (ByVal strS As String) As String
  Dim a As String
  a = TestString("Õâ¸ö²ÎÊýûÓÐÒâÒå")

ÊäÈëÒ»¸öÒѾ­³õʼ»¯ºÃµÄ×Ö·û´®»º³åÇøµØÖ·,¼°Æä³¤¶È.

È»ºóDLLÀïÏòÄǸö»º³åÇøÐ´ÈëÄÚÈÝ,²¢·µ»ØÊµ¼ÊдÈëµÄ³¤¶È.

²Î¿¼GetComputerNameµÄÓ÷¨.

Äܲ»ÄܰïÎÒд¸öÀý×ÓÄØ £¬ÎÒºÜÉÙÓÃVB¡£Ð»Ð»ÁË ~

SQLCE3_DRIVER_API ÊÇʲô?VCÎÒ²»Êì.

µ«Ò»°ãÊÇÉùÃ÷ΪWINAPI,VBÖ»Ö§³ÖstdCall.

°ÑÀý×ÓÀïµÄBufÄÚÈݸ´ÖƵ½ÊäÈëµÄInStrÖ¸ÕëÀï.

ÔÙ¼Ó¸ö²ÎÊý,´óÔ¼ÈçÏÂ:

C/C++ code:
WINAPI INT TestString(LPCTSTR InStr,int StrLength)
{

CString Buf;
Buf = "²âÊÔÓÃÀý";
memcpy instr,&buf,sizeof(buf); 'ÕâÀïÒª¸´ÖÆ,Óï·¨²»ÖªµÀ¶Ô²»¶Ô
return sizeof(buf);
}

VB˕̾:


Ïà¹ØÎÊ´ð£º

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

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

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

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

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

¿ÉÒÔ!


  ¾À½á£¬

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

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

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

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / »ù´¡Àà

Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ

ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......

vb¶ÁÈ¡xml - VB / »ù´¡Àà

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ