如何在小数点(。)之前得到左边字符的文本长度?
示例Run1:
Textbox7.text = 9.48 03/21/2014
预期结果= 09.48 03/21/2014
示例Run2:
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
答案 0 :(得分:0)
我不知道为什么这会出现在我的问题列表中并且有一个已接受的答案,但你所看到的东西看起来比需要的要复杂得多。这似乎适用于您的测试数据:
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/d/yyyy").ToString("hh.mm MM/dd/yyyy")
获得一个版本。但是,当我将格式提供程序和格式字符串设置为正确时,我的第一个建议最终会变得容易。