我用Set table = New HTMLTable报错,html object 也引入了,为什么不行啊?
源代码如下
Private table As HTMLTable
Private Sub Form_Load()
Dim row As HTMLTableRow
Dim cell As HTMLTableCell
Dim i As Integer, j As Integer
Set table = New HTMLTable
' For i = 1 To 9
' Set row = New HTMLTableRow
' For j = 1 To 3
' Set cell = New HTMLTableCell
' cell.innerText = j
' Call row.Cells.Add(cell)
' Next
' Call table.Rows.Add(row)
' Next
End Sub
源代码如下
Private table As HTMLTable
Private Sub Form_Load()
Dim row As HTMLTableRow
Dim cell As HTMLTableCell
Dim i As Integer, j As Integer
Set table = New HTMLTable
' For i = 1 To 9
' Set row = New HTMLTableRow
' For j = 1 To 3
' Set cell = New HTMLTableCell
' cell.innerText = j
' Call row.Cells.Add(cell)
' Next
' Call table.Rows.Add(row)
' Next
End Sub
System.Web.UI.WebControls.Table
sorry,搞错了,我还以为是WEB程序
table创建不了,只能在webbrowser中得到一个table才能处理。