以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎样在textbox中只显示绑定列的 "-" 后的数字 【初步搞定】  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1976)
--  作者：mr725
--  发布时间：2009/3/1 17:22:00
--  怎样在textbox中只显示绑定列的 "-" 后的数字 【初步搞定】

就是象：单元格中的 "ABC-123"  ，在textbox中只显示 "123"，数字位数不一定

[此贴子已经被作者于2009-3-1 19:46:54编辑过]
--  作者：mr725
--  发布时间：2009/3/1 19:44:00
--  

搞定了enter事件中：（只是要进入textbox时才行）

Dim Multi As string = Tables("表").Current("列")
        Dim Values as String()
        Values = Multi.split("-")
            dim ss as string = (Values(0))
                ss = ""
            dim ss1 as string = (Values(1))
                  e.Form.Controls("textbox2").value = ss " & " ss1
                  e.Form.Controls("textbox2").Select()

        For Index As Integer = 0 To 0
            dim ss as string = (Values(Index))
                ss = ""
        For Index1 As Integer = 1 To 1
            dim ss1 as string = (Values(Index1))
        Next
             e.Form.Controls("textbox2").value = ss " & " ss1
        Next

[此贴子已经被作者于2009-3-1 19:46:07编辑过]
--  作者：狐狸爸爸
--  发布时间：2009/3/2 19:22:00
--  

如果是帮定，可以参考DataParse和DataFormat事件，实现起来更规范。