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

Çë½ÌһЩ¹ØÓÚVBÎļþ²Ù×÷µÄÎÊÌâ - VB / »ù´¡Àà

ÎÒÏëÇë½Ì¸÷λ¸ßÊÖһЩÎÊÌ⣬¼ÙÉèÎÒÏëµ÷Óôò¿ª´°¿ÚÑ¡Ôñ×Ô¼ºÒªµÄÎļþ£¬È»ºó¸´ÖÆÄ³¸öÎļþµ½C:\aaaÎļþĿ¼Ï£¬²¢ÇÒ¸ÄÃû¸ÃÔõÃ´Ð´ÄØ£¿×ÊÔ´ÀïÕÒÁ˺ö࣬µ«ÊǺÃÏñûÓÐÕÒµ½ÀàËÆµÄ
°ï¶¥£¡

ÒýÓÃ
°ï¶¥£¡

лл~~

ʹÓÃCommonDialog¿Ø¼þʵÏÖÑ¡ÔñÎļþµÄ¶Ô»°¿ò¡£
CommonDialog1.ShowOpen
FileCopy CommonDialog1.FileNmae, "c:\" & CommonDialog1.FileTitle

¿ÉÒÔʹÓÃÎļþϵͳ¶ÔÏó£ºFSO File System Object

FSO ¶ÔÏóÄ£Ðͱà³Ì


 FSO ¶ÔÏóÄ£Ðͱà³Ì°üÀ¨ÈýÏîÖ÷ÒªÈÎÎñ£º 

ʹÓÃCreateObject ·½·¨£¬»ò½«Ò»¸ö±äÁ¿ÉùÃ÷Ϊ FileSystemObject ¶ÔÏóÀàÐÍÀ´´´½¨Ò»¸ö FileSystemObject ¶ÔÏó¡£


¶Ôд´½¨µÄ¶ÔÏóʹÓÃÊʵ±µÄ·½·¨¡£


·ÃÎʸöÔÏóµÄÊôÐÔ¡£ 
FSO ¶ÔÏóÄ£ÐͰüº¬ÔÚÒ»¸ö³ÆÎª Scripting µÄÀàÐÍ¿âÖУ¬´ËÀàÐÍ¿âλÓÚ Scrrun.Dll ÎļþÖС£Èç¹û»¹Ã»ÓÐÒýÓôËÎļþ£¬Çë´Ó¡°ÊôÐÔ¡±²Ëµ¥µÄ¡°ÒýÓá±¶Ô»°¿òÑ¡Ôñ¡°Microsoft Scripting Runtime¡±ÏȻºó¾Í¿ÉÒÔʹÓá°¶ÔÏóä¯ÀÀÆ÷¡±À´²é¿´Æä¶ÔÏó¡¢¼¯ºÏ¡¢ÊôÐÔ¡¢·½·¨¡¢Ê¼þÒÔ¼°ËüµÄ³£Êý¡£

´´½¨ FileSystemObject ¶ÔÏó
µÚÒ»²½ÊÇ´´½¨Ò»¸ö FileSystemObject ¶ÔÏóÒÔ±ã½øÐд¦Àí¡£¿ÉÒÔͨ¹ýÈçÏÂÁ½ÖÖ·½·¨Íê³É£º 

½«Ò»¸ö±äÁ¿ÉùÃ÷Ϊ FileSystemObject ¶ÔÏóÀàÐÍ£º 
Dim fso As New FileSystemObject

ʹÓà CreateObject ·½·¨À´´´½¨Ò»¸ö FileSystemObject ¶ÔÏ󣺠
Set fso = CreateObject("Scripting.FileSystemObject")

ÔÚÉÏÃæµÄÓï·¨ÖУ¬ Scripting ÊÇÀàÐÍ¿âµÄÃû³Æ£¬¶ø FileSystemObject ÔòÊÇÏëÒª´´½¨Ò»¸öʵÀýµÄ¶ÔÏ


Ïà¹ØÎÊ´ð£º

vb - VB / »ù´¡Àà

xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£

hÊÇxml¸ñʽµÄ×Ö·û´®

ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......

vb²Ù×÷excel - VB / »ù´¡Àà

ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
  A 3
  A 4
  B 6
  ... ......

VB µ÷ÓÃInet¿Ø¼þÏÂÔØ³ö´í - VB / ÍøÂç±à³Ì

¸÷λ¸ßÊÖ£¬Ð¡µÜ×î½üÅöµ½Ò»¸öÎÊÌ⣺ԭÏÈдµÄ³ÌÐò´ó¸ÅµÄ˼·ÊÇ£ºÊ×ÏÈwebbrowser´ò¿ªÍøÖ·£¬ÍøÖ·ÏÔʾºó£¬µã»÷ÍøÖ·ÉϵÄijһ¸öÁ¬½Ó£¬µ±webbrowser¼ì²âµ½ÍøÖ·ÒѾ­Á¬½Óµ½ÏëÒªµÄµØÖ·Ê±ºò¾Í¿ªÊ¼ÏÂÔØÎļþ£¬µ±ÓÃIE6µÄʱºòÏÂÔ ......

ÇóÖú£º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ºÅ