SQLserver数据库问题？

我用下面的代码得到本机的服务名为什么总是LOCAL，而我在SQLserver企业管理器注册的服务器名是LU，怎么把我自己注册的服务器名显示到COMBO1里呢？
Private Sub Form_Load()
Dim oSQLServerDMOApp As SQLDMO.Application
Set oSQLServerDMOApp = New SQLDMO.Application
Dim i As Integer
Dim namX As NameList
Set namX = oSQLServerDMOApp.ListAvailableSQLServers
For i = 1 To namX.Count
 combo1.AddItem namX.Item(i)
Next
 combo1.ListIndex = 0
End Sub