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

VBÖнçÃæÊý¾Ý¼´Ê±¸üÐÂÎÊÌâ

ÒÀ´Î´ò¿ª2¸ö´°Ì壬ÔÚµÚ2¸ö´°ÌåÖвÙ×÷ÐÞ¸ÄÒ»Ìõ¼Ç¼£¬µ±Í˳öµÚ2¸ö´°Ìåʱ£¬µÚÒ»¸ö´°ÌåÓëÖ®¶ÔÓ¦µÄÊý¾ÝËæÖ®±ä»¯¡£
·½·¨1£º´°Ìå2Í˳öʱ½«Êý¾Ý±£´æµ½Êý¾Ý¿âÖУ¬´°Ìå1ÖØÐ´ÓÊý¾Ý¿âÖжÁÈ¡Êý¾Ý
·½·¨2£º´°Ìå2Í˳öʱ½«Êý¾Ý¿âдµ½´°Ìå1¶ÔÓ¦µÄ¿Ø¼þÖÐ


Á½¸öÁ¬µ½Ò»¸ö¿â£¬ÔÚµÚ¶þ¸ö´°Ì幨±Õʱ£¬Ë¢ÐµÚÒ»¸ö´°Ìå¾ÍºÃÁË¡£ÎÒÊÇÕâôÏëµÄ£¬Ã»ÊÔÑ飬¥Ö÷¿ÉÒÔ×Ô¼ºÊÔÑéһϡ£¿ÉÒÔÓÃdatagrid ÎÒ¾öµÄÕâ¸ö¿Ø¼þÓõ½Äã˵µÄÎÊÌâÉÏÓ¦¸ÃûÓÐÎÊÌâµÄ¡£ÄãÔÙÊÔÊÔ£¡

Leftie·½·¨2£º²»·ûºÏÒªÇó£¡

´°Ìå2Í˳öºó£¬´°Ìå1ÒªÖØÐ´ò¿ªÊý¾Ý±í£¨¼´ÖØÐ²éѯ£©¡£


¾ÍÊÇÊý¾Ý½»»»Âï!
1.Êý¾Ý¿É·ÅÔÚÄãÏëµ½µÄÈκεط½:Êý¾Ý¿â,±¾µØÎļþ,¹«¹²±äÁ¿,´°ÌåµÄij¸öÊôÐԵȵÈ;
2.Ñ¡Ôñ´¥·¢»úÖÆ:2´°Ì幨±Õʱ,1´°Ìå³ÉΪµ±Ç°´°Ìåʱ,Óû§ÊÖ¹¤Ë¢ÐÂʱ,¼ÆÊ±Æ÷µÈµÈ;


µ±2¹Ø±Õʱ£¬Çå³ý-ÖØÐ¼ÓÔØÊý¾Ý

¹Ø¼üÊÇ2 .SHOW 1 
Éè³ÉģʽÏÔʾ ÔÚ.SHOW 1ºóÃæ µÄÓï¾äÖÐÔÙË¢ÐÂÊý¾Ý

ÔÚ´°Ìå2Öж¨ÒåÒ»¸öʼþ
public event ʼþÃû()

ÔÚ´°Ìå2µÄunloadʼþÀïÅ׳ö´Ëʼþ
raiseevents ʼþÃû




ÔÚ´°Ìå1Öж¨Òå
private withevent oForm2 as Form2

ÏÔʾ´°Ìå2µÄ´úÂë
set oForm2=new form2
oform2.show vbmodal,me
set oform2 =nothing

ÔÚ´°Ìå1µÄ
oForm2_ʼþÃû
µÄ¹ý³ÌÀï,дˢдúÂë


Ïà¹ØÎÊ´ð£º

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


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

vb - VB / »ù´¡Àà

ÎÒÏë°ÑwordÁí´æÎªxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......

Çë½Ì!ÓõÄÊÇVB 6.0 - VB / ¿Ø¼þ

°ÑÒÑÓÐÊý¾Ý£¨Êý¾Ý´óÓÚ20ÐУ©µÄRS(recordset)µÄµÚ10ÐÐÊý¾ÝÓëµÚ11ÐÐÊý¾Ý×ö¼Ó·¨ºó£¬É¾³ýµÚ11ÐеÄÊý¾Ý£¬È»ºó°ÑºóÃæµÄÊý¾ÝÏòÇ°ÒÆ¡£
RSµÄ»°ÐÞ¸ÄÊý¾ÝÊÇ»á¸üÐÂÊý¾Ý¿â£¬ÏÖÔÚµÄÎÊÌâÊÇRSÀïµÄÒÑÓÐÊý¾ÝÊÇÓÃSQLÓï¾ä·ÖÀàͳ¼Æ³öÀ´µÄ ......

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

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

vb - VB / »ù´¡Àà

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

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

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

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ