vbµÄ´°Ìå²¼¾ÖÎÊÌâ - .NET¼¼Êõ / VB.NET
µ±ÎÒ´°ÌåÊÇĬÈÏ´óСµÄʱºò£¬Ò³ÃæÉϵĿؼþ¶¼ÊÇÌî³äµÄÕû¸öÒ³Ãæ£¬µ«ÊÇÎÒ°ÑÒ³Ãæ×î´ó»¯Ö®ºó£¬ËùÓпؼþÈ«²¿Ïò×ó¿¿Â£ÁË£¬ËäȻû¼·ÔÚÒ»Æð£¬µ«ÊǺܲ»ÃÀ¹Û£¬ÔõÑù×öÄØ£¬×îºÃÊÇ×î´ó»¯Ò³ÃæµÄʱºò´°ÌåÄÚµÄËùÓпؼþ¶¼ÊÇÒ»ÆðÔÚÖмäÏÔʾ£¬ÄÇÑùºÃ¿´Ò»µã
anchorÊôÐÔ
FlowLayoutPanel¿Ø¼þ
ÉèÖÿؼþµÄAnchorÊôÐÔ
²»ÐÐÓ´£¬ÄǸöÊôÐÔÀïÃæÊÇÒ»¸öͼ£¬È»ºóÉèÖÃÍêºó£¬ÊôÐÔÖµÊÇÕâÑù× Top, Bottom, Left, Right
ºÇºÇ£¬ÎÒ¶®ÁË£¬°ÑÕâËĸöÊôÐÔ¶¼Ñ¡ÉϾÍÐÐÁË£¬ ллÀ²
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£
²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°
Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
form1ÖÐÓÐtext1-8£¬ ºÍcommand1
text8ÖÐΪ³ÌÐò´úÂ루Éú³É´°ÌåΪform2£¨ÒÑ×öºÃ£©£©
µ¥»÷command1ºó½«text2ÖеĴúÂëÉú³ÉEXEµ½d:\ ²¢ÇÒtext1-7·Ö±ð¶ÔÓ¦
²úÆ·Ãû ¹«Ë¾Ãû ºÏ·¨°æÈ¨ ºÏ·¨É̱ê ÎļþÃèÊö ×¢ÊÍ ±êÌâ
......
ÎÒÏëÓÃVB×öÒ»¸öOCX£¨´¿²ËÄñ£¬ÁÙʱÐèÒªÓÃVB×öµã¶«Î÷£¬ÌØÀ´Çë½Ì£©£¬AÓû§£¨IP£º192.168.0.1£©ÓëBÓû§£¨IP£º192.168.0.2£©½øÐеã¶ÔµãµÄ·¢ËͽÓÊÕÏûÏ¢
ÒªÇó²ÉÓÃOCX·½Ê½£¬±ÈÈçAÓû§ÖªµÀBÓû§IP£¬ÎÒÖ±½Ó´«²Î£¨BµÄIP£©ÖÁOCX ......
ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£
ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......