用powerpoint制作电子试卷

《用powerpoint制作电子试卷》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、用PowerPoint制作电子试卷七台河职业学院李明江我们在教学中，经常使用PowerPoint制作课件，而对学生进行考试一般都用Word2000编辑排版印制试卷，考完还要批改试卷，特别费时费力。其实用PowerPoint中的Visualbasic制作电子试卷就很好地解决了这个问题（主要用于选择题）。具体操作步骤如下：一、新建一个PowerPoint文档，命名为“试卷”保存。选择一个空白版式幻灯片，在幻灯片中输入第1道题，然后在菜单栏项选“视图工具栏Visualbasic”启动Visualbasic，在“控制工具箱”中，点击“命令按钮”，在幻灯片上制作“输入姓名”按钮。

2、具体方法是：用鼠标左键点击“控制工具箱”中的“命令按钮”，然后移动鼠标到幻灯片上，拖动鼠标，建立一个名称为“commandbutton5”的按钮，在其上单击鼠标右键，在快捷菜单中选“属性”，在属性对话框中把“commandbutton5按钮”的caption属性值改为“输入姓名”。在幻灯片的下方在建立四个命令按钮，分别把caption属性改为A、B、C、D答案选项，并在其下方加一个动作按钮，动作设置为“超级链接到下一张幻灯片”（即下一题）。如图1所示。图1试卷样式图2二、为了能记录考生做各个题目的答案的统计得分，要定义公用变量和数组，双击“输入姓名”按钮，进入Visualb

3、asic代码编写窗口，在菜单栏选“插入otherstaffoftheCentre.Duringthewar,ZhuwastransferredbacktoJiangxi,andDirectorofthenewOfficeinJingdezhen,JiangxiCommitteeSecretary.Startingin1939servedasrecorderoftheWestNorthOrganization,SecretaryoftheSpecialCommitteeAfterthevictoryofthelongMarch,hehasbeentheNorthwestOf

4、ficeoftheFederationofStateenterprisesMinister,ShenmufuguSARmissions,DirectorofNingxiaCountypartyCommitteeSecretaryandrecorderoftheCountypartyCommitteeSecretary,Ministersand模块”，在模块代码窗口输入代码：publicxmasstringpublicde(40)asstringpubliccj(40)asinteger其中，xm变量用于记录考生姓名，数组de(40)用于记录考生各题所选择的答案，数组cj(4

5、0)用于记录各个答案的得分。下标量40表示题目数，可以根据题量多少改之。用inputbox()函数记录考生输入的姓名，输入代码如下：PrivateSubCommandButton5_Click()xm=InputBox("请输入学生姓名：")EndSub三、为第1个题目的各个答案输入答案和得分代码，分别双击答案A、B、C、D选项按钮，输入代码如下：PrivateSubCommandButton1_Click()de(1)="A"cj(1)=0EndSubPrivateSubCommandButton2_Click()de(1)="B"cj(1)=2EndSubPrivate

6、SubCommandButton3_Click()de(1)="C"cj(1)=0EndSubPrivateSubCommandButton4_Click()de(1)="D"cj(1)=0EndSub其中de(1)用于记录第1题答案，cj(1)用于记录第一题得分。de(1)="B"、cj(1)=2表示答案B是正确的，其它cj(1)=0表示答案是错误的。第2、3、……题等分别把代码中的1改为2、3、……等。第1题代码在slide1的代码窗口中写，第2题代码在slide2的代码窗口中写，其它依次类推。四、建立第二张幻灯片，输入第2题，除了没有“输入姓名”按钮外，其它与第1张幻

7、灯片相同，代码在slide2的代码窗口中写，依次类推，其它各题幻灯片都可以这样制作。最后一张幻灯片要增加“交卷”按钮。五、制作交卷按钮在最后一题的幻灯片中加入一个“交卷”按钮。双击这个按钮，输入代码如下：PrivateSubCommandButton5_Click()Dimi,j,sAsIntegers=0Fori=1To50s=s+cj(i)NextiotherstaffoftheCentre.Duringthewar,ZhuwastransferredbacktoJiangxi,andDirectorofthe