- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 老师好，Getpy拼音功能怎么实现？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91766)
-- 发布时间：2016/10/18 16:10:00
-- 老师好，Getpy拼音功能怎么实现？
老师好！
我做的一个表里的一个列是“公司名称”，为了快速找到我做了一个“公司名拼音”
好多公司名，我不知如何在“公司名拼音”一列中如果一下把前面一列几百个的名字一下弄好
在论坛里查 到下面的方法
表DoubleClick事件
e.Row("拼音首码") = GetPy(e.Row("公司名称"),True)
我改后，只能一个一个的双击，这样太慢了吧，有没其它方法？
先谢谢老师！
还有，如果在另一个表里一个列里打个拼音字母后，把这个表里的几个列的数据信息给调过去，用目录树么？我看了教程和帮助，操作了几次还是不行呀?
请老师赐教！！！！
-- 发布时间：2016/10/18 16:18:00
--
DataColChanged事件
Select Case e.DataCol.Name
Case "公司名称"
If e.NewValue > "" Then
e.DataRow("拼音首码") = GetPy(e.NewValue ,True)
Else
e.DataRow("拼音首码") = Nothing
End If
End Select
然后选中公司名称列，重置一下列
-- 发布时间：2016/10/18 16:19:00
--
调过去参考：http://www.foxtable.com/webhelp/scr/1451.htm
-- 发布时间：2016/10/18 19:47:00
--
太爽了，万分感谢！！！！！！！！赞！！！