½éÉÜÒ»¿îÊʺÏVB¶þ´Î¿ª·¢µÄÉãÏñÍ· - VB / »ù´¡Àà
ÎÒÏë²É¼¯ÅÄÉãµÄÕÕÆ¬£¬²¢Ç¶Èëµ½ÎҵijÌÐòÖÐÈ¥¡£ ÓÐûÓÐÕâÑùµÄ»úÆ÷£¬½éÉÜһϣ¬Ð»Ð»£¡
ËùÓеÄÉãÏñÍ·¶¼¿ÉÒÔ¡£ÒýÓà ÎÒÏë²É¼¯ÅÄÉãµÄÕÕÆ¬£¬²¢Ç¶Èëµ½ÎҵijÌÐòÖÐÈ¥¡£ ÓÐûÓÐÕâÑùµÄ»úÆ÷£¬½éÉÜһϣ¬Ð»Ð»£¡ ¿ÉÒÔ¶þ´Î¿ª·¢£¿ÎÒÏëÔÚÎҵijÌÐòÖе÷Óã¬ÄÜ×öµÄ£¿ {{--
Ïà¹ØÎÊ´ð£º
ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£© ¾¹È»²»ÊÇzero¡£ ²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»° Õâ¸öÖ»ÄܶÁÎı¾, VB code: Private Sub Command1_Click() Dim WordApp As Object Set WordApp = CreateObject(& ......
Private Sub Command1_Click() Dim MyString() As String Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£ ReDim MyString(LOF(1) - 1) Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......
vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»» Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ <?mso-application progid="Excel.Sheet"?> <Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet" xmlns:o=& ......
ËÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~ #include "stdlib.h" #include "math.h" #include "stdio.h" float objfx(float x[]); void constraint(float x[],float g ......