怎样提前字符串中的数字然后比较大小！

Question

请问大家，怎样提取字符串中的数字然后比较大小。比如 text1.text="V7.0",text2.text="V8.0",text3.text="V9.0".我要提取这三个文本框中的数字：7.0，8.0，9.0.然后比较大小（关键是怎么提取数字）。得到的结论是text1的值<text2的值<text3的值
这个该怎么操作呀！

Answer 1

提取数字,排序自己会吧Option Base 1
Private Sub Command1_Click()
  Dim strt(3) As String, a(3) As Double, i As Long
  strt(1) = "V7.0"
  strt(2) = "V8.0"
  strt(3) = "V9.0"
  For i = 1 To 3
    a(i) = Val(Mid(strt(i), 2))
  Next
End Sub