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(& ......
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......