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

Çó¾ÈVBºÍC#¶¼Í¨µÄ¸ßÊÖ£¡£¡£¡ÕâÐдúÂëûת³É¹¦£¡£¡

VB´úÂ룺
  Loop Until k = 3 Or UBound(datavalue) > 11

»úÆ÷ÈËת¹ýÀ´µÄC#´úÂ룺
while (!(k == 3 | Information.UBound(datavalue) > 11));

ÎÊÌâÊÇ£ºµ÷ÊÔµÄʱºò³öÏÖ¡°¡°UBound¡±·½·¨Ã»ÓвÉÓá°1¸ö²ÎÊýÖØÔØ¡±¡±.Êó±ê·ÅÔÚ¡°¡°UBound¡±ÉϳöÏÖµÄÌáʾÊÇ¡¶int.Information.UBound

(Array Array, int Rank)·µ»Ø¿ÉÓÃÓÚÊý×éµÄÖÆ¶¨Î¬Êý×î´óϱ꡷
ÇëÎÊUBoundµÄÁíÒ»¸ö²ÎÊýÊÇʲô£¿£¿Õâ¶Î´úÂë¸ÃC#Ôõôд..
Çë¸ßÊÖ°ïæ¸øµã˼· Íò·Ö¸Ð¼¤£¡£¡£¡
datavalueÊǸöÊý×飿

while(k!=3&&datavalue.Length <=11)
okÁË

ÓиöÎÊÌâÒª½â¾ö£¬c££ÀïÊý×é²»¿É±ä³¤£¬
Äã¿ÉÄÜÒª°ÑÊý×é»»³ÉList»òÕßArrayList

ÐèÒªÒýÓà Microsoft.VisualBasic.dll ²¢ÇÒÔÚ´úÂëÖÐ using Microsoft.VisualBasic£¬ÕâÑù¾ÍÕÒµ½ÁË Information Àà¡£

datavalue·ÅÈëArrayListʵÀýÖÐ

Èç¹ûµÚ¶þ¸ö²ÎÊý²»ÄÜȱʡ£¬¾ÍÊÖ¶¯ÌîÉϰɡ£

C# code:
public static int UBound(Array Array, [Optional, DefaultParameterValue(1)] int Rank)
{
if (Array == null)
{
throw ExceptionUtils.VbMakeException(new ArgumentNullException(Utils.GetResourceString("Argument_InvalidNullValue1", new string[] { "Array" })), 9);
}
if ((Rank < 1) || (Rank > Array.Rank))
{
throw new RankException(Utils.GetResourceString("Argument_InvalidRank1", new string[] { "Rank" }));


Ïà¹ØÎÊ´ð£º

ΪʲôCдDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷ÓÃ

ΪʲôCдµÄDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷Óã¿
VBÀïΪʲôÓеÄDLLÖ±½Óͨ¹ýÒýÓÿÉÒÔʹÓã¿ÓеÄÐèҪͨ¹ýdeclareÉêÃ÷Íⲿº¯Êý£¿ÕâЩDLLÓÐʲô²î±ð£¿

1¡¢ÎªÊ²Ã´PBÄÜͨ¹ýDECLAREÉùÃ÷¶øVB²»ÐУ¿
2¡¢Èç¹ûÕâ¸ödllÖÐµÄ ......

vbÈçºÎµ÷ÓÃIllustrator£¨´ËǰIllustratorδÆô¶¯£©£¿

Çë½ÌһϣºÎÒÓÃvbдÁËÒ»¸öµ÷ÓÃIllustratorµÄ²âÊÔ³ÌÐò£¬´úÂëºÜ¼òµ¥£ºPrivate Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......

VBÈçºÎ×èֹij³ÌÐòÔËÐС££¿

±ÈÈç½ø³Ì¼ÓÔØÐµijÌÐò¡£

ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£

È»ºóÔÊÐíºó·ÅÐС£


±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£

¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£

ÉèÖ ......

VBÖÐÔõôÑùÔÚ±í¸ñÖÐÐÞ¸Ä×ÖÌ壿 - VB / »ù´¡Àà

±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......

vb²éѯÊý¾Ý¿âÎÊÌâ

ÔõôÓÅ»¯²éѯµÄЧÂÊ£¬±ÈÈçÎÒÏë´Ó100ÍòÌõ¼Ç¼ÖÐÿ´ÎÖ»²éѯ100Ìõ¼Ç¼µÄ»°£¬ÄÇôÕâÌõsqlÓï¾ä¸ÃÔõôʵÏÖ£¬×¢Ò⣺ÓïÑÔÊÇVBScriptµÄ£¬
http://www.cnblogs.com/anjou/archive/2007/10/17/926944.html

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