Word添加一个分数输入命令
您正在看的Word教程是:Word添加一个分数输入命令。 当编辑科技文档时，常常需要输入分数，但Word不能直接输入分数。有两种实现方法：用 Word本身提供的的EQ（方程）域或用公式编辑器。这两种方法都不简便，笔者编写了一个EnterFraction宏命令可以在文档中方便地插入分数，大大简化了分数的编辑工作。下面详细介绍如何在Word 97/2000/XP中创建该宏命令。
: ~& m9 h" x3 M/ O0 `+ o& n163K网站系统官方论坛bbs.163k.com; x" ~( d# e. T5 a
1．创建一个对话窗口
' H6 t2 y$ {6 V" rbbs.163k.com
4 Q" G; U2 [# I3 A9 P1 [bbs.163k.com 单击“工具”*“宏”*“Visual Basic 编辑器”，启动Visual Basic 编辑器。单击其菜单栏上的命令“插入”*“添加用户窗体”，添加一个空白用户窗体，在窗体上添加两个标签（Label）、两个文本编辑（TextBox）和两个命令按钮（CommandButton）控件，按下表修改它们的属性。
2 h5 ^+ ^) P! N为互联网事业发展提供源动力！
4 @( F0 x# N7 E+ y* w% d/ nbbs.163k.com
9 p$ U7 y4 w; H; rbbs.163k.com组件 属性 值 userform （命名） frmEnterFraction Caption 输入分数 TextBox1 （命名） tbNumerator Caption 分子表达式： TextBox2 （命名） tbDenominator Caption 分母表达式： CommandButton1 （命名） btnOK Caption 确定 CommandButton2 （命名） btnCancel Caption 取消 bbs.163k.com! P" P' ^+ E3 e/ [0 ~
bbs.163k.com7 s! T W$ @, f# h7 g: Z
0 W; G0 u7 {9 C! a6 y( J Qbbs.163k.com 然后单击命令按钮1（CommandButton1，btnOK），为其添加一段命令处理程序如下：
! j* K" P: i/ G9 Z- J团购网站系统,团购网程序163k团购网站系统官方服务论坛. ^" J' l4 e5 z) @
Private Sub btnOK_Click()9 ^' N! t* V, o$ T3 Y& ?
If tbNumerator.Text <> "" And tbDenominator.Text <> "" Then团购网站系统,团购网程序, b+ l; _. |' B
fractionText = "EQ \F(" + tbNumerator.Text + "," + tbDenominator.Text + ")"163k团购网站系统官方服务论坛8 p* G# p& ^+ `3 F. ^8 l3 Y8 }
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
$ J; v2 [* Q) B* b/ n! `! d163k团购网站系统官方服务论坛 fractionText, PreserveFormatting:=False
7 q! P$ r5 ~5 T- h, |1 S% Q163K网站系统官方论坛
5 w' v1 Q5 B$ T5 e163K网站系统官方论坛 End If163k团购网站系统官方服务论坛! v4 l1 A* g% m8 O8 q
frmEnterFraction.Hide
6 p) l3 F% k! ?+ G" V) m2 [$ S团购网站系统,团购网程序 End Sub 9 y. d1 h7 u3 p& v# Z6 L
单击命令按钮2（CommandButton2，btnCancel），为其添加一段命令处理程序如下：
1 A% M( L9 ?! G- ^- B, w163K网站系统官方论坛
6 u( t5 u+ }/ T( f; x9 D3 W, ~163k团购网站系统官方服务论坛 Private Sub btnCancel_Click()
& H7 q9 u% [6 x$ ^3 w4 ]) x团购网站系统,团购网程序 frmEnterFraction.Hide
; b( }2 Y6 ` t6 n: Z$ d% ubbs.163k.com End Sub163k团购网站系统官方服务论坛! ]" P( ^' M) I w _+ t
最后给窗体的激活事件（UserForm_Activate）添加如下程序段：团购网站系统,团购网程序. `5 O, Z2 M! F: [+ v) }+ q# M! A
Private Sub UserForm_Activate()163K网站系统官方论坛: M0 i# I- u; T( o
Load frmEnterFractionbbs.163k.com% T( Y# x4 W3 g
End Sub为互联网事业发展提供源动力！# H9 U6 j g, F9 @/ e- A- ?/ j3 `
* {8 r' t1 l) f0 W/ U, ^$ u/ o
2. 创建调用该对话窗口的宏命令
/ g, p) ?7 z w' v W! _' ?( q: Lbbs.163k.com
1 M6 U% Q: ^1 s$ P* ]3 b; X团购网站系统,团购网程序 单击Visual Basic编辑器菜单栏上的“插入”*“添加模块”命令，在代码编辑窗口输入如下程序段：
; }( O& B) v% L0 @5 a* ^3 [5 y2 e* a9 m, l
Sub EnterFraction()bbs.163k.com# @5 q$ ]* @. g* G. l$ n
frmEnterFraction.Show为互联网事业发展提供源动力！8 i* s$ h) A0 y8 |
End Subbbs.163k.com- R$ W% ]. ~8 h# p5 q0 r5 x' l
为互联网事业发展提供源动力！+ T" z/ M1 ]3 a& K4 H. d; m
完成上述步骤后，保存整个工作，切换回Word，就可以使用该宏命令了。
2 ^* Q6 U; e l为互联网事业发展提供源动力！
3 B7 a4 d2 Y4 S$ z" B5 W, e163k团购网站系统官方服务论坛 3. 使用该宏命令163k团购网站系统官方服务论坛( J5 x7 N4 I( ~7 B1 z
2 t" C. N6 @1 m1 H2 `0 p163k团购网站系统官方服务论坛 将插入点定位在需要插入分数的位置，单击“工具”*“宏”*“ 宏”，打开宏对话窗口，选择EnterFraction宏并运行之，弹出一个对话窗口（见图），分别在“分子表达式”和“分母表达式”编辑框中输入分数的分子和分母，单击“确定”按钮输入分数。使用该宏命令插入的分数域，在编辑过程中被当作一个单独的编辑单元对待，大大简化了排版的难度。例如： 。为了使用方便，你可以将该宏定义在工具栏上，使用时，只需单击相应工具按钮就可以打开对话窗口。
