如何拆分文本框（以“-”分隔）值，然后在两个标签上显示拆分值？
这是我的代码：
Dim s As String
Dim substring As String
Dim sp() As String
s = txtTime1.Text 'this text box contains value (08:00-17:41)
sp = s.Split("-")
For Each substring In sp
txtTimeIn.Text = substring
txtTimeOut.Text = substring
Next
我的问题是txtTimeIn和txtTimeOut仅显示值'17：41'。提前非常感谢您。
尝试这个：
Dim s As String
Dim substring As String
Dim sp() As String
s = txtTime1.Text 'this text box contains value (08:00-17:41)
sp = s.Split("-")
txtTimeIn.Text = sp(0)
txtTimeOut.Text = sp(1)
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句