November 10
E 'utile sapere come utilizzare il sistema di appunti per copiare le informazioni da un'applicazione all'altra utilizzando Microsoft Visual Basic.NET (VB.NET). La clipboard è un ambiente che viene condiviso tra i programmi in Windows, rendendo più facile la condivisione delle informazioni. I programmatori spesso la necessità di esportare le informazioni da un'applicazione VB.NET di un foglio di lavoro di Microsoft Excel. Tuttavia, è possibile scrivere codice VB.NET per copiare i dati negli appunti di sistema e incollarlo in un foglio di lavoro di Excel.
1 Digitare il seguente codice in un nuovo sottoprogramma nel progetto VB.NET per dichiarare le variabili di Excel:
Dim xlApp Come Microsoft.Office.Interop.Excel.Application = Nothing
XLBooks fiochi come Microsoft.Office.Interop.Excel.Workbooks = Nothing
Dim XLBook Come Microsoft.Office.Interop.Excel.Workbook = Nothing
XLSheets fiochi come Microsoft.Office.Interop.Excel.Sheets = Nothing
Dim xlSheet Come Microsoft.Office.Interop.Excel.Worksheet = Nothing
2 Digitare quanto segue per aggiungere una stringa di testo negli appunti e ottenere il testo dagli appunti:
Dim processObject Come nuovo processo
Clipboard.SetDataObject ( "Questo viene copiata negli appunti e ha aggiunto a Excel.")
Dim clipboardObject Come IDataObject = Clipboard.GetDataObject ()
3 Digitare la seguente per aprire Excel e aggiungere un nuovo foglio di lavoro:
XlApp = Nuovo Microsoft.Office.Interop.Excel.Application
XLApp.Visible = True
XLApp.DisplayAlerts = False
XLBook = CType (XLApp.Workbooks.Add (), Microsoft.Office.Interop.Excel.Workbook)
XLBooks = XLApp.Workbooks
XlSheet = CType (XLBooks (1) .Sheets.Item (1), Microsoft.Office.Interop.Excel.Worksheet)
XLSheets = XLBook.Worksheets
4 Digitare quanto segue per aggiungere la stringa dagli Appunti in Excel:
con clipboardObject
If .GetDataPresent(DataFormats.Text) Then
XLSheet.Cells (1, 1) = .GetData (DataFormats.Text)
Finisci se
End With
5 Eseguire il programma.