Сортировка данных после объединения - Visual Basic .NET

Формулировка задачи:

Привет! Начинающий в этом деле. Возникла не большая проблема с сортировкой данных. Необходимо в ListBox3 объединить данные и сортировать их по убыванию. Объединить-то их получилось, но сортировать данные не выходит. См. скриншот.

                    Листинг программы
                
 
                            
                        
Public Class Form1
    Private T As String
    Dim m0() As [String] = {"Бословяк", "Изотова", "Копущу", "Котляров", "Кубрак", "Кулев"}
    Dim m1() As [String] = {"Лоцман", "Новожеев", "Стрельцов", "Шевцов", "Юрченков", "Янович"}
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        T = "исходный массив"
        For Each f As Object In m0
            ListBox1.Items.Add(f)
        Next
        For Each f As Object In m1
            ListBox2.Items.Add(f)
        Next
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        ListBox3.Items.Clear()
        Dim b = From c In m0 Order By c Ascending
        b = From c In m0 Order By c Descending
        For Each f In b
            T = T + f.ToString + ""
            ListBox3.Items.Add(f)
        Next
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        ListBox3.Items.Clear()
        Dim b = From c In m1 Order By c Ascending
        b = From c In m1 Order By c Descending
        For Each f In b
            T = T + f.ToString + ""
            ListBox3.Items.Add(f)
        Next
    End Sub
 
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        ListBox3.Items.Clear()
        T = "сумма"
        For Each f As Object In m0
            ListBox3.Items.Add(f)
        Next
        For Each f As Object In m1
            ListBox3.Items.Add(f)
        Next
        
    End Sub
 
End Class

Решение задачи: «Сортировка данных после объединения»

textual
                            Листинг программы 
                        
        Dim Mass3 As New List(Of String)
        Mass3.AddRange(m0.Concat(m1))
        Mass3.Sort()
        Mass3.Reverse()
        ListBox1.Items.AddRange(Mass3.ToArray)