VB如何定义spreadsheet

Question

Private Sub Form_Load()
    Dim mExcel As Excel.Application
    Dim mSheet As Excel.Worksheet
    
    Set mExcel = CreateObject("Excel.Application")
    
    mExcel.Workbooks.Open ("c:\ABC.xls")
    Set mSheet = mExcel.Sheets("sheet1")
    mSheet.Activate    For i = 0 To (mSheet.userange.Row.Count)
        For j = 0 To mSheet.userange.Column.Count
              Spreadsheet1.ActiveSheet.Cells(i, j) = mSheet.Cells(i.j)
        Next
    Next
  
End Sub我想用以上代码连接EXCEL但是提示要求对象，后来发现是没有定义spreadsheet请问应该怎么定义这个控件呢，达人们有代码或者例程吗？？谢谢

Answer 1

拖一个 Spreadsheet 到界面上。

Answer 2

Spreadsheet一个第三方电子表格控件，你连接excel可以与它无关。
把它换成mshflexgrid或msflexgrid都可以，在部件里添加。

Answer 3

呵呵~~这个我知道~~我就是想学习下Spreadsheet的用法，还是谢谢咯~~~我还是决定用mshflexgrid了