ok i found it. you want to display the sorted items from lstalpha2 in the textbox:

vb Code:
  1. Private Sub cmdalpha_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdalpha.Click

  2.  
  3.     lstalpha2.Items.AddRange(lstalpha.Items.Cast(Of String).ToArray)

  4.  
  5.     lstalpha2.Sorted = True

  6.  
  7.     txtalpha.Lines = lstalpha2.Items.Cast(Of String).ToArray

  8.  
  9. End Sub