ÓÃVB²Ù×÷Excel(VB6.0)(ÕûÀí) ÏÂÔØ±¾ÎÄ

ÄÚÈÝ·¢²¼¸üÐÂʱ¼ä : 2025/7/9 2:16:59ÐÇÆÚÒ» ÏÂÃæÊÇÎÄÕµÄÈ«²¿ÄÚÈÝÇëÈÏÕæÔĶÁ¡£

ÓÃVB²Ù×÷Excel(VB6.0)(ÕûÀí)

È«Ãæ¿ØÖÆExcel:

Ê×ÏÈ´´½¨Excel¶ÔÏó£¬Ê¹ÓÃComObj: Dim ExcelID as Excel.Application Set ExcelID as new Excel.Application ?

1)ÏÔʾµ±Ç°´°¿Ú£º ? ExcelID.Visible:=True; 2)¸ü¸ÄExcel±êÌâÀ¸£º

? ExcelID.Caption:='Ó¦ÓóÌÐòµ÷ÓÃMicrosoftExcel'; 3)Ìí¼Óй¤×÷²¾£º

4)´ò¿ªÒÑ´æÔڵŤ×÷²¾£º

5)ÉèÖõÚ2¸ö¹¤×÷±íΪ»î¶¯¹¤×÷±í£º

? ExcelID.WorkSheets[2].Activate; »òExcelID.WorkSheets['Sheet2'].Activate; 6)¸øµ¥Ôª¸ñ¸³Öµ£º

? ExcelID.Cells[1,4].Value:='µÚÒ»ÐеÚËÄÁÐ';

7)ÉèÖÃÖ¸¶¨ÁеĿí¶È£¨µ¥Î»£º×Ö·û¸öÊý£©£¬ÒÔµÚÒ»ÁÐΪÀý£º

8)ÉèÖÃÖ¸¶¨Ðеĸ߶ȣ¨µ¥Î»£º°õ£©£¨1°õ£½0.035ÀåÃ×£©£¬ÒÔµÚ¶þÐÐΪÀý£º

9)ÔÚµÚ8ÐÐ֮ǰ²åÈë·ÖÒ³·û£º

? ExcelID.WorkSheets[1].Rows[8].PageBreak:=1; 10)ÔÚµÚ8ÁÐ֮ǰɾ³ý·ÖÒ³·û£º

11)Ö¸¶¨±ß¿òÏß¿í¶È£º

? 1-×ó 2-ÓÒ 3-¶¥4-µ× 5-б(\\) 6-б(/)

12)Çå³ýµÚÒ»ÐеÚËÄÁе¥Ôª¸ñ¹«Ê½£º

13)ÉèÖõÚÒ»ÐÐ×ÖÌåÊôÐÔ£º

14)½øÐÐÒ³ÃæÉèÖ㺠a.ҳü£º b.Ò³½Å£º

c.ҳüµ½¶¥¶Ë±ß¾à2cm£º

d.Ò³½Åµ½µ×¶Ë±ß¾à3cm£º