首页 理论教育制作交互填空题的方法

制作交互填空题的方法

【摘要】:文本框控件在Visual Basic应用程序中,通常被用来显示用户输入的显示,作为接收用户输入的数据,或者在设置或运行时为控件的text属性赋值,作为信息输出容器。步骤1在“幻灯片”窗格中选中练习题幻灯片也就是第27张幻灯片。默认值是False,此时文本框中只能输入一行文本。再利用相同方法完成第三题填空题。

文本框控件在Visual Basic应用程序中,通常被用来显示用户输入的显示,作为接收用户输入的数据,或者在设置或运行时为控件的text属性赋值,作为信息输出容器

步骤1 在“幻灯片”窗格中选中练习题幻灯片也就是第27张幻灯片。

步骤2 单击“插入”选项卡“文本”组中的“文本框”按钮,在展开的形状类别中选择“横排文本框”工具,在幻灯片中创建一个文本框,为其输入以下内容。

一、我会拼,我会写。

qū xiàng bái máo  yǒng é  hóng sè  xiàng shàng

(  )  (  )   (  )   (   )  (   )

二、我是公正的小法官。(在对的下面打“√”)

曲子(  )    弯曲(  )

绿水(  )    波浪(  )

咏鹅(  )    红色(  )

三、火眼金睛,辨字组词。

曲(  )    红(  )

歌(  )    白(  )

【提示】拼音带声调部分字母用软键盘中的“拼音字母”来帮助输入。输入带声调的拼音字母后要关闭软件盘,可以输入其他字母。

步骤3 单击左上角上的“自定义快速访问工具栏”按钮“”,在弹出来的快捷菜单选择“其他命令……”,如图5-18所示。

图5-18 自定义快速访问工具栏

在弹出的“Power Point选项”对话框中选择“自定义功能区”,在右边开发工具前面的复选框打勾,如图5-19所示。

图5-19 自定义功能区

切换到“开发工具”选项卡,在“控件组”中选择“文本框”控件按钮,如图5-20所示,在第一题拼音下方空白括号里按住鼠标左键拖出一个文本框控件,保持其被选中状态,单击“控件”组中的“属性”按钮,弹出属性对话框,在属性对话框的名称输入“曲项”,如图5-21所示。

图5-20 控件设置

图5-21 控件属性设置

复制出另外五个文本框控件,分别修改文本框控件名称为“白毛”“咏鹅”“红色”“向上”。

双击名称为“曲项”文本框控件,在弹出的代码对话框中输入如下内容:

Private Sub曲项_Change()

If曲项.Text="曲项"Then

MsgBox"答对了,太棒了!"

Else

MsgBox"很遗憾!加油!"

End If(www.chuimin.cn)

End Sub

同样双击其他五个文本框控件,分别输入以下内容:

Private Sub白毛_Change()

If白毛.Text="白毛"Then

MsgBox"答对了,太棒了!"

Else

MsgBox"很遗憾!加油!"

End If

End Sub

MsgBox"很遗憾!加油!"

End If

End Sub

Private Sub红色_Change()

If红色.Text="红色"Then

MsgBox"答对了,太棒了!"

Else

MsgBox"很遗憾!加油!"

End If

End Sub

Private Sub向上_Change()

If向上.Text="向上"Then

MsgBox"答对了,太棒了!"

Else

MsgBox"很遗憾!加油!"

End If

End Sub

放映幻灯片,在文本框中输入正确答案是将弹出消息框函数MsgBox反馈“答对了,太棒了!”否则就是“很遗憾!加油!”

Text属性:该属性是文本框控件重要属性之一,text属性的内容就是文本框控件显示的内容。

Locked属性:是布尔类型。用于设置是否可以编辑文本框Text属性的内容,默认值是False,此时文本框的内容可以编辑。当设置该属性为True时,文本框Text属性变为只读,TextBox中的文本只能被访问,不能被编辑。属性False时能通过键盘修改文本框的Text属性内容。

Multiline属性:是布尔类型,用于设置文本框中是否可以输入多行文本。默认值是False,此时文本框中只能输入一行文本。当设置该属性为True时,文本框可以输入多行文本。

再利用相同方法完成第三题填空题。