Vb.net 获取小数点前左字符的textlength值（.）

如何获取小数点（.）之前的左字符的文本长度

示例运行1:
Textbox7.text=9.48 03/21/2014
预期结果=09.48 03/21/2014

    'If Val(TextBox7.Text.Trim.Split(".")(1).Length = 1) Then
        '    TextBox7.Text = "0" + TextBox7.Text
        'End If

示例运行2:
Textbox7.text=9.8 03/21/2014
预期结果=09.08 03/21/2014

    'If Val(TextBox7.Text.Trim.Split(".")(1).Length = 1) Then
        '    TextBox7.Text = "0" + TextBox7.Text
        'End If

---

我不知道为什么这会出现在我的问题列表中，并有一个公认的答案，但你所拥有的看起来比需要的复杂得多。这似乎对您的测试数据有效：

Dim temp() As String = TextBox7.Text.Trim().Split(". ".ToCharArray())
TextBox7.Text = String.Format("{0:D2}.{1:D2} {2:MM/dd/yyyy}", _
          Integer.Parse(temp(0)), Integer.Parse(temp(1)), Date.Parse(temp(2))) 

---

一旦我意识到9.8和9.48是时代的产物（有一段时间我被.8搞糊涂了），我也很快得到了一个使用

Date.ParseExact（TextBox7.Text，“h.m m m/d/yyyyy”）.ToString（“hh.mm mm/dd/yyyy”）

的版本。但是，当我找到正确的格式提供程序和格式字符串时，我的第一个建议也会很简单。

我能问最后一个问题吗？在我的例子中，我有两个文本框。Textbox3.Text=02.02 03/26/2014和TextBox9.Text=21.01 03/25/2014。如何比较最后的字符月、日、年或完成日期。Textbox3大于textbox9，因为Textbox3 day=26，textbox9=25。这是我的代码：如果Val（Strings.Left（Textbox3.Text.Trim，5））>Val（Strings.Left（textbox9.Text.Trim，5）），则“FrmMessageboxNG.ShowDialog（）结束如果