以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] RichTextBoxFinds枚举值组合  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81227)
--  作者：lsy
--  发布时间：2016/2/22 10:54:00
--  [求助] RichTextBoxFinds枚举值组合
模糊记得，VB中有某个枚举类型的组合，可以用枚举的值对应的数字值相加的方法，找不到了。
RichTextBoxFinds有5个值：
MatchCase

仅定位大小写正确的搜索文本的实例。

NoHighlight如果找到搜索文本，不突出显示它。


None定位搜索文本的所有实例，而不论在搜索中找到的实例是否是全字。


Reverse搜索在控件文档的结尾处开始，并搜索到文档的开头。


WholeWord仅定位是全字的搜索文本的实例。
如果用条件语句把各种选项的组合列出来，太费事，用数字相加又没达到效果。
--  作者：大红袍
--  发布时间：2016/2/22 12:14:00
--  

测试没问题

 

msgbox(Windows.forms.RichTextBoxFinds.MatchCase)
msgbox(Windows.forms.RichTextBoxFinds.NoHighlight)
msgbox(Windows.forms.RichTextBoxFinds.Reverse)

msgbox(Windows.forms.RichTextBoxFinds.MatchCase Or windows.forms.RichTextBoxFinds.NoHighlight Or Windows.forms.RichTextBoxFinds.Reverse)

msgbox(4 Or 8 Or 16)
--  作者：lsy
--  发布时间：2016/2/22 14:45:00
--  
有点管用了。
谢谢。