彩票走势图

启动Visual Basic,创造出一个新的标准项目默认为Form1。

在工具箱的面板中,右键单击空白区域。然后单击组件……

在弹出的对话框中,选中Edraw Office Viewer Component组件。

点击OK按钮。

工具栏窗口中将会添加Office Viewer Component组件。

切换到VB 6窗体，添加组件。

组件包含了大量的方法、事件和属性用于自定义Excel窗口。

开发人员可以使用以下代码在Form_Load Event中打开excel文件。

Private Sub Form_Load()
EDOffice1.OpenFileDialog
'EDOffice1.OpenWord "d:\test.xlsx"
'EDOffice1.Open "d:\test.xls", "Excel.Application"
End Sub

为了不让终端用户修改Excel工作表，开发人员需要在DocumentOpened事件中添加以下代码。

Private Sub EDOffice_DocumentOpened()
EDOffice1.ProtectDoc 1 ' XlProtectTypeNormal
End Sub

在创建或修改excel数据是可以用到一些excel自动化方法。

bool ExcelAddWorkSheet(long Index);
bool ExcelDeleteWorkSheet(long Index);
bool ExcelActivateWorkSheet(long Index);
long ExcelGetWorkSheetCount();
bool ExcelSetCellValue(long Column, long Row, BSTR Value);
BSTR ExcelGetCellValue(long Column, long Row);
bool ExcelSetRowHeight(long Row, double Height);
bool ExcelSetColumnWidth(long Column, double Width);
afx_msg bool ExcelDeleteRow(long Row);
bool ExcelDeleteColumn(long Column);
bool ExcelInsertRow(long Row);
bool ExcelInsertColumn(long Column);
bool ExcelInsertPageBreakInRow(long Row);
bool ExcelInsertPageBreakInColumn(long Column);
bool ExcelCopyToClipboard();
bool ExcelPasteStringToWorksheet(BSTR bstText);