Foxtable(狐表)用户栏目专家坐堂 → [求助]拼音首字母辅助输入-0基础学习疑问001


  共有5329人关注过本帖树形打印复制链接

主题:[求助]拼音首字母辅助输入-0基础学习疑问001

帅哥哟,离线,有人找我吗?
lemon4012
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:11 积分:171 威望:0 精华:0 注册:2016/11/12 15:40:00
[求助]拼音首字母辅助输入-0基础学习疑问001  发帖心情 Post By:2016/11/16 17:25:00 [显示全部帖子]

我是想这样的功能:
在文本框输入拼音首字母时,就可以在控件Table1中列出like “文本框.text” 的数据


图片点击可在新窗口打开查看此主题相关图片如下:foxtable零基础学习疑问001.png
图片点击可在新窗口打开查看

求解,该怎么写这个代码?

 回到顶部
帅哥哟,离线,有人找我吗?
lemon4012
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:11 积分:171 威望:0 精华:0 注册:2016/11/12 15:40:00
  发帖心情 Post By:2016/11/16 18:15:00 [显示全部帖子]

有没办法一次性提取“名称”列的拼音首字母,写入新建的列?

Tables("家具信息表").Cols("名称拼音")=GetPy(Tables("家具信息表").Cols("家具名称"))

不得行
[此贴子已经被作者于2016/11/16 18:22:13编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lemon4012
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:11 积分:171 威望:0 精华:0 注册:2016/11/12 15:40:00
  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lemon4012
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:11 积分:171 威望:0 精华:0 注册:2016/11/12 15:40:00
  发帖心情 Post By:2016/11/16 19:44:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:foxtable零基础学习疑问001-2.png
图片点击可在新窗口打开查看
运行第一次报错,看不懂,,
[此贴子已经被作者于2016/11/16 19:44:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lemon4012
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:11 积分:171 威望:0 精华:0 注册:2016/11/12 15:40:00
  发帖心情 Post By:2016/11/16 19:44:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:foxtable零基础学习疑问001-3.png
图片点击可在新窗口打开查看

再运行次,就全部出来了

 回到顶部