lancio di Microsoft Visual Basic Express Edition , fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer , quindi fare clic su " Applicazione Windows Form ". Fare clic su "OK".
2 Fare doppio clic su "Pulsante " per aggiungere un nuovo pulsante . Fare doppio clic su " Button1 " per creare un evento click di questo pulsante. Fare clic sul menu "Progetto" , fai clic su " Aggiungi riferimento ", quindi fare clic sulla scheda "COM" . Fare doppio clic su " Copia e incolla il seguente codice per creare le variabili oggetto di Excel si utilizzeranno per creare una nuova cartella di lavoro di Excel : Dim objXLS Come Application = Nuovi applicativi Dim objXLXBks come cartelle di lavoro = niente Dim objXLSBk Come cartella di lavoro = niente Dim objXLSShts come fogli = Nothing Dim objXLSSht come manuale = Nothing Dim objXLSrng come gamma = Nothing Digitare il seguente codice per aggiungere una nuova cartella di lavoro : objXLS.Visible = false objXLS.DisplayAlerts = False objXLSBk = CType ( objXLS.Workbooks.Add ( ) , Workbook ) economici 5 aggiungere il seguente codice per aggiungere un nuovo foglio di lavoro : objXLXBks = objXLS.Workbooks objXLSSht = CType ( . objXLXBks ( 1) Sheets.Item ( 1 ) , fogli di lavoro ) per objXLSShts = objXLSBk.Worksheets Inserisci la data di "A1" in Excel aggiungendo la seguente riga di codice : objXLSSht.Cells ( 1 , 1 ) = Now ( ) economici 7 Salvare la cartella di lavoro di Excel , digitare il seguente codice : objXLSSht.SaveAs ( "C : \\ ExcelDate.xlsx " ) economici 8 Visualizza una finestra di messaggio in cui la cartella di lavoro è stato creato e salvato . MessageBox.Show (" Data è stata aggiunta in Excel" ) per Premere F5 per eseguire il programma , quindi fare clic su " Button1 . "
3
4
6
Informazioni correlate
software © www.354353.com