Dim intIDX As Integer
Dim ServerList As ListOfServer

' Set MousePointer to Working Pointer
MousePointer = vbHourglass

' Clear the ListBox
lstComputers.Clear

' Get List of Computers on Network (Type All: Server and Workstation)
ServerList = EnumServer(SRV_TYPE_ALL)

' Loop through all the computers and add them to the listbox
If ServerList.Init Then
For intIDX = 1 To UBound(ServerList.List)
lstComputers.AddItem ServerList.List(intIDX).ServerName
Next
End If


1stComputer is the name of the listbox.How do i change the display to listview in order for me to change the colour of the item in it. I can display it in treeview but all the function such as right click pop up menu can't work. Please help....