vb.net 怎么使ListBox1内的内容按一定算下排列 新手 '求代码

vb.net 如何使ListBox1内的内容按一定算下排列 新手求助 '求代码
2个问题
1  如何使ListBox1内的内容按一定顺序排列内容如下
  9:10:11        大兴安岭(43,23)
18:40:48         南门车站(53,48)
  1:55:03         中国故宫(120,76)
14:18:26         天安门(94,29)
  1:18:51          武当山(79,96) 
                                                                ' 这是个空行   
 3:40:35           太行山(94,71)

按时间大小重新排列后
  1:55:03           中国故宫(120,76)
  1:18:51           武当山(79,96)
  3:40:35           太行山(94,71)
  9:10:11           大兴安岭(43,23) 
14:18:26           天安门(94,29) 
18:40:48           南门车站(53,48) 

2 选定了一行,如何把那前面的时间提前出来
比如我选了  9:10:11           大兴安岭(43,23)   
这一行怎么把 9:10:11 这个时间提取到 TextBox1.Text 

'求代码
------解决方案--------------------

  Dim s As String() = ListBox1.SelectedItem.ToString().Split(" ")
        TextBox1.Text = s(0)