- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]拼音首字母辅助输入-0基础学习疑问001 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=92934)
-- 发布时间：2016/11/16 17:25:00
-- [求助]拼音首字母辅助输入-0基础学习疑问001
我是想这样的功能：
在文本框输入拼音首字母时，就可以在控件Table1中列出like “文本框.text” 的数据
此主题相关图片如下：foxtable零基础学习疑问001.png
求解，该怎么写这个代码？
-- 发布时间：2016/11/16 17:54:00
--
vbnet函数不能用在表达式里
t.filter = "拼音列 like \'%py%\'"
-- 发布时间：2016/11/16 18:15:00
--
有没办法一次性提取“名称”列的拼音首字母，写入新建的列？
Tables("家具信息表").Cols("名称拼音")=GetPy(Tables("家具信息表").Cols("家具名称"))
不得行
[此贴子已经被作者于2016/11/16 18:22:13编辑过]
-- 发布时间：2016/11/16 18:56:00
--
参考代码
Dim dt As DataTable = DataTables("家具信息表")
For Each dr As DataRow In dt.DataRows
dr("名称拼音") = GetPy(dr("家具名称"))
Next
-- 发布时间：2016/11/16 19:20:00
--
以下是引用有点青在2016/11/16 18:56:00的发言：
参考代码
Dim dt As DataTable = DataTables("家具信息表")
For Each dr As DataRow In dt.DataRows
dr("名称拼音") = GetPy(dr("家具名称"))
Next
此主题相关图片如下：foxtable零基础学习疑问001-1.png
谢谢各位帮忙，，我基础太差了，有点劳驾大家了，这还不是满意结果，要的是拼音首字母，是不是后面加ture
[此贴子已经被作者于2016/11/16 19:36:47编辑过]
-- 发布时间：2016/11/16 19:44:00
--
此主题相关图片如下：foxtable零基础学习疑问001-2.png
运行第一次报错，看不懂，，
[此贴子已经被作者于2016/11/16 19:44:36编辑过]
-- 发布时间：2016/11/16 19:44:00
--
此主题相关图片如下：foxtable零基础学习疑问001-3.png
再运行次，就全部出来了
-- 发布时间：2020/6/4 15:51:00
--
你没有新建列，怎么写入呢