VB.net读写excel

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim xlapp As Excel.Application 'Excel对象
        Dim xlbook As Excel.Workbook '工作簿
        Dim xlsheet As Excel.Worksheet '工作表

        xlapp = CreateObject("Excel.Application") '创建EXCEL对象
        'Set xlbook = xlapp.Workbooks.Open(App.Path & "\test.xls") '打开已经存在的test.xls工件簿文件
        xlbook = xlapp.Workbooks.Add '新建EXCEL工件簿文件
        xlapp.Visible = True '设置EXCEL对象可见（或不可见）
        xlsheet = xlbook.Worksheets(1) '设置活动工作表''
        For i = 0 To 100
            For j = 0 To 100
                xlsheet.Activate()
                xlsheet.Cells(i, j) = 1
            Next
        Next
        xlsheet.SaveAs(Application.StartupPath + "\test.xls")          '按指定文件名存盘
        xlapp.Quit() '结束EXCEL对象'xlapp.Workbooks.Close
        xlapp = Nothing '释放xlApp对象

    End Sub


上代码：我想对excel进行读写，在工程中添加了excel的三个引用，也将引用复制到system32中了。在对excel进行写的时候，就会抛出异常， xlsheet.Cells(i, j) = 1这句就会抛出异常。 说是未处理的ComException。
谁能告诉我这是怎么回事。 --------------------编程问答-------------------- 我知道了。excel不是从0行0列开始的…… --------------------编程问答-------------------- 呵呵恭喜 --------------------编程问答-------------------- 这个可以改合理一点。

xlsheet.Activate()

For i = 1 To 100

  For j = 1 To 100 

     xlsheet.Cells(i, j) = 1

  Next

Next

--------------------编程问答-------------------- excel是一个二维数组，但起始索引并不是从0开始的，既然楼主以找到错误，就撒分吧，呵呵

补充：.NET技术 ,  VB.NET