用VB如何在WORD指定位置上插入文字
在VB6.0中，操作word，使用它强大的查找、替换、删除、复制、翦切功能。还可以把特定字符替换成图片。有了它你就可以使用数据库中的内容或图片文件替换word文件中的特定字符。
只要把下列内容复制到写字板中，另存为SetWord.cls文件，然后在把它添加到工程中，就可以使用了。
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB_Name = "SetWord"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Private mywdapp As Word.Application
Private mysel As Object
'属性值的模块变量
Private C_TemplateDoc As String
Private C_newDoc As String
Private C_PicFile As String
Private C_ErrMsg As Integer
Public Event HaveError()
Attribute HaveError.VB_Description = "出错时激发此事件.出错代码为ErrMsg属性"
'*************************************************** ************
'ErrMsg代码：1－word没有安装2 - 缺少参数3 - 没权限写文件
' 4 - 文件不存在
'
'*************************************************** ************
Public Function ReplacePic(FindStr As String, Optional Time
As Integer = 0) As Integer
Attribute ReplacePic.VB_Description = "查找FindStr,并替换为PicFile所指向的图片文件,替换次数由time参数确定,为0时，替换所有"
'*************************************************** *****************************
' 从Word.Range对象mysel中查找所有FindStr，并替换为PicFile图像
' 替换次数由time参数确定，为0时，替换所有
'*************************************************** *****************************
If Len(C_PicFile) = 0 Then
C_ErrMsg = 2
Exit Function
End If
Dim i As Integer
Dim findtxt As Boolean
mysel.Find.ClearFormatting
mysel.Find.Replacement.ClearFormatting With mysel.Find
.Text = FindStr
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
mysel.HomeKey Unit:=wdStory
findtxt = mysel.Find.Execute(Replace:=True) If Not findtxt Then
ReplacePic = 0
Exit Function
End If
i = 1
Do While findtxt
mysel.InlineShapes.AddPicture FileName:=C_PicFile
If i = Time Then Exit Do
i = i + 1
mysel.HomeKey Unit:=wdStory
findtxt = mysel.Find.Execute(Replace:=True)
Loop
ReplacePic = i
End Function
Public Function FindThis(FindStr As String) As Boolean Attribute FindThis.VB_Description = "查找FindStr,如果模板中有FindStr则返回True"
If Len(FindStr) = 0 Then
C_ErrMsg = 2
Exit Function
End If
mysel.Find.ClearFormatting
mysel.Find.Replacement.ClearFormatting
With mysel.Find
.Text = FindStr
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
mysel.HomeKey Unit:=wdStory
FindThis = mysel.Find.Execute
End Function
Public Function ReplaceChar(FindStr As String, RepStr As String, Optional Time As Integer = 0) As Integer
Attribute ReplaceChar.VB_Description = "查找FindStr,并替换为RepStr,替换次数由time参数确定,为0时，替换所有"
'*************************************************** *****************************
' 从Word.Range对象mysel中查找FindStr，并替换为RepStr ' 替换次数由time参数确定，为0时，替换所有
'*************************************************** *****************************
Dim findtxt As Boolean
If Len(FindStr) = 0 Then
C_ErrMsg = 2
RaiseEvent HaveError
Exit Function
End If
mysel.Find.ClearFormatting
mysel.Find.Replacement.ClearFormatting
With mysel.Find
.Text = FindStr
.Replacement.Text = RepStr
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
If Time > 0 Then
For i = 1 To Time
mysel.HomeKey Unit:=wdStory
findtxt = mysel.Find.Execute(Replace:=wdReplaceOne) If Not findtxt Then Exit For
Next
If i = 1 And Not findtxt Then
ReplaceChar = 0
Else
ReplaceChar = i
End If
Else
mysel.Find.Execute Replace:=wdReplaceAll
End If
End Function
Public Function GetPic(PicData() As Byte, FileName As String) As Boolean
Attribute GetPic.VB_Description = "把图像数据PicData,存为PicFile指定的文件"
'*************************************************** *****************************
' 把图像数据PicData,存为PicFile指定的文件
'*************************************************** *****************************
On Error Resume Next
If Len(FileName) = 0 Then
C_ErrMsg = 2
RaiseEvent HaveError
Exit Function
End If
Open FileName For Binary As #1
If Err.Number <> 0 Then
C_ErrMsg = 3
Exit Function
End If
'二进制文件用Get,Put存放，读取数据
Put #1, , PicData
Close #1
C_PicFile = FileName
GetPic = True
End Function
Public Sub DeleteToEnd()
Attribute DeleteToEnd.VB_Description = "删除从当前位置到结尾的所有内容"
mysel.EndKey Unit:=wdStory, Extend:=wdExtend
mysel.Delete Unit:=wdCharacter, Count:=1
End Sub
Public Sub MoveEnd()
Attribute MoveEnd.VB_Description = "光标移动到文档结尾" '光标移动到文档结尾
mysel.EndKey Unit:=wdStory
End Sub
Public Sub GotoLine(LineTime As Integer)
mysel.GoTo What:=wdGoToLine, Which:=wdGoToFirst, Count:=LineTime, Name:=""
End Sub
Public Sub OpenDoc(view As Boolean)
Attribute OpenDoc.VB_Description = "打开Word文件,View确定是否显示Word界面"
On Error Resume Next
'*************************************************** *****************************
' 打开Word文件，并给全局变量mysel赋值
'*************************************************** *****************************
If Len(C_TemplateDoc) = 0 Then
mywdapp.Documents.Add
Else
mywdapp.Documents.Open (C_TemplateDoc)
End If
If Err.Number <> 0 Then
C_ErrMsg = 4
RaiseEvent HaveError
Exit Sub
End If
mywdapp.Visible = view
mywdapp.Activate
Set mysel = mywdapp.Application.Selection
'mysel.Select
End Sub
Public Sub OpenWord()
On Error Resume Next
'*************************************************** *****************************
' 打开Word程序，并给全局变量mywdapp赋值
'*************************************************** *****************************
Set mywdapp = CreateObject("word.application")
If Err.Number <> 0 Then
C_ErrMsg = 1
RaiseEvent HaveError
Exit Sub
End If
End Sub
Public Sub ViewDoc()
Attribute ViewDoc.VB_Description = "显示Word程序界面" mywdapp.Visible = True
End Sub
Public Sub AddNewPage()
Attribute AddNewPage.VB_Description = "插入分页符" mysel.InsertBreak Type:=wdPageBreak
End Sub
Public Sub WordCut()
Attribute WordCut.VB_Description = "剪切模板所有内容到剪切板"
'保存模板页面内容
mysel.WholeStory
mysel.Cut
mysel.HomeKey Unit:=wdStory
End Sub
Public Sub WordCopy()
Attribute WordCopy.VB_Description = "拷贝模板所有内容到剪切板"
mysel.WholeStory
mysel.Copy
mysel.HomeKey Unit:=wdStory
End Sub
Public Sub WordDel()
mysel.WholeStory
mysel.Delete
mysel.HomeKey Unit:=wdStory
End Sub
Public Sub WordPaste()
Attribute WordPaste.VB_Description = "拷贝剪切板内容到当前位置"
'插入模块内容
mysel.Paste
End Sub
Public Sub CloseDoc()
Attribute CloseDoc.VB_Description = "关闭Word文件模板" '*************************************************** *****************************
' 关闭Word文件模本
'*************************************************** *****************************
On Error Resume Next
mywdapp.ActiveDocument.Close False
If Err.Number <> 0 Then
C_ErrMsg = 3
Exit Sub
End If
End Sub
Public Sub QuitWord()
'*************************************************** *****************************
' 关闭Word程序
'*************************************************** *****************************
On Error Resume Next
mywdapp.Quit
If Err.Number <> 0 Then
C_ErrMsg = 3
Exit Sub
End If
End Sub
Public Sub SavetoDoc()
Attribute SavetoDoc.VB_Description = "保存当前文档为
FileName指定文件"
On Error Resume Next
'并另存为文件FileName
If Len(C_newDoc) = 0 Then
C_ErrMsg = 2
RaiseEvent HaveError
Exit Sub
End If
mywdapp.ActiveDocument.SaveAs (C_newDoc)
If Err.Number <> 0 Then
C_ErrMsg = 3
RaiseEvent HaveError
Exit Sub
End If
End Sub
Public Property Get TemplateDoc() As String
Attribute TemplateDoc.VB_Description = "模板文件名." TemplateDoc = C_TemplateDoc
End Property
Public Property Let TemplateDoc(ByVal vNewValue As String) C_TemplateDoc = vNewValue
End Property
Public Property Get newdoc() As String
Attribute newdoc.VB_Description = "执行CloseDoc方法时，将模板文件另存为此文件名指定的新文件.如果不指定，在执行CloseDoc方法时，将产生一个错误"
newdoc = C_newDoc
End Property
Public Property Let newdoc(ByVal vNewValue As String)
C_newDoc = vNewValue
End Property
Public Property Get PicFile() As String
Attribute PicFile.VB_Description = "图像文件名"
PicFile = C_PicFile
End Property
Public Property Let PicFile(ByVal vNewValue As String)
C_PicFile = vNewValue
End Property
Public Property Get ErrMsg() As Integer
Attribute ErrMsg.VB_Description = "错误信息.ErrMsg代码: 1-word没有安装2-缺少参数3-没权限写文件4-文件不存在"
ErrMsg = C_ErrMsg
End Property
《插入艺术字》教学设计 安徽省舒城县春秋中心学校徐平平 教学目标： （1）知识目标：掌握插入艺术字的方法，学会插入艺术字，并能对其进行简单调整，能简单运用艺术字的设置方法设 计个性作品。 （2）能力目标：通过学生的尝试操作，提高自主探索的学习能力， 培养学生审美情趣和语言表达能力。 （3）发展目标：发展个人爱好，增进与他人的交往合作，激发学生 的学习兴趣。 教学重点、难点： 掌握插入艺术字的方法，能对艺术字进行简单调整。 内容分析： 对于七年级学生来说，插入艺术字，是比较简单的。但对于艺术字的属性调整，却比较难掌握。艺术字的学习对以后进行图片、自选图形的学习有很大借鉴作用。对于学习艺术字，我准备分三步来完成： （1）第一步是如何插入艺术字； （2）第二步是对艺术字的位置、大小、颜色、形状等方面的调整；（3）第三步使用艺术字为电脑小报设计刊头和版块标题。
教学准备： 1、多媒体网络教室 2、学习环境（多媒体课件） 教学过程 一、引言 1、[教师]同学们，你们平时喜欢看报纸吗？经常看哪些报纸呢？ （茂名日报，南方日报等） [教师]课件展示几份电脑小报，比起同学们平时看的报纸它们有什么不同？ （漂亮，彩色的，形式活泼等） [教师]通过同学们今后的学习，也能做出这样漂亮的电脑小报，你们想做吗？ [教师]课件展示一份电脑小报的刊头和版块标题，今天我们就来学习电脑小报刊头和版快标题的做法。 2、课件出示课题：插入艺术字。 意图： 通过展示报纸的刊头和版块标题引出课题，起到欣赏和示例的作用。通过欣赏新的艺术字作品引出任务目标，激发学生探索欲望，从而使之在完成任务的过程中更为主动地获得知识，提高能力，实现学习目标。
第二章第六节为日记做个标题 ——在文档中插入艺术字 实验中学王晓艳 学习目标：: (1)掌握插入艺术字的方法 (2)掌握艺术字的编辑和修改（调整）的方法 (3)会利用所学制作有“艺术”的电子小报 学习重点: 插入艺术字的方法的掌握 学习难点： 学会调整艺术字 教学方法： 自主探究、小组合作 课前准备： Word2003文档的艺术字作品、Word2003文档《秋土》 教学过程: 一、设置情景 前面我们已经学习了设置文字的字体，字号以及颜色等美化文字的方法。今天我们还要来学习一种使文字更加漂亮的方法。我们先来看一幅作品: (展示艺术字作品) 同学们看这作品里面的字漂亮不漂亮？你们想不想学？那么它们是怎么做出来的呢？下面就请同学们跟我一起来学习“插入艺术字”。 二、自主探究 任务1、打开WORD文档，找到插入艺术字的方法 1）学生独立自学完成 2）分5小组分别抽查5-8人展示 3）全班讨论展示的方法的可行性，展开质疑与纠错 三、小组合作（一）
任务2、接收WORD文档《秋土》并打开给文档添加艺术字标题：秋土 1）分5小组分别完成，要求： A、1行2列32号黑体 B、2行3列40号隶书 C、3行4列38号楷体…… 2）小组自由交流，讨论完成 3）先完成的同学组内巡查 4）兵教兵的过程，使全员参与并掌握其方法 5）各小组推荐1-2名同学展示 6）评价展示过程与结果 四、小组合作（二） 任务3、讲《秋土》文档末尾的“摘自刘增山秋魂”艺术字调整为和标题同样格式的艺术字 1）小组自由交流，讨论完成 2）先完成的同学组内巡查 3）兵教兵的过程，使全员参与并掌握其方法 4）各小组推荐1-2名同学展示 5）评价展示过程与结果 五、学生交流、并评价本节课所学到的知识 六、课程巩固 练习：利用所学以及网络资源制作“家乡美”电子小报。 七、教学设计意图及评价: 本课的意图是让学生在练习中掌握插入艺术字的方法，大部分学生都能掌握，在对掌握较慢学生的辅导上还需改进，让他们能够掌握插入的方法。对掌握较快的同学可以让他们当小老师，辅导帮助其他同学，同时落实自主学习、小组合作探究的教学方法与过程。让更多的学生自主参与学习并展示自己的成果。教学效果会很好。
如何在word中添加水印 点击菜单栏的“格式”——“背景”——“水印”，弹出“水印”设置窗口，先选择水印类型：图片水印或文字水印。如果选择图片水印，可以从硬盘中选择一张图片作为水印，并可设置图片的缩放和冲蚀。如果选择文字水印，可以自己输入作为水印的文字，并设置其字体、尺寸、颜色等。
一.为某一页插入单独的水印 水印其实就是把图片或艺术字衬于文字之下，并设置其颜色使其看来像水印。请看下面的操作： 1.插入图片或艺术字。点击菜单栏的“插入”——“图片”，如果是制作图片水印，请选择“来自文件”或“剪贴画”等，如果是文字水印，请选择“艺术字”。 2.将已插入的图片或艺术字设置为“衬于文字之下”。右单击图片或艺术字，选择发“设置图片格式”或“设置艺术字格式”，在打开的窗口中点击“版式”，在环绕方式中选择“衬于文字之下”。
3.设置图片或艺术字的颜色。 如果是图片，请右单击图片并选择“设置图片格式”，在打开的“设置图片格式”中点击第四个选项卡“图片”，在“图像设置”的“颜色”选择框中选择“冲蚀”，然后设置恰当的亮度。 如果是艺术字，请右单击艺术字并选择“设置艺术字格式”，在打开的“设置艺术字格式”中点击第一个选项卡“颜色与线条”，在“填充”下设置颜色为“灰-25%”，在“线条”下也设置颜色为“灰-25%”，再设置恰当的透明度。 这样就完成了单独页面的水印设置。由于是在正文中制作的水印，进行修改时无需进入页眉和页脚的编辑即可修改。 二.打印水印 在“打印预览”中是可以看到水印的，但在默认情况下word将不打印水印。请点击“文件”——“打印”，点击弹出的“打印”窗口的左下角“选项”，在打开的“选项”窗口中的“打印文档的附加信息”下勾选“背景色和图像”。 插入水印后，在页面上端出现“页眉”栏——点击页眉——再点水印——水印四周出现八个白色圆点——复制粘贴——出现新水印——再移动水印——最后点击水印外页面就行。（要多少水印粘贴多少；出现的绿色圆点还可以调整角度）
如何在word中添加水印 一.全篇水印 点击菜单栏的“格式”——“背景”——“水印”，弹出“水印”设置窗口，先选择水印类型：图片水印或文字水印。如果选择图片水印，可以从硬盘中选择一张图片作为水印，并可设置图片的缩放和冲蚀。如果选择文字水印，可以自己输入作为水印的文字，并设置其字体、尺寸、颜色等。
二.为某一页插入单独的水印 水印其实就是把图片或艺术字衬于文字之下，并设置其颜色使其看来像水印。请看下面的操作： 1.插入图片或艺术字。点击菜单栏的“插入”——“图片”，如果是制作图片水印，请选择“来自文件”或“剪贴画”等，如果是文字水印，请选择“艺术字”。 2.将已插入的图片或艺术字设置为“衬于文字之下”。右单击图片或艺术字，选择发“设置图片格式”或“设置艺术字格式”，在打开的窗口中点击“版式”，在环绕方式中选择“衬于文字之下”。
3.设置图片或艺术字的颜色。 如果是图片，请右单击图片并选择“设置图片格式”，在打开的“设置图片格式”中点击第四个选项卡“图片”，在“图像设置”的“颜色”选择框中选择“冲蚀”，然后设置恰当的亮度。 如果是艺术字，请右单击艺术字并选择“设置艺术字格式”，在打开的“设置艺术字格式”中点击第一个选项卡“颜色与线条”，在“填充”下设置颜色为“灰-25%”，在“线条”下也设置颜色为“灰-25%”，再设置恰当的透明度。 这样就完成了单独页面的水印设置。由于是在正文中制作的水印，进行修改时无需进入页眉和页脚的编辑即可修改。 三.打印水印 在“打印预览”中是可以看到水印的，但在默认情况下word将不打印水印。请点击“文件”——“打印”，点击弹出的“打印”窗口的左下角“选项”，在打开的“选项”窗口中的“打印文档的附加信息”下勾选“背景色和图像”。 插入水印后，在页面上端出现“页眉”栏——点击页眉——再点水印——水印四周出现八个白色圆点——复制粘贴——出现新水印——再移动水印——最后点击水印外页面就行。（要多少水印粘贴多少；出现的绿色圆点还可以调整角度） 2015.2.10
Word图文混排实例之艺术字效果“福到了” 在撰写教案或论文时，经常要遇到图文混排，即文本框和自选图形的混排，但有时文本框却无法实现某些特殊功能，比如说倒写的红“福”字通过文本框就无法实现，在这种情况下， 通过插入艺术字就很容易实现。具体操作步骤如下： 1. 单击“视图”菜单，选中“工具栏”，再选中级联菜单中的“绘图”命令，启动“绘图”工具栏。 2. 单击“自选图形”下的“基本形状”命令，选中第四个图形，菱形。 3. 设置插入点，单击鼠标左键，出现一规则菱形。 4. 设置自选图形格式，填充为红色，无线条色。 5. 设置插入点，单击“插入”下的图片命令，选择“艺术字”。选择第一种艺术字式样， 单击[确定]。 6. 弹出“编辑艺术字文字”对话框，输入“福”字，并设置字型为“华文行楷”，字号 “48”，填充为“黑色”。 7. 选中“福”字，单击“绘图”选择“旋转或翻转”命令，做两次左转。 8. 将图2和图4进行组合。选中图2，按住[Shift]键不放，再选择图4，此时两张图片同时被选中，选择“绘图”菜单，点击[组合]命令。 9. 最后，将“福”字与自选图形格式对齐。首先选中图形，再选择“绘图”菜单，点击[对齐或分布]命令，选中水平居中和垂直居中。这样“倒福字”图片就制作成功了。 小编也借这个喜气洋洋的“福”字祝全国的读者朋友，新年快乐！万事如意！ WORD 2000 图文混排 （根据陆爱玉老师课堂教学实况整理）
朱瑞明 师：OFFICE 2000提供了一个剪辑库，包含了大量的图片。 （屏显：叠现剪贴画） （屏显：“神舟五号”、杨利伟图片） 师：如果把这些图片插入到文档中去，文档一定会变得更加活泼、漂亮、形象，也更有利于文章内容的表达。那么，怎样才能够把这些图片插入到文档中去呢？今天，我们就来学习这一种操作技术——WORD 2000 图文混排。 （屏显：WORD 2000 图文混排） 师：图片有两种：一是剪贴画，来源于“剪贴画”；另一种是文件图形，来源于“图形文件”。 （屏显：图片来源剪贴画图形文件） 师：先来看插入剪贴画。 （屏显：插入剪贴画） 师：操作指导（教师边讲解，边在“参考文档.DOC”中演示）。 光标定位（将光标移动到需要插入剪贴画的位置）—→菜单“插入”—→“图片”—→“剪贴画”—→在打开的对话框中，单击“图片”选项卡—→选择所 需的剪贴画—→右击“插入”按钮。 如果觉得这图片也太大了一点吧？不雅观，不好看，是不是可以把图片变小点？那太容易啦。 教师边讲解，边演示：改变图片大小；同时提醒学生注意：拖动不同的控点，可进行不同的缩放，注意观察拖放不同控点的不同效果。 学生练习 在“练习文档一.doc”的第二段中插入一副剪贴画，内容自选，大小自调。 （教师巡视，个别指导，发现共性问题，面上指导。） （教师根据实情简要评点。） 师：（承转）我们已经学会了“剪贴画”的插入方法，“剪贴画”，顾名思义就是把画剪下来再贴上去，只要找到“剪贴画”的来源，操作起来就不太困难了吧？ 但是在“剪贴画”中找不到“神舟五号”、“中国首位航天员杨利伟”呀。那是因为这不是“剪贴画”，而是文件图形，来源不同，需要在“图形文件”中寻找。 （屏显：插入图形文件） 师：WORD 2000支持.bmp、.wmf 、.tif 、.pic、 .jpg 、.gif等图形文件。 师：操作指导（教师边讲解，边演示：在“参考文档.doc”第一段的段首插入“中国首位航天员杨利伟”）。 光标定位—→菜单“插入”—→“图片”—→“来自文件”，—→在“插入图片”对话框中，选择图形文件所在的文件夹—→在“文件名”列表中选择要插 入的图形文件—→单击“插入”按钮。 学生练习（要求自定大小）
《WORD中插入艺术字》探究型教案 松原市宁江区建设小学高洪侠 教学目标 1、知识与技能目标：掌握插入艺术字的方法以，学会插入艺字，并能对其进行简单调整，能简单运用艺术字设置方法设计个性作品。 2、过程与方法目标：以学生自主学生为主，小组研究为辅，共同完成学习任务。 3、情感与态度目标：发展个人爱好，激发学生的学习兴趣。通过学生的尝试操作，提高自主探索的学习能力，培养学生审美情趣和语言表达能力。 教学重点：插入艺术字的方法 教学难点：艺术修饰美化 教学准备：网络教室范例贺卡 教学过程： 一、创设情境，引入新知 师：同学们你们好！你们知道1月1日是什么日子吗？ 生：元旦。 师：请同学们读一读贺卡中的祝福，小组内之间互相观察一下，看看贺卡里有什么内容。 （学生讨论观察） 师：如果我们运用WORD软件，可以用哪些制作方法来完成贺卡？ 生：插入剪贴画、艺术字，自选图形等方法制作贺卡。 师：我们选择的图片要与主题有关，文字都是祝福的话，心中最想表达的语言，色彩和形状也要搭配合理。这些都是我们制作一张好的贺卡的必要条件。 二、明确任务，创新设计 师：今天我们就来运用WORD制作贺卡，同时要进行一次比赛，通过比赛的方式评出节课的优秀作品。在制作之前请你说说自己的制作想法。 师：请同学们来看看，老师制作的几张贺卡，有的是纵向，有的是横向的，首先我们要对贺卡的页面进行设置。 师：（演示并讲解）单击文件菜单选择页面设置，在页面设置对话框的页边距选项中选择纵向或横向，单击确定。请同学把自己贺卡页面设置好。（学生上机操作） 师：现在我们开始制作元旦贺卡了，你可以用学过的知识在文中插入剪贴画及艺术字来美化你的贺卡。（复习插入剪贴画的方法，生演示、练习） （学生遇到问题，如何移动图片、艺术字） 师：谁能帮助这位同学来解决问师呢？ （生答演示） （强调图片设置环绕方式，衬于文字上方） 师：在贺卡中我们还要添加一些祝福的语言，同学们互相讨论一下祝福语言。 （生讨论）请同学说一说。 师：老师听到你们的温暖祝福，都被深深的感动了，快把你们的祝福加到贺卡当中吧。 （学生操作在贺卡中插入艺术字） 师：我发现一个同学制作的背景颜色和其他同学不一样，（出示两张贺卡，一个有背景，一个没有背景）说说制作方法。（教师演示在格式中设置背景） 生：也可以利用我们以前学习过的自选图形来设置背景。（边讲边演示） 师：在我们插入自选图形时，要注意图形的格式，设置衬于文字下方。 师：我们知道贺卡不仅要图文并茂，而且要布局要合理。图片与文字的色彩要协调一致，才能充分表达我们的主题。接下来同学适当调整图片、艺术字位置，并加以修饰。（生练习制作） 三、拓展知识，动作实践
在WORD中插入艺术字教学设计
在WORD中插入艺术字教学设计 我的教师生涯2009-12-23 12:28:33 阅读523 评论0 字号：大中小 课题 电脑的本领与家史 课型 新授 本课题教时数:1 本教时为第 1 教时备课日期: 教学 设想 学会使用创作艺术字工具,尝试创作艺术字. 教学 目标 了解人类获取信息的途径及信息技术在当今社会的作用. 了解电脑在信息时代的作用. 了解电脑的发展史. 教学 重点 难点 对策 重点:认识艺术字工具中各类工具的用法. 难点:认识艺术字工具中各类工具的用法. 对策:多操作,多运用,多讨论. 教学过程设计 教学内容 教师活动 学生活动 备注 一,导入 (约3分钟) 二,教学新课 (约10分钟) 同学们经过对WPS一段时间的学习后已经对汉字的输入和排版都有了一定的认识运用,那么同学们觉得这样一篇只是做了输入和排版的文章会单调吗这里有一篇文章我们来看看,然后同学们打开书本39和40页,同学们来比较一下这几篇文章有什么区别提问:同学们看过以后感觉怎样同学们都非常好,但我们学习一定要循序渐进,那么我们今天首先来学一学怎样美化标题同学们看过书本的两个标题,老师这里也做好了几个标题,同学们看一看.感觉怎样我们把这些字叫艺术字.同学们想知道它的什么吗好,下面同学们就来学习怎样设计艺术字标题 启动"金山艺术汉字2.0" 要使用"金山艺术汉字2.0",首先用鼠标单击菜单中的"插入",移动到"OLE对象"一栏打开"插入对象"对话窗口. 提问
同学们经过练习后对艺术字的创造基本认识,这是老师的作品怎么样有什么想修改的地方那么同学们想对自己的作品做更好的美好吗同学们在刚才的创造过程中只是用了一个向导工具有没有发现还剩7个工具没用这些工具都是用来修改艺术字的;老师有一个忙想同学们帮一下,就是这7个工具分别有什么用途;下面老师把同学们分成7个小组分别看看这7个工具各有什么用途.然后推荐一位同学讲出它的用途. 这节课学习了什么内容同学们又知道它一般会用在那里同学们发现这同样的艺术字工具条在那见过吗区别要同学们自己去发现喽!最后同学们把自己的作品保存到f盘上 下课 学生讲出创造艺术字的过程 学生操作练习,个别学生讲出作品创造的过程 学生讲出作品的不足, 学生分组练习,得出结果,进行作品的修改 学生回答7个工具的作用 学生口述 根据回答板书出艺术字创造的步骤 边观察边辅导学生边评价展示作品让学生相互学习 出示教师作品让学生评价,引导学生更上一层楼的求知欲 教学过程设计 教学内容 教师活动 学生活动 备注 板书设计 启动:插入→(OLE)对象→金山艺术字2.0→确定→向导(导引) →选择字体(字库路径) →输入汉字(ctrl+空格或在任务栏选)→选择外形→版面设置→边线和阴影→前景设置→背景设置 艺术字工具: 教后评价 流程图 开始上课 打开wps 多介绍艺术字创造 多工具箱简介 多创作艺术字 评价作品 分组学习 保存作品 结束 保护蓝色海洋 21世纪被誉为是"海洋的世纪".海洋是人类生命的摇篮,环境的调节器,并蕴藏着极其丰富的生物,矿物,化学,动力,热能和空间等资源.它能给人类提供的食物相当于全球农作物产量的1000倍!然而,在海洋开发意识觉醒的同时,
在WORD文档中插入艺术字 请同学们打开文章“泰山简介”，并按下列6个要求进行操作练习： 1、将标题?泰山简介?设置为?华文中宋、二号字，字间距为加宽10磅，颜色为红色，并加粗、加双下划线，底纹设为‘灰色-15%’，居中显示?； 2、将正文内容设置为?华文细黑、11磅字?，并首行缩进2个字符，行距为?固定值20磅?，段前、段后均隔0. 5行的距离； 3、在文章标题?泰山简介?的旁边插入艺术字?气势磅礴的泰山?（在?艺术字库?对话框中选择第四行第一列作为艺术字的式样），将艺术字的形状改为?桥型?，并适当放大或缩小艺术字的大小； 4、在文章末尾插入?泰山旅游图?，并将它的文字环绕方式改为?四周型?，并居中显示； 5、在?泰山旅游图?的右边插入艺术字?泰山旅游地图?（在?艺术字库?对话框中选择第三行第六列作为艺术字的式样），将艺术字的形状改为?八边形?，将此艺术字的文字环绕方式改为?紧密型?，并适当放大或缩小艺术字的大小； 6、将修改后的文章保存在?我的文档?，名字取为?美化后的泰山?，并关闭窗口。
泰山简介 泰山古称岱山，又称岱宗。位于山东省中部，为中国五岳（泰山、华山、衡山、嵩山、恒山）之一。因地处东部，故称东岳。泰山总面积426平方公里，主峰玉皇顶海拔1532.8米，山势雄伟壮丽，气势磅礴，名胜古迹众多，有'五岳独尊'之誉。孔子有'登泰山而小天下'之语；唐大诗人杜甫有'会当凌绝顶，一览众山小'的佳句。泰山在人们的心目中，已成为伟大、崇高的象征。 泰山成山于太古代，距今有24亿多年。泰山是中国山岳公园之一，又是天然的历史、艺术博物馆。它不仅是国家重点风景名胜区，而且已被联合国确定为世界文化和自然遗产之一。山上名胜古迹众多，有古建筑群20多处，历史文化遗迹2000多处，还有大量历史名人赞颂泰山的石刻、碑记。从泰山脚下直上岱顶，共10多公里，有石级可登，沿途根据游览区的分布和山势，修建了茶亭、餐厅、宾馆等休息场所。 由于泰山的特殊地位，受到历代帝王的尊崇，把它当作江山永固的象征。历代文人在泰山上留下了上千处题咏石，成为中国历代书法艺术的珍贵遗产。同时，泰山又是佛、道两教重地，因而庙宇，名胜遍山。泰山不仅历史悠久，文化灿烂，地质历史也十分古老，科学研究表明，泰山具有极高历史文化价值，风格独特的美学价值和世界意义的地质科学价值。这三者融成了世界罕见的泰山风景名胜区。
在Word2010中设置艺术字文字环绕 因为艺术字具有图片和图形的很多属性，因此用户可以为艺术字设置文字环绕方式。默认情况下，Word2010中的艺术字文字环绕为“浮于文字上方”方式，用户可以重新设置其文字环绕方式，操作步骤如下所述： 第1步，打开Word2010文档窗口，选中需要设置文字环绕方式的艺术字。 第2步，在自动打开的“绘图工具/格式”功能区中，单击“排列”分组中的“位置”按钮，如图2011032501所示。 图2011032501 单击“位置”按钮 第3步，在打开的位置列表中，用户可以选择“嵌入文本行中”选项，使艺术字作为Word文档文本的一部分参与排版，也可以选择“文字环绕”分组中的一种环绕方式，使其作为一个独立的对象参与排版。本例选中“中间居中，四周型文字环绕”选项，使艺术字位于Word文档的正中间，并且被文字四周环绕，如图2011032502所示。
图2011032502 选中“中间居中，四周型文字环绕”选项 在位置列表中显示的文字环绕只有“嵌入型”和“四周型”两种方式，如果用户还有更高的版式要求，则可以在“位置”列表中单击“其他布局选项”命令，以进行更高级的设置，如图2011032503所示。
图2011032503 单击“其他布局选项”命令 打开“布局”对话框，切换到“文字环绕”选项卡。在“环绕方式”区域显示出“嵌入型”、“四周型”、“紧密性”、“穿越型”、“上下型”、“衬于文字下方”和“衬于文字上方” Word2010文档支持的几种环绕方式。其中“四周型”、“紧密性”、“穿越型”、“上下型”这四种环绕方式可以分别设置自动换行方式和与正文之间的距离。用户根据需要选择合适的文字环绕方式，并单击“确定”按钮即可，如图2011032504所示。
在 WORD 中,如何将文本框与图片组合到一起? 篇一：word 中,如何将多个图形组合 word 中如何将多个图形组合 龙山县第二小学：刘新民 一般情况下，Word 窗口并不出现“视图”工具栏，单击“视图－工具栏－绘图”，可以调出“视图”工具栏。 按住 Shift 键可以画正圆，正方形；单击“自选图形”边的下拉箭头，可以调出“箭头总汇”。选中正方形，单 击绘图工具栏的“线型”按钮，可以设置线的粗细。绘图的技能点有： （1）绘制图形 （2）给图形加文字 （3） 改变线形与箭头样式 （4）添加颜色 （5）阴影和三维效果 （6）图形叠放 （7）图形组合，这里有一段 过去编写的“图文混排”部分的培训教程，抄录下面供参考、练习。 Word 97 图文处理 1、使用“绘图”工具 栏，画一个圆。 ⑴ 单击“绘图”工具栏上的“椭圆”按钮。 ⑵ 按住 Shift 键，拖动鼠标在屏幕上画一个圆边 线。 2、用绿色填充所画的圆。 ⑴ 单击所绘的圆选定该图形，其四周出现带 8 个小控制块的控制框。 ⑵ 单击“绘图”工具栏上的“填充色”按钮，并在颜色块菜单中单击绿色块。 3、复制、移动、删除所画的圆。 ⑴ 复制：单击选定该图形；按住 Ctrl 键，拖动图形到目的位置，松开左键。 ⑵ 移动：单击选定该图形；拖 动图形到目的位置，松开左键。 ⑶ 删除：单击选定该图形；按下 Del 键。 4、插入一朵小花或其它图片； 调整图片的大小。 ⑴ 光标移到拟插入图片的位置。 ⑵ 单击“插入”——“图片”——“剪贴画”或“来自文件”。 ⑶ 找到“小花”，单击它。 ⑷ 单击“插入”按钮，如插入后的图片较大，需要进行缩放处理。 可以使用鼠标 拖动控点完成。 ⑸ 单击插入的“小花”图片，其四周出现带 8 个小控制块的控制框。 ⑹ 单击“格式”——“图 片”——“大小”标签。 ⑺ 在对话框中输入合适的尺寸或缩放值。 ⑻ 单击“确定”按钮。 5、设置图片的叠放 次序：将小花显示在圆的内部。 ⑴ 选定“小花”图片，将它拖动到圆图片之上。 ⑵ 单击“绘图”工具栏上的 “绘图”按钮，在菜单中选择“置于顶层”选项。 （如果 将圆设置成“置于顶层”会遮挡“小花”图片。 ） ⑶ 通过图 片缩放操作使得“小花”正好放在圆内。 6、图片组合：将小花和圆组合成一个图片。 ⑴ 选定要组合的图片 对象：单击“绘图”工具栏上的“选择对象”按钮，拖动鼠标画一个虚框，将要组合的图片围在一起，表示选中 这些图片对象。 ⑵ 单击“绘图”工具栏上的“绘图”——“组合”选项。 7、取消图片组合：将前面组合在一起 的多个图片重新分解开。 ⑴ 选定要 取消组合的图片对象。 ⑵ 单击“绘图”工具栏上的“绘图”——“取消组合”选项。 8、设置图形环绕方式。 ⑴ 选定“小花”图片（有时可能要双击图片） 。 ⑵ 单击“图片”工具栏中的“文字环绕”按钮。图片工具栏未出 现时，单击“视图－ 工具栏－图片”。 ⑶ 在“环绕方式”框中单击“四周型”选项。 ⑷ 移动图片到合适位置。 也可以使用菜单命令。 ⑴ 选定“小花”图片。 ⑵ 单击“格式－图片”命令。 ⑶ 在“设置图片格式”对话框中， 单击“版式”标签。 ⑷ 在“环绕方式”框中单击“四周型”选项。 ⑸ 单击“确定”按钮。 ⑹ 移动图片到合适位 置。 9、设置水印方式。 ⑴ 输入文字。 ⑵ 插入图片；拖动控点，缩放到需要的大小；拖到适当位置。 ⑶ 双击图片，屏幕出现“图片”工具栏。 ⑷ 在“图片”工具栏中单击“文字环绕”按钮，选“编辑环绕顶点（缺角环 绕）”。 ⑸ 在“图片”工具栏中单击“文字环绕”按钮，选“无环绕”。 ⑹ 在“图片” 工具栏中单击“图象控制” 按钮，选“水印”。 ⑺ 关闭“图片”工具栏。 10、插入艺术字。 在“插入”菜单的“图片”命令中有一个“艺术字” 选项。单击此选项，弹出“艺术字库”对话框，选择所需的艺术字样式，然后按“确定”按钮。这时就会弹出“编 辑艺术字文字”对话框，输入文字，设置好字体，按下“确定”按钮。 11、插入声音。 单击“插入”－“影片和
《插入艺术字》教案 广东石油化工学院高州师范学院308现教李西德 教学内容： 高等教育出版社编制的，九年义务教育五、六年制小学教科书《信息技术》，第31课《文字的修饰》第三部分内容：插入艺术字。教材分析： 本课是《信息技术》Word这一单元的一个内容，主要讲解了文章中艺术字的插入和简单调整。 教学目标： （1）知识目标：掌握插入艺术字的方法，学会插入艺术字"儿童节" ，并能对其进行简单调整，能简单运用艺术字的设置 方法设计个性作品。 （2）能力目标：通过学生的尝试操作，提高自主探索的学习能力， 培养学生审美情趣和语言表达能力。 （3）发展目标：发展个人爱好，增进与他人的交往合作，激发学生 的学习兴趣。
教学重点、难点： 掌握插入艺术字的方法，能对艺术字进行简单调整。 内容分析： 对于五年级学生来说，插入艺术字，是比较简单的。但对于艺术字的属性调整，却比较难掌握。艺术字的学习对以后进行图片、自选图形的学习有很大借鉴作用。 对于学习艺术字，我准备分三步来完成： （1）第一步是如何插入艺术字； （2）第二步是对艺术字的位置、大小、颜色、形状等方面的调整；（3）第三步使用艺术字为电脑小报设计刊头和版块标题。 教学准备： 1、多媒体网络教室 2、学习环境（多媒体课件） 教学过程 一、引言 1、[教师]同学们，你们平时喜欢看报纸吗？经常看哪些报纸呢？ （茂名日报，南方日报等） [教师]课件展示几份电脑小报，比起同学们平时看的报纸它们有什
么不同？ （漂亮，彩色的，形式活泼等） [教师]通过同学们今后的学习，也能做出这样漂亮的电脑小报，你们想做吗？ [教师]课件展示一份电脑小报的刊头和版块标题，今天我们就来学习电脑小报刊头和版快标题的做法。 课件出示课题：插入艺术字。 意图： 通过展示报纸的刊头和版块标题引出课题，起到欣赏和示例的作用。通过欣赏新的艺术字作品引出任务目标，激发学生探索欲望，从而使之在完成任务的过程中更为主动地获得知识，提高能力，实现学习目标。 二、艺术字学习 （一）插入艺术字 [教师]出示范例:儿童节 1.让学生欣赏,简单评价。 2.提出任务：能不能制作同样效果的作品。 1、调用艺术字功能。（老师示范）
在WORD中插入艺术字教案 讲课人：段晓丽 一、教学目标： 1、知识与技能目标：掌握插入艺术字的方法，学会插入艺术字，并能对其进行简单调整，能简单运用艺术字设置方法设计个性作品。 2、过程与方法目标：以学生自主学习为主，小组研究为辅，共同完成学习任务。 3、情感与态度目标：发展个人爱好，激发学生的学习兴趣。通过学生的尝试操作，提高自主探索的学习能力，培养学生审美情趣和语言表达能力。 二、教学重难点： 重点：插入艺术字的方法。 难点：艺术字的修饰美化。 三、教学设想： 以“尝试法”和“比较法”引入新课，以鲜明的对比效果激发学生的学习兴趣，推动学生探索知识的意向并转化为动力，提高学习主动性和思维积极性。 本课教学内容的实际操作性较强，因此在教学过程中以教师讲解、演示和学生实际操作有机结合的方式来进行授课，便于学生理解和掌握，更好地调动学生的学习兴趣和积极性，加强学生的主体参与度。 针对学生心理特点，将营造教学氛围贯穿全课，在教学中可采用不同的教学手段来实施，如教师讲解、学生演示等方式，学生容易接受，也可以更好地完成教学任务。 插入剪贴画、艺术字、自选图形等操作有相近之处，教学后期采用研究性学习，让学生在学习前面知识的基础上进行研究性学习，培养他们的自主学习
能力。 四、教学准备： 网络教室、范例贺卡教学过程： 五、创设情境，引出新知 师：同学们你们好！你们知道1月1日是什么日子吗？ 生：元旦。 师：在元旦到来之际，你们得到的是什么礼物呀？ 生：贺卡。 师：请同学们读一读贺卡中的祝福，小组之间互相观察一下，看看贺卡里面有些什么内容。 （生讨论观察。） 师：如果我们运用word软件，可以用哪些制作方法来完成贺卡？ 生：插入剪贴画、艺术字、自选图形等方法制作贺卡。 师：我们选择的图片要与主题有关系，文字都是祝福的话，心中最想表达的语言，色彩和形状也要搭配得合理。这些都是我们要制作一张好的贺卡的必要条件。 六、明确任务，创新设计 师：今天我们就来运用word制作贺卡，同时要进行一次制作比赛，通过比赛的方式评选出本节课的优秀作品。在制作之前请你说说自己的制作想法。 师：请同学们来看看，老师制作的几张贺卡，有的是纵向的，有的是横向的，首先我们要对贺卡的页面进行设置。 师：（演示并讲解。）单击文件菜单选择页面设置，在页面设置对话框的页边距选项中选择纵向或横向，单击确定。请同学把自己贺卡的页面设置好。（生
尊敬的各位评委、各位老师： 大家好！ 今天我授课的内容是《在Word中插入艺术字》，它是新疆科学出版社出版的《信息技术》四年级上册第六课的教学内容。教学对象是小学四年级学生。本节课我将从以下六个方面加以说明： 一、理论依据及学情分析 中小学信息技术课程指导纲要（试行）指出： 1、建立对计算机的感性认识，了解信息技术在日常生活中的应用，培养学生学习、使用计算机的兴趣和意识。2、在使用信息技术时学会与他人合作，学会使用与年龄发展相符的多媒体资源进行学习。 本课的学习者是四年级学生。他们思维活跃，求知欲、好奇心强，在学习本课前已经有了操作计算机的一般水平和能力，对word的操作环境也有一定了解，他们具备一定的自学能力，加上教材的趣味直观性，所以他们能够在教师的引导下通过同伴合作自主探究的方式完成基本任务。 鉴于此，在实际教学中我将采用学生为主体，教师为主导，学生动手操作为主线，采用“演示法”、“任务驱动法” “自主探究法”等教学方法来突破教材的重点和难点。演示法激发学生的兴趣，任务驱动法则使学生明确目标任务，充分发挥其主体作用。“自主探究法”培养学生自主合作的能力。在这节课中学生主要用到的学法是：“接受任务——思考讨交流——尝试操作——自主创造——作品展示”。学生在完成每个任务的过程中，从思考讨论完成任务的办法开始，在对讨论的结果进行探究验证的基础上，完成任务，最后通过作品展示，让学生更多地体验一种成就感，进一步激发他们强烈的创造欲望。 二、教学内容 本课是Word排版知识的延伸和拓展，通过本课学习，使同学们了解到Word作为一个优秀的办公软件，不仅可对文字进行处理、还能实现对图像的处理，本节知识掌握的好坏，直接影响到后面知识的学习。 鉴于对教材的上述理解，我确定了如下教学目标： 三、目标分析（播放） （1）认知目标： 1、让学生掌握在Word中插入艺术字的方法 2、根据需要调整艺术字大小，移动艺术字的位置 3、学会设置艺术字的颜色填充和更改形状。 （2）能力目标：通过学生自主、合作、探究学习，培养他们观察与审美能力，以及对信息的加工处理能力和创新设计能力。 （3）情感目标： 通过激发学生的学习兴趣，培养学生合作学习，勇于探索、敢于创新的精神，逐步培养学生的创造性思维能力。 结合教学目标，我认为本课 重点：让学生掌握插入艺术字的方法。
第四课让我们的文章更有艺术性——艺术字 教学目标： 1、通过教学，培养学生分析问题、解决问题的能力。使他们具有较强的实践能力与创造能力。 2、通过教学，使学生能在word中插入艺术字。并能进行阴影和三维的设置。教学重点： 艺术字的设置。 教学难点： 插入艺术字的过程。 教学准备： 多媒体教室、打印的艺术字若干幅。 教学过程： 一、复习导入。 上节课，我们学习了在word文档中如何插入剪贴画和来自文件的图片，但是，在文章中常常需要更美观的字体，这时，艺术字是最好的选择了。今天，我们就来学习如何在word中插入艺术字。 二、插入艺术字。 插入艺术字的方法有两种： （1）、选择[插入]菜单中[图片]下的[艺术字]。 （2）、在绘图工具栏上单击按钮。 就可以得到图1所示的对话框。 单击一种你喜欢的艺术字样式，单击[确定]。 三、输入文字。 删去“在此键入你自己的内容”几个字，输入 你想要编辑的艺术字文字，单击[字体]可以设置艺术图1 字的字体，在选择适当的字号，单击[确定]按钮。 这时，屏幕上就出现了你编辑的艺术字。但是，刚插入的艺术字，默认的环绕方式一般是浮于文字方的，这样就把下面的文字挡住了，可以在艺术字上单击右键，选择“设置艺术字格式”，可以改变它的环绕效果。 四、艺术字的调整和修改。 1、调整艺术字的位置、大小。
艺术字位置、大小的调整和图片的位置、大小的调整的方法是一样的。在艺术字上双击，就可以修改艺术字的式样。 2、使用艺术字工具栏 要对艺术字有更多的选择，我们可以用艺术字工具栏来完成。如果你没有调用出[艺术字]工具栏，单击[试图]，选择[工具栏]，单击[艺术字]，使艺术字前面打上√。 假如插入艺术字后，没有“艺术字工具栏”，你可以在艺术字上单击右键，选择[显示“艺术字工具栏”]来显示艺术字工具栏。 3、艺术字的旋转。 单击艺术字工具栏上的自由旋转按钮，艺术字的四角上会出现四个绿色旋转控制点。（此时，必须选中该艺术字） 4、艺术字的阴影设置和三维设置。 和旋转功能一样，都必须先选中该艺术字，在绘图工具栏上单击阴影设置按钮和三维设置按钮，就能选择艺术字的阴影或三维效果了。 五、练一练。 1、学生练习插入艺术字并对艺术字进行设置。 2、对插入的艺术字进行阴影和三维设置。 六、总结。 今天，我们学习了如何在word中插入艺术字，并且对艺术字进行三维和阴影的设置，希望同学门能将这节课的内容好好掌握。
在WORD中插入艺术字教学设计 教学目的与要求: (1)掌握插入艺术字的方法 (2)学会调整艺术字 教学重难点及对策: 学生在以前已经掌握了在文档中输入汉字，设置文字的字体，字号以及颜色等美化文字的方法。今天学习在文档中插入艺术字，这是两个既相似又不同的操作过程。所以插入艺术字的方法的掌握就是本课的重点。而怎样将插入的艺术字调整得美丽漂亮，对于学生来说则显得就更进一层，所以教学的难点就是学会调整艺术字。 教学准备: Word 2000的艺术字作品 教学过程: 一、导入 前面我们已经学习了设置文字的字体，字号以及颜色等美化文字的方法。今天我们还要来学习一种使文字更加漂亮的方法。我们先来看一幅作品: (展示作品) 同学们看这作品里面的字漂亮不漂亮？你们想不想学？那么它们是怎么做出来的呢？下面就请同学们跟我一起来学习“插入艺术字”。 二、新授
1、带领学生学习插入艺术字的方法: (1)单击菜单栏中的"插入" (2)指向图片 (3)指向艺术字单击 (板书:单击插入→图片→艺术字) 2、练一练 让生选择第三排第四个版式，键入"我爱电脑" 3、带领学生学习修改艺术字的方法 (1)选定艺术字(指向艺术字单击) (2)调整艺术字 A、改变艺术字的大小(拖动控制点) B、移动艺术字的位置(指向艺术字当鼠标指针呈"四箭头"时拖动即可移动。 (3)改变艺术字的字体，字号及样式。 (4)旋转艺术字(单击艺术字工具栏上的"自由旋转"按钮，拖动绿色圆点即可。 (5)生练一练 三、巩固 让生全部关闭，从头来一遍。插入艺术字“好好学习”，(版式字体字号等自选) 主要教学过程说明:
在整个教学过程中，紧紧地抓住学生好奇心强的特点，让学生边学边练，分阶段地掌握插入艺术字的方法，不让学生觉得太难，带着学生一步一步地掌握。 教学设计意图及评价: 本课的意图是让学生在练习中掌握插入艺术字的方法，大部分学生都能掌握，在对掌握较慢学生的辅导上还需改进，让他们能够掌握插入的方法。对掌握较快的同学还可以让他们当小老师，辅导帮助其他同学，教学效果会更好。
在WORD中插入艺术字 _____米黑尔古丽 教学目的与要求: (1)掌握插入艺术字的方法 (2)学会调整艺术字 教学重难点: 学生在以前已经掌握了在文档中输入汉字，设置文字的字体，字号以及颜色等美化文字的方法。今天学习在文档中插入艺术字，这是两个既相似又不同的操作过程。所以插入艺术字的方法的掌握就是本课的重点。而怎样将插入的艺术字调整得美丽漂亮，对于学生来说则显得就更进一层，所以教学的难点就是学会调整艺术字。 教学准备: Word2000的艺术字作品 教学过程: 一、导入 前面我们已经学习了设置文字的字体，字号以及颜色等美化文字的方法。今天我们还要来学习一种使文字更加漂亮的方法。我们先来看一幅作品: (展示作品) 大家看这作品里面的字漂亮不漂亮？你们想不想学？那么它们是怎么做出来的呢？下面就请你们跟我一起来学习“插入艺术字”。 二、新授 1、带领学生学习插入艺术字的方法: (1)单击菜单栏中的"插入" (2)指向图片 (3)指向艺术字单击 (板书:单击插入→图片→艺术字) 2、练一练 让学生选择第三排第四个版式，键入"我爱电脑" 3、带领学生学习修改艺术字的方法 (1)选定艺术字(指向艺术字单击) (2)调整艺术字
A、改变艺术字的大小(拖动控制点) B、移动艺术字的位置(指向艺术字当鼠标指针呈"四箭头"时拖动即可移动。 (3)改变艺术字的字体，字号及样式。 (4)旋转艺术字(单击艺术字工具栏上的"自由旋转"按钮，拖动绿色圆点即可。 (5)生练一练 三、巩固 让大家全部关闭，从头来一遍。插入艺术字“好好学习”，(版式字体字号等自选) 主要教学过程说明: 在整个教学过程中，紧紧地抓住学生好奇心强的特点，让大家边学边练，分阶段地掌握插入艺术字的方法，不让学生觉得太难，带着学生一步一步地掌握。 本课的意图是让学生在练习中掌握插入艺术字的方法，大部分学生都能掌握，在对掌握较慢学生的辅导上还需改进，让他们能够掌握插入的方法。对掌握较快的同学还可以让他们当小老师，辅导帮助其他同学，教学效果会更好。
在word中插入艺术字 一、教学目标 1、知识目标：掌握在word中制作艺术字，并且修改艺术字的文字和样式以及艺术字的格式。 2、能力目标：培养学生的创新能力，自主学习能力以及团队协作能力。 3、情感目标：学生能够运用艺术字来修饰自己的作品，并且感受在word 中进行制作的乐趣，能在学习中锻炼自己的探索能力，提高自己的审美情趣。 二、教学重难点 重点：在word中插入艺术字的方法以及修改艺术字的文字和样式难点：设置艺术字的格式 三、教学过程 1、趣味导入 师：老师遇到一个难题，想请同学们帮忙，老师设计了两张封面，内容是一样的，只有文字的形式是不同的，如果要选择一张作为封面，大家会选择哪一张？ （第二张运用了艺术字，字体更漂亮，更符合封面的要求：美观性）谁能给老师讲一讲，你所选的这个封面，这中好看的字是什么字？我们这节课就来学习如何插入艺术字。 2、复习旧知 ①认识word程序 师：word是美国微软公司退出的一款办公软件office家族成员之一，是目前最广泛的文字处理软件，要使用word程序，我们首先要启动word程序。如何启动？有集中方法？ 任务一：启动word程序
单击开始→所有程序→Microsoft office 2003→word 如果桌面上有word图标→双击打开 2、认识word界面 师：word的界面和Windows的界面很相似 标题栏→菜单栏→工具栏→工作区 3、学习新知 师：启动了word程序，大家对照课本112页的内容，自主学习，完成今天的第二个任务。 任务二：插入艺术字“读书月” 提问：你学会插入艺术字的操作了吗？ 要打开插入艺术字对话框，我们需要在菜单栏中找到哪个命令菜单？ ①插入→图片→艺术字→选择一种→确定 ②输入艺术字“读书月” ③确定（弹出艺术字工具栏） 师：请同学演示如何插入艺术字，并一起来欣赏一些漂亮的、震撼我们视觉的艺术字。 艺术字是多变的，大家想想如何可以把自己的艺术字变的更漂亮、更美观呢？布置任务三 4、修改艺术字的格式 师：我们大家已经学习了如何插入艺术字，大家也看到了更多美观的艺术字样式，艺术字的大小和样式是可以变换的。 任务三：修改艺术字的文字和样式