| 关于Word VBA编程的光标与选中区域 |
第一次接触Word VBA编程，对于如何移动光标迷惑了好久，因为VBA参考中似乎没有任何关于移动光标的函数说明。搞了许久，才终于恍然大悟，原来对于Word，光标和选中区域就是一回事。
r5EQHU http://www.numino.net
光标和选中区域就是一回事？
BI152O http://www.numino.net
设计如此，我们可能会觉得Word编辑就像流操作一样，有一个当前位置（也就是光标位置），然后在当前位置输入数据。但实际上，这是另一个概念。
SY0pQD http://www.numino.net
在Word中，编辑操作是针对当前选中区域而言的，区域不仅有位置信息，还可以有内容。Word对输入数据的真实操作是“将当前选中区域的内容设置为所输入数据”。
hK7bGh http://www.numino.net
与流的当前位置相似的一点是：一个Word中只存在一个选中区域。
P7nA7o http://www.numino.net
光标是长度为零的选中区域。光标和选中区域不能同时存在可以证明这一点。
yQZriU http://www.numino.net
为什么光标与选中区域的表现不同？
krxuB9 http://www.numino.net
Word中选中区域会以深色为背景，但当选中区域长度为零时，实际上无法看到选中区域，为了让用户知道选中区域的位置，所以Word就显示一个闪烁的竖杠，是为光标。
ydsZnD http://www.numino.net
综上，Word VBA中没有关于光标的内容也就正常了。因为Word VBA提供的是关于选中区域的操作。下面是刚总结出来的有关区域的一些的信息：
7FXGCt http://www.numino.net
一、Selection对象
AJ1F1d http://www.numino.net
此对象是Word.Document的一个成员，代表文档的选中区域。
7Ty50l http://www.numino.net
二、Range对象
3GD2JN http://www.numino.net
代表一个区域，所有Word单元（参考WdUnits）都包含一个Range对象。
BT10m2 http://www.numino.net
使用Range的Select可以使此区域成为当前区域。
XVc66G http://www.numino.net
Range对象有一个int型的Start值和End值，表示区域的起始位置和终止位置，此位置是相对于文档起始位置而言的。
DhGKSf http://www.numino.net
三、Document对象
VONO0t http://www.numino.net
代表一个文档。
u8X7wx http://www.numino.net
Document拥有一个Range方法，此方法返回一个包含指定起始位置处至终止位置之前所有字符的Range对象。
SeibCZ http://www.numino.net
可见，虽然Word文档可以呈现复杂的样式，但其中的数据是序列化可索引的。每个基础元素（字符，图片等）都可以索引。此索引从零开始。
X9W9Z7 http://www.numino.net
Range.Start为区域第一个字符的索引，Range.End为区域最后一个字符索引的下一个索引。
HCFWJA http://www.numino.net
不向Range方法传入任何参数时将得到一个包含整个文档的Range对象。
xAEmcj http://www.numino.net
向Range传入的起始位置和终止位置相同时，得到的Range对象是指定位置处的一个长度为零的区域。将此区域置为当前区域（调用Select方法）即将光标置于该处。
DA5Uq9 http://www.numino.net
注意，如果尝试把包含文档末尾的区域的End属性传入Range方法以获得一个处于文档末尾的光标，将会出错。因为该End值不是一个有效的索引，而Range的Start参数要求一个有效索引。
E9hV65 http://www.numino.net
四、Move系列函数
V6VEg8 http://www.numino.net
包括Move、MoveDown、MoveEnd、MoveEnduntil、MoveEndWhile、Moveleft、MoveNode、MoveRight、MoveRight、MoveStart、MoveStartUntil、MoveStartWhile、MoveUntil、MoveUp、MoveWhile。
tSWa5I http://www.numino.net
这些函数是Selection对象的成员，用于将当前区域向前或向后移动一个相对距离。
5v1Be8 http://www.numino.net
这些函数可能包含三个参数：
a00nXQ http://www.numino.net
1、Units，移动距离的单位，参考WdUnits。
C13BkF http://www.numino.net
2、Count，移动的距离。
5A72NV http://www.numino.net
3、Extend，此参数为wdMove时，将得到一个新位置的同尺寸的区域？为wdExtend时，将得到一个包含原区域和新位置之间所有内容的区域。
hopjr5 http://www.numino.net
Move函数并不将当前区域中的内容向前或或后移动，它只是在将位于当前区域之前或之后的某处设为当前区域。
6XTor0 http://www.numino.net
使用Move后，当前区域长度问题为零。
q71ibW http://www.numino.net
Move函数移动的距离是指当前区域边界处与新区域的距离。例如：设当前区域为Range(2,4)，向后移两个字符时得到的当前区域是Range(5,5)，向前移动两个字符得到的当前区域是Range(1,1)
xPmn2Q http://www.numino.net
一个已发现的问题是关于MoveEnd函数的，此函数无Extend参数，参考中说明此函数进行wdMove类型的移动。但程序运行结果显示该函数进行wdExtend类型的移动。不知是确实是此函数的问题还是一些其它方面的问题造成的。
|
|