I have these 4 arrays I need to sort them numerically and alphabetically

Dim StudentNames() As String = {"Dave", "Brian", "Richard", "Phil", "Vlad"}
Dim ClassTestScore() As String = {"0", "0", "0", "0", "0"}
Dim ConicalBasketMark() As String = {"0", "0", "0", "0", "0"}
Dim FinalGrade() As String = {"0", "0", "0", "0", "0"}

I have looked at the bubble sort concept already and just can't seem to get it

I already have the arrays displayed like this but without the names sorted...

Name:  Untitled.png
Views: 330
Size:  2.3 KB

but when the user clicks the sort alphabetically button I need them to sort.
plus i need the same to sort the numbers form highest to smallest on the final grade array.