以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 当选中项目后,清除已经选中的数据空格后边的数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=15074) |
-- 作者:kevin -- 发布时间:2011/12/11 22:46:00 -- 当选中项目后,清除已经选中的数据空格后边的数据 如题:
此主题相关图片如下:qq截图20111211224240.png 此主题相关图片如下:qq截图20111211224253.png |
-- 作者:狐狸爸爸 -- 发布时间:2011/12/11 22:52:00 -- 参考:
http://www.foxtable.com/help/topics/1421.htm http://www.foxtable.com/help/topics/1338.htm
|
-- 作者:kevin -- 发布时间:2011/12/11 23:57:00 -- Dim Tel As String = "0759-3166876"Dim Parts() As String = Tel.Split("-") Output.Show("区号:" & Parts(0)) Output.Show("电话:" & Parts(1))
这个代码如何用到表A中呢?例如表A的“名称”列字符是"123-KK” 而在“品名”列中得到结果"123”
|
-- 作者:yangming -- 发布时间:2011/12/12 0:40:00 -- Dim Tel As String =e.Form.Controls("ComboBox1").Value Dim Parts() As String = Tel.Split("_") Dim dr As Row= Tables("表A").Current dr("品名")=Parts(0) |