ListView Report Mode View - RESOLVED
When I change to report mode view nothing is showing up in my listview. When I change it to List view my data shows up. Any ideas?
VB Code:
Private Sub LoadTableSpecs()
Dim oSQLServer As New SQLDMO.SQLServer
Dim oSQLDatabase As New SQLDMO.Database
Dim oSQLTable As New SQLDMO.Table
Dim oSQLColumn As New SQLDMO.Column
Dim i As Integer
Dim liObject As ListItem
ListView1.ListItems.Clear
oSQLServer.LoginSecure = True
oSQLServer.Connect Form1.cboServer1.Text
Set oSQLDatabase = oSQLServer.Databases(Form1.cboDatabase1.Text)
Set oSQLTable = oSQLDatabase.Tables(Form1.cboTable1.Text)
For Each oSQLColumn In oSQLTable.Columns
Set liObject = ListView1.ListItems.Add(, , oSQLColumn.Name)
liObject.SubItems.Add , , oSQLColumn.Datatype
liObject.SubItems.Add , , oSQLColumn.Length
Set liObject = Nothin
Next
oSQLServer.DisConnect
Set oSQLServer = Nothing
End Sub
Re: ListView Report Mode View
You need to add ColumnHeaders before adding items.
Re: ListView Report Mode View
Here is a quick sample for you:
VB Code:
Private Sub Form_Load()
Dim j%
ListView1.FullRowSelect = True
ListView1.View = lvwReport
With ListView1.ColumnHeaders
.Add , , "List Item"
For j = 1 To 3
.Add , , "Sub Item " & j
Next j
End With
ListView1.ColumnHeaders(2).Alignment = lvwColumnCenter
ListView1.ColumnHeaders(3).Alignment = lvwColumnRight
End Sub
Re: ListView Report Mode View
That worked. I don't know what I would do without you guys.
Thanks.