VB.net을 사용하여 사전 순으로 AD 그룹을 나열하는 방법?

Question

사용자 컴퓨터가 속한 활성 디렉토리 그룹이 나열된 vb.net 응용 프로그램을 만들었습니다. 내가 할 수 없거나 온라인으로하는 방법을 찾는 것은 알파벳 순서로 AD 그룹 목록을 표시하는 방법입니다. 알파벳 순서로 표시하는 방법을 아는 사람이 있습니까? 여기에 제가 지금까지 가지고있는 코드가 있습니다.

Public Shared Function WorkstationADGroups(ByVal PCName As String) As String 

    ' Returns list of AD Groups the comptuer is a member of 
    Try 
     Dim x As Integer = 1 
     Dim result As String = Nothing 
     Using ctx As New PrincipalContext(ContextType.Domain) 
      Using p = Principal.FindByIdentity(ctx, PCName) 
       If Not p Is Nothing Then 
        Dim groups = p.GetGroups() 
        Using groups 
         For Each group In groups 
          result = result & "</BR>" & x & ".  --  " & group.SamAccountName 
          x = x + 1 
         Next 
        End Using 
       End If 
      End Using 
     End Using 
     Return result 
    Catch ex As Exception 
     Return ex.Message 
    End Try 

End Function 

모든 도움을 주시면 감사하겠습니다.

미리 감사드립니다.

Answer 1

나는 보통 이것을 위해 linq에 간다.

Dim orderedGroups = (From g In Groups Order By g.SamAccountName) 

그런 다음 Groups 대신 orderedGroups를 반복하여 필요한 것을 얻을 수 있습니다.