在编辑数学试卷时，常常需要输入分数，但很多老师不知道如何在Word中输入分数，给编写试卷带来许多麻烦。这里介绍两种实现方法：一种是用 Word本身提供的的EQ域。这种方法容易操作，但对大量的分数输入来讲太费事。另一种是利用EnterFraction宏命令在文档中方便地插入分数，大大简化了分数的编辑工作。下面将两种方法介绍给大家，愿与同行交流学习。
方法一：利用域命令。
1、把光标移到须要输入分数的地方，选择word菜单“插入”→“域”。
2、在出现的窗口中选“域名”窗格中的“Ｅq” 项，单击“域代码”按钮，在右边会出现“域代码”对话框。
3、单击在窗口下方出现的“选项”按钮，出现“域选项”窗口，在“开关”列表中双击“\f(,)”项，在“域代码”对话框中就会自动添加这个用于创建分数的域代码。
4、在“\f(,)”代码的括号中分别在逗号的前面输入分数的分子后面输入分数的分母。
5、单击“确定”按钮返回word的编辑界面，这时分数就出现在文章中。
方法二：创建编辑公式(不建议普通老师使用)
1．创建一个对话窗口
单击“工具”*“宏”*“Visual Basic 编辑器”，启动Visual Basic 编辑器。单击其菜单栏上的命令“插入”*“添加用户窗体”，添加一个空白用户窗体，在窗体上添加两个标签（Label）、两个文本编辑（TextBox）和两个命令按钮（CommandButton）控件，按下表修改它们的属性。
组件 属性 值
userform （命名） frmEnterFraction
Caption 输入分数
TextBox1 （命名） tbNumerator
Caption 分子表达式：
TextBox2 （命名） tbDenominator
Caption 分母表达式：
CommandButton1 （命名） btnOK
Caption 确定
CommandButton2 （命名） btnCancel
Caption 取消
然后单击命令按钮1（CommandButton1，btnOK），为其添加一段命令处理程序如下：
Private Sub btnOK_Click()
If tbNumerator.Text <> "" And tbDenominator.Text <> "" Then
fractionText = "EQ \F(" + tbNumerator.Text + "," + tbDenominator.Text + ")"
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
fractionText, PreserveFormatting:=False
End If
frmEnterFraction.Hide
End Sub
单击命令按钮2（CommandButton2，btnCancel），为其添加一段命令处理程序如下：
Private Sub btnCancel_Click()
frmEnterFraction.Hide
End Sub
最后给窗体的激活事件（UserForm_Activate）添加如下程序段：
Private Sub UserForm_Activate()
Load frmEnterFraction
End Sub
2. 创建调用该对话窗口的宏命令
单击Visual Basic编辑器菜单栏上的“插入”*“添加模块”命令，在代码编辑窗口输入如下程序段：
Sub EnterFraction()
frmEnterFraction.Show
End Sub
完成上述步骤后，保存整个工作，切换回Word，就可以使用该宏命令了。
3. 使用该宏命令
将插入点定位在需要插入分数的位置，单击“工具”*“宏”*“ 宏”，打开宏对话窗口，选择EnterFraction宏并运行之，弹出一个对话窗口，分别在“分子表达式”和“分母表达式”编辑框中输入分数的分子和分母，单击“确定”按钮输入分数。使用该宏命令插入的分数域，在编辑过程中被当作一个单独的编辑单元对待，大大简化了排版的难度。例如： 。为了使用方便，你可以将该宏定义在工具栏上，使用时，只需单击相应工具按钮就可以打开对话窗口。 ccc
|
