在Word文字处理软件的界面上,单击工具栏上的按钮的作用是(15),单击工具栏上的按钮的作用是(16)。
(53)
A.设定文本背景
B.画图
C.应用一些基本的图文格式
D.设置文本特效
A.当文本设置为一些特别的字体时,要考虑教学软件未来的运行平台是否提供相应的字库
B.文字的选择不能和整个界面的风格相脱离,字体与所表达的内容要有暗合点,起到相辅相成的作用
C.在多媒体课件中,文字与背景没有多大关系,可以随意的搭配使用
D.文字的编排非常重要,如果教学内容文字排列不当,不仅会影响界面本身的美感,而且不利于学习者进行有效的阅读,难以产生良好的教学效果
用Word软件录入以下内容,按题目要求完成后,用Word的保存功能直接存盘。
1949年12月2日,中央人民政府委员会第四次会议接受全国政协的建议,通过了《关于中华人民共和国国庆日的决议》,决定每年10月1日,即中华人民共和国宣告成立的伟大日子,为中华人民共和国国庆日。
国庆纪念日是近代民族国家的一种特征,是伴随着近代民族国家的出现而出现的,并且变得尤为重要。它成为一个独立国家的标志,反映这个国家的国体和政体。
国庆这种特殊纪念方式一旦成为新的、全民性的节日形式,便承载了反映这个国家、民族的凝聚力的功能。同时国庆日上的大规模庆典活动,也是政府动员与号召力的具体体现。显示力量、增强国民信心,体现凝聚力,发挥号召力,即为国庆庆典的三个基本特征。
要求:
1.录入文字内容,并将文字字体设置为宋体,字号设置为五号。
2.设置每行为37个字符,段后间距为0.5行,字符间距为加宽、0.1磅。
3.将录入的内容分为3栏,栏间设置分隔线。
4.为10月1日添加灰色-20%底纹、红色双下划线和乌龙绞柱动画效果。
5.为文档添加水印,水印文本为“国庆纪念日”并将文本设置为宋体、红色(半透明)、水平输出。
A.“编辑”菜单中的
B.“工具”菜单中的
C.“文件”菜单中的
D.“视图”菜单的“页眉和页脚”工具栏中的
A.输入文本内容到达屏幕右边界时,只有按回车键才能换行
B.Word文本行的宽度与页面设置有关
C.在Word中文本行的宽度就是显示器的宽度
D.Word文本行的宽度用户无法控制
阅读以下说明及Visual Basic代码,将应填入(n)处的字句写在对应栏内。
[说明]
下图是一个简易文本编辑器程序的运行界面:
用户打开磁盘上的某个文件后,可以直接对文本进行编辑,也可以利用界面提供的按钮完成相应操作。主要操作介绍如下:
(1)打开文件:打开文件对话框,其中仅显示“*.txt”类型的文件。用户选中某一文件后,其内容将呈现于界面文本框内;
(2)查找:提示用户输入要查找的内容,将首次出现的查找内容以蓝色高亮标记;
(3)替换:若文本框中已选中某段文本,则提示用户输入要替换的内容,在文本框中完成替换。
在开发过程中,文本框名为Text1,“打开文件”、“保存文件”、“查找”、“替换”、“退出”按钮分别命名为Command1至Command5。
[Visual Basic代码]
Dim fileName As String
Dim fso As New (1), ts As Object
’打开文本文件
Private Sub Command1_Click()
CommonDialog1.Filter = "*.txt"
CommonDialog1.ShowOpen
fileName =(2) ’保存所打开的文件名
Set fso=CreateObjeet("Scripting.FileSystemObject")
Set ts=fso.OpenTextFile(fileName, ForReading)
If Not ts.AtEndOfStream Then
Text1.Text =(3)
End If
ts. Close
End Sub
’保存文本文件
Private Sub Command2_Click()
Set ts = fso.OpenTextFile(fileName, ForWriting)
(4)
ts.Close
End Sub
’查找字符串
Private Sub Command3_Cliek()
Dim search As String, position As Integer
search = InputBox("输入要查找的字符串:")
position = InStr(Text1.Text, search) ’在文本中查找字符串
If position >0 Then ’若找到指定的字符串
Text1.SelStart = position - 1 ’设置选定文本的起始位置
Text1.SelLength = Len(search) ’设置选定文本的长度
Else
MsgBox "没有发现要查找的字符串"
End If
End Sub
’替换选中的字符串
Private Sub Command4_Click()
Dim object As String
If (5) >0 Then ’若已经选中了要替换的文本
object = InputBox("输入要替换的字符串:")
Text1.SelText = object ’替换文本
Else
MsgBox "请先选中要替换的文本!"
End If
End Sub
’退出程序
Private Sub Command5_Click()
End
End Sub