设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 6176|回复: 14
打印 上一主题 下一主题

[ActiveX] [原创分享]多关键字(中文)不同颜色显示-富文本控件应用-RichTextBox

[复制链接]
跳转到指定楼层
1#
发表于 2009-12-8 21:50:34 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
下午刚有网友提到关键字高亮显示。
近段时间正好自己开发数据库导入导出设计用的工具,中间正好要采用一个查询编辑器,需要不同颜色显示不同关键字
这就先试试

实现中文亮显



实现关键字亮显

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
发表于 2009-12-8 21:56:24 | 只看该作者
非常不错! 赞一个!
3#
 楼主| 发表于 2009-12-8 22:09:34 | 只看该作者
代码如下

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
4#
 楼主| 发表于 2009-12-8 22:26:26 | 只看该作者
总结如下:
1、此代码中,Unicode 与ANSI 字符串的处理是最重要的一环节。
Private Declare Function lstrLen Lib "kernel32" Alias "lstrlenA" (ByVal lpString As String) As Long 或 LenB(StrConv(sTemp, vbFromUnicode)) 是关键

2、RichTextBox.Find 第二个参数尽然是按照ANSI 码(一个汉字算两个字符)计算的,这个老问题搞了我近一个小时后来才想来这点。记住:其他方法属性都是按Unicode 计算的

3、用了SafeArrayGetDim API函数,用来判断数组为空或没有初始化的。这个跟数组的结构相关,需要明白安全数组的概念。
5#
发表于 2009-12-8 22:28:30 | 只看该作者
谢谢分享。。。学习
6#
 楼主| 发表于 2009-12-8 22:31:03 | 只看该作者
由于上面都是现在在网吧写,工具和帮助文件又少,有问题大家都来跟贴吧
7#
发表于 2009-12-9 20:19:22 | 只看该作者
先看了再说
8#
发表于 2009-12-9 20:22:09 | 只看该作者
怎么出错了?
9#
发表于 2009-12-10 13:44:54 | 只看该作者
2003 会显示access不支持这种activex控件
請問新的控件那里可下载?
10#
发表于 2009-12-10 15:43:46 | 只看该作者
支持原创!!
但我的2007也一样,不行。。。。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-12 08:02 , Processed in 0.098643 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表