DullWolf的CNWord类

转载 2004年10月10日 14:02:00

<input value="看看superDullWolf的CNWord类引用实例,vbs,改进了一下,可以提供chinese出现的位置了" id="input1" style="width:100%"/>
<br/>
<button onclick="vbs:classAndRegExp">验证</button>
<script language = "vbscript">
sub classAndRegExp()
 set wolf = new CNWord
  wolf.str = input1.value
  
  msgbox "含有中文数" & wolf.CNcount
  msgbox "含有中文块数" & wolf.CNBlockCount
  msgbox "第2个中文块是--->" &  wolf.CN(2)
  msgbox "第1个中文块出现的位置是--->" &  wolf.CNIndex(1)
 set wolf = nothing
end sub
</script>


<script language="vbscript">
 class  CNWord

  public str
  
  private sub Class_Initialize()  
   set regEx =new RegExp
   regEx.IgnoreCase = True   '设置是否区分大小写。
   regEx.Global = True   '设置全局可用性。
  end sub 

  private regEx
  

  Property get  CN(x)
   dim Arr()
   dim maxBound : maxBound = CNBlockCount
   redim Arr(maxBound)
   dim i:i=1
   dim Match
    For each Match  in regEx.Execute(str)
    Arr(i) =  Match 
    i = i + 1
    next
    if x<=maxBound then CN = Arr(x) 
  End Property
  
  Property get  CNIndex(x)
   dim Arr()
   dim maxBound : maxBound = CNBlockCount
   redim Arr(maxBound)
   dim i:i=1
   dim Match
    For each Match  in regEx.Execute(str)
    Arr(i) =  Match.FirstIndex + 1 
    i = i + 1
    next
    if x<=maxBound then CNIndex = Arr(x)
  End Property
  
  Property get  CNcount
   '返回含有中文的字数
   regEx.Pattern =  "[/u4e00-/u9fa5]" 
   CNcount = findCHNnum()
  End Property

  Property get  CNBlockCount
   '返回含有中文的块数
   regEx.Pattern =  "[/u4e00-/u9fa5]+" 
   CNBlockCount = findCHNnum()
  End Property

  
  private function findCHNnum()
   findCHNnum = regEx.Execute(str).count    
  end function
 
 
  
  
  private sub Class_Terminate()  
   set regEx  = nothing
  end sub

 end class
</script>

类设计的5个基本原则

我们常说啥面向对象三大特性:封装,继承,多态.另一种说法是:抽象,继承,动态绑定 然后就是面向对象五大设计原则,面向对象的设计其实说到底就是类的设计嘛,没有了类就自然不能叫面向对象了.当然了像C#中还...
  • weiwenhp
  • weiwenhp
  • 2013年03月15日 03:49
  • 11222

类与类之间的关系(1)

类与类之间的关系对于理解面向对象具有很重要的作用,以前在面试的时候也经常被问到这个问题,在这里我就介绍一下。 类与类之间存在以下关系:     (1)泛化(Generalization)     (2...
  • wulibin136
  • wulibin136
  • 2011年05月28日 18:41
  • 12918

Java中类与类的关系

yaogao@gmail.com类与类之间存在以下关系:1、 泛化(Generalization)很简单,就是我们常说的继承。是说子类获得父类的功能的同时,还可以扩展自己的功能。如图:Java代码中表...
  • fantian830211
  • fantian830211
  • 2007年08月21日 23:00
  • 4345

c++类的基本概念

1.OOP的重要特性:    ●抽象:           将问题的本质特征抽象出来,并根据特征来描述解决方案,抽象是通往用户类型的捷径。    ●封装和数据隐藏   封装:公有接口表示设计的抽象组件...
  • liuwei271551048
  • liuwei271551048
  • 2014年04月17日 12:08
  • 2280

python中类的总结

关于python中类的部分总结
  • kellyseeme
  • kellyseeme
  • 2016年04月22日 19:45
  • 1386

C++中类的组合

今天时间匆忙,明天整理后写出
  • u014158041
  • u014158041
  • 2014年03月19日 21:53
  • 2536

执行jar包中的某个类

D:\dev_tool\java_open\xuggle>java -classpath xuggle.jar;slf4.jar com.xuggle.xuggler.demos.CaptureScr...
  • xingxiliang
  • xingxiliang
  • 2013年11月15日 11:55
  • 4954

Java类和类之间关系

类和类之间关系包括了 is a,has a, use a三种关系 is a包括了 继承,实现关系 has a包括了 组合,聚合,关联关系 use a包括了 依赖关系 继承:子是父的关系,狗是动物 [...
  • msyqmsyq
  • msyqmsyq
  • 2016年08月31日 22:48
  • 1004

Python中的类概念理解

Python编程中类的概念可以比作是某种类型集合的描述,如“人类”可以被看作一个类,然后用人类这个类定义出每个具体的人——你、我、他等作为其对象。类还拥有属性和功能,属性即类本身的一些特性,如人类有名...
  • hahajinbu
  • hahajinbu
  • 2015年12月05日 20:48
  • 3172

局部类和嵌套类(类定义中包含类定义)

局部类   在一个函数体内定义的类称为局部类。局部类中只能使用它的外围作用域中的对象和函数进行联系,因为外围作用域中的变量与该局部类的对象无关。局部类不能被外部所继承。在定义局部类时需要注意:局...
  • HDUTigerkin
  • HDUTigerkin
  • 2012年05月15日 15:13
  • 6088
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:DullWolf的CNWord类
举报原因:
原因补充:

(最多只允许输入30个字)