vb自动生成word格式试卷代码

vb自动生成word格式试卷代码

Dim TempRec1 As New ADODB.Recordset

Dim A1 As String

'Dim MyWord As Word.Application

Dim WordDoc As Word.Document

Dim BTextBox

Dim MyRange As Word.Range

Dim MyTable As Word.Table

Dim MyCell As Word.Cell

Dim MyCells As Word.Cells

Dim MyCols As Word.Columns

Dim A() As String

Dim B() As String

Dim ColN As Integer

Dim ArrBytes() As Byte

Dim FreeFileNumber As Integer

Dim Lngsize As Long

Set TempRec1.ActiveConnection = DBCon

If Combo1.ListIndex = -1 Then

MsgBox "没有选择试卷名称,不能生成试卷!", vbOKOnly, "提示"

Exit Sub

End If

TempRec1.Open "select id from sjtx where sjbm='" & SjbmArry(Combo1.ListIndex + 1) & "'"

If TempRec1.RecordCount = 0 Then

MsgBox "没有选择试卷题型顺序,不能生成试卷!", vbOKOnly, "提示" Exit Sub

End If

TempRec1.Close

Load Form13

Form13.Height = 810

Form13.Width = 4680

CenterForm Form13, MDIForm1

Form13.Show

Me.Enabled = False

'创建新文档

On Error GoTo ErrorEnd

Start:

Set WordDoc = MyWord.Documents.Add

If Option1.Value Then

With WordDoc.PageSetup

.PageHeight = InchesToPoints(11.69)

.PageWidth = InchesToPoints(8.27)

End With

End If

If Option2.Value Then

'试卷分栏设置

WordDoc.PageSetup.TogglePortrait

With WordDoc.PageSetup

.PageHeight = InchesToPoints(11.69)

.PageWidth = InchesToPoints(16.54)

End With

WordDoc.PageSetup.TextColumns.SetCount NumColumns:=2

WordDoc.PageSetup.TextColumns.Spacing = CentimetersToPoints(4) End If

'插入试卷名称

https://www.wendangku.net/doc/2c2729609.html, = "宋体"

MyWord.Selection.Font.Size = 16

A1$ = Trim(Combo1.Text)

MyWord.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter MyWord.Selection.TypeText A1$

MyWord.Selection.TypeText Chr(13)

'插入科目名称

https://www.wendangku.net/doc/2c2729609.html, = "宋体"

MyWord.Selection.Font.Size = 15

A1$ = "《" & Trim(Combo2.Text) & "》" + Chr(13)

MyWord.Selection.Font.Bold = True

MyWord.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter MyWord.Selection.TypeText A1$

MyWord.Selection.Font.Bold = False

'插入注意事项

If TempRec1.State = 1 Then

TempRec1.Close

End If

TempRec1.Open "select Zysx from Sjbt where Sjbm='" &

SjbmArry(Combo1.ListIndex + 1) & "'"

If TempRec1.RecordCount = 0 Then

MsgBox "没有找到试卷的注意事项，不能生成试卷!", vbOKOnly, "提示" GoTo ErrorEnd

End If

A1$ = TempRec1.Fields("Zysx").Value

https://www.wendangku.net/doc/2c2729609.html, = "黑体"

MyWord.Selection.Font.Size = 10.5

MyWord.Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft MyWord.Selection.TypeText A1$

https://www.wendangku.net/doc/2c2729609.html, = "宋体"

'从Sjtx表中提取题型名称、数量、附加说明

If TempRec1.State = 1 Then

TempRec1.Close

End If

TempRec1.Open "select tx.txmc,Sjtx.Fzap,Sjtx.Fjsm from Sjtx,Tx where

Sjtx.Txbm=tx.txbm and Sjtx.Sjbm='" & SjbmArry(Combo1.ListIndex + 1) & "' order by sjtx.ID"

If TempRec1.RecordCount = 0 Then

MsgBox "没有找到试卷所属题型，不能生成试卷!", vbOKOnly, "提示"

GoTo ErrorEnd

End If

ColN = TempRec1.RecordCount

If ColN < 12 Then

ReDim A(1 To TempRec1.RecordCount, 1 To 3)

TempRec1.MoveFirst

For i = 1 To TempRec1.RecordCount

A(i, 1) = TempRec1.Fields("Txmc").Value

If TempRec1.Fields("Fzap").Value <> "" Then

A(i, 2) = TempRec1.Fields("Fzap").Value

Else

A(i, 2) = ""

End If

If Trim(TempRec1.Fields("Fjsm").Value) <> "" Then

A(i, 3) = TempRec1.Fields("Fjsm").Value

Else

A(i, 3) = ""

End If

TempRec1.MoveNext

Next

TempRec1.Close

'将对应数学数字转换成中文数字

ReDim B(1 To ColN)

TempRec1.Open "select Zwsz from SdZ"

TempRec1.MoveFirst

For i = 1 To ColN

B(i) = TempRec1.Fields("Zwsz").Value

TempRec1.MoveNext

Next

TempRec1.Close

'创建表格将对应题目标号填写到表中

Set MyTable = MyWord.Selection.Tables.Add(MyWord.Selection.Range, 2, ColN + 2) Set MyCols = MyTable.Columns

'设置列宽

MyCols(1).Width = 46.5

'列宽通过320/列数获取

For i = 1 To ColN

If Option1.Value Then

MyCols(i + 1).Width = 330 \ ColN

End If

If Option2.Value Then

MyCols(i + 1).Width = 370 \ ColN

End If

Next

MyCols(ColN + 2).Width = 50

'设置行高

MyTable.Rows(1).Height = 25

MyTable.Rows(2).Height = 25

'表格外边框

MyTable.Borders.OutsideLineStyle = wdLineStyleSingle

'表格内边框

MyTable.Borders.InsideLineStyle = wdLineStyleSingle

'表格居中

MyTable.Rows.Alignment = wdAlignRowCenter

'表格中文本对齐方式

'垂直居中

MyTable.Rows(1).Cells.VerticalAlignment = wdCellAlignVerticalCenter

MyTable.Rows(2).Cells.VerticalAlignment = wdCellAlignVerticalCenter

'水平居中

' For k = 1 To ColN + 2

' MyTable.Cell(1, k).Select

' Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter

' Next

Set MyCell = MyTable.Cell(1, 1): MyCell.Select: MyWord.Selection.TypeText "题目"

'题目名称从试卷表中的题目类型名称获取

For i = 1 To ColN

Set MyCell = MyTable.Cell(1, i + 1): MyCell.Select: MyWord.Selection.TypeText B(i)

Next

Set MyCell = MyTable.Cell(1, ColN + 2): MyCell.Select: MyWord.Selection.TypeText "总分"

Set MyCell = MyTable.Cell(2, 1): MyCell.Select: MyWord.Selection.TypeText "得分"

Set MyCell = Nothing

Set MyTable = Nothing

MyWord.Selection.GoToNext wdGoToLine

MyWord.Selection.TypeText Chr(13)

'可用循环生成试题

'/////

For i = 1 To ColN

'题型阅卷表格和题型说明

https://www.wendangku.net/doc/2c2729609.html, = "黑体"

Set MyTable = MyWord.Selection.Tables.Add(MyWord.Selection.Range, 2, 3)

MyTable.Borders.OutsideLineStyle = wdLineStyleSingle

MyTable.Borders.OutsideColor = wdColorWhite

MyTable.Borders.InsideLineStyle = wdLineStyleSingle

MyTable.Borders.InsideColor = wdColorWhite

MyTable.Rows(1).Cells(1).Borders.OutsideColor = wdColorBlack

MyTable.Rows(1).Cells(2).Borders.OutsideColor = wdColorBlack

MyTable.Rows(2).Cells(1).Borders.OutsideColor = wdColorBlack

MyTable.Rows(2).Cells(2).Borders.OutsideColor = wdColorBlack

Set MyRange = WordDoc.Range(MyTable.Cell(1, 3).Range.Start, MyTable.Cell(2, 3).Range.End)

MyRange.Cells.Merge

For k = 1 To 2

MyTable.Columns(k).Width = 50

Next

MyTable.Rows.Height = 25

If Option1.Value Then

MyTable.Columns(3).Width = 325

End If

If Option2.Value Then

MyTable.Columns(3).Width = 365

End If

Set MyCols = MyTable.Columns

Set MyCell = MyTable.Cell(1, 1): MyCell.Select: MyWord.Selection.TypeText "得分"

Set MyCell = MyTable.Cell(2, 1): MyCell.Select: MyWord.Selection.TypeText "评分人"

MyTable.Rows.Alignment = wdAlignRowCenter

MyTable.Cell(1, 1).VerticalAlignment = wdCellAlignVerticalCenter

MyTable.Cell(2, 1).VerticalAlignment = wdCellAlignVerticalCenter

MyTable.Cell(1, 3).VerticalAlignment = wdCellAlignVerticalCenter

'题号+题型+分值安排

https://www.wendangku.net/doc/2c2729609.html, = "宋体"

MyWord.Selection.Font.Size = 10.5

MyWord.Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft

If A(i, 3) <> "" Then

Set MyCell = MyTable.Cell(1, 3): MyCell.Select: MyWord.Selection.TypeText B(i) & "、" & A(i, 1) & ".(" & A(i, 2) & ")" & Chr(10) & A(i, 3)

Else

Set MyCell = MyTable.Cell(1, 3): MyCell.Select: MyWord.Selection.TypeText B(i) & "、" & A(i, 1) & ".(" & A(i, 2) & ")"

End If

Set MyCell = MyTable.Cell(1, 3): MyCell.Select

Set MyCell = Nothing

Set MyTable = Nothing

MyWord.Selection.GoToNext wdGoToLine

MyWord.Selection.GoToNext wdGoToLine

'对应题型的试题

If TempRec1.State = 1 Then

TempRec1.Close

End If

'按难度系数升序排列试题

TempRec1.Open "select st.stnr from st,sjst where st.stbm=sjst.stbm and sjst.txmc='" & A(i, 1) & "' and sjst.Sjbm='" & SjbmArry(Combo1.ListIndex + 1) & "' order by sjst.ndxs"

If TempRec1.EOF And TempRec1.BOF Then

Exit Sub

End If

If TempRec1.RecordCount = 0 Then

MsgBox "没有找到相关试题,不能生成试卷,请检查!", vbOKOnly, "提示"

GoTo NoSt

End If

N = TempRec1.RecordCount

TempRec1.MoveFirst

For j = 1 To N

Lngsize = TempRec1.Fields("stnr").ActualSize

ArrBytes = TempRec1.Fields("stnr").GetChunk(Lngsize)

FreeFileNumber = 1

Open App.Path & "\tempst.doc" For Binary As #FreeFileNumber

Put #FreeFileNumber, , ArrBytes

Close #FreeFileNumber

MyWord.Selection.TypeText Str(j)

MyWord.Selection.TypeText "."

MyWord.Selection.InsertFile FileName:=App.Path & "\tempst.doc", ConfirmConversions:=False

MyWord.Selection.Collapse Direction:=wdCollapseEnd

TempRec1.MoveNext

Next

TempRec1.Close

Next

'/////

'添加页码

WordDoc.Sections(1).Footers(wdHeaderFooterPrimary).PageNumbers.Add PageNumberAlignment:=wdAlignPageNumberCenter, FirstPage:=True

Set MyRange = WordDoc.Sections(1).Footers(wdHeaderFooterPrimary).Range MyWord.NormalTemplate.AutoTextEntries("第 X 页共 Y 页").Insert

Where:=MyRange, RichText:=True

MyRange.ParagraphFormat.Alignment = wdAlignParagraphCenter '段落居中对齐End If

'在第一轧添加试卷左则文本框

MyWord.Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:=1

A1 = "学校 _________________________班级 __________________________ 学号 ________________________姓名 ___________________ "

Set BTextBox = WordDoc.Shapes.AddTextbox(msoTextOrientationUpward, 30, 80, 40, 620)

BTextBox.TextFrame.TextRange.Text = A1

BTextBox.Line.ForeColor.RGB = &HFFFFFF

'试卷保存

CommonDialog1.DialogTitle = "保存试卷"

CommonDialog1.Filter = "Word文档(*.doc)|*.doc"

CommonDialog1.InitDir = CreateObject("shell.application").NameSpace(5).Self.Path CommonDialog1.FileName = Combo2.Text & "试卷"

CommonDialog1.ShowSave

If Trim(CommonDialog1.FileName) <> "" Then

WordDoc.SaveAs CommonDialog1.FileName

WordDoc.Close

MsgBox Combo2.Text & "试卷已正确生成", vbOKOnly, ""

Else

WordDoc.SaveAs App.Path + "\Cancel.doc"

DeleteFile App.Path + "\Cancel.doc"

End If

Set WordDoc = Nothing

Unload Form13

Me.Enabled = True

Exit Sub

'关闭文档

ErrorEnd:

WordDoc.SaveAs App.Path + "\Cancel.doc"

DeleteFile App.Path + "\Cancel.doc"

WordDoc.Close

Set WordDoc = Nothing

GoTo Start

Exit Sub

NoSt:

WordDoc.SaveAs App.Path + "\Cancel.doc"

DeleteFile App.Path + "\Cancel.doc"

WordDoc.Close

Set WordDoc = Nothing

Unload Form13

Me.Enabled = True

Word中快速设置统一正文格式的操作技巧.doc

Word中快速设置统一正文格式的操作技巧Word中快速设置统一正文格式的操作技巧 Word中快速设置统一正文格式的操作步骤 打开word文档，找到开始选项卡下的正文。 Word中快速设置统一正文格式的操作步骤图1 右键点击，在弹出的菜单栏中选择修改按钮。 Word中快速设置统一正文格式的操作步骤图2 在弹出的修改样式面板中修改内容的文字格式，完成后，点击左下角的格式按钮进入更深的格式设置。 Word中快速设置统一正文格式的操作步骤图3 如图。设置其对齐方式，缩进量行距等。完成设置后，一一确定。 Word中快速设置统一正文格式的操作步骤图4 此时可以看到已经写好的正文部分格式已经统一改成了刚才设置的样子。 Word中快速设置统一正文格式的操作步骤图5 再继续输入正文内容的时候，其格式也是刚才设置的。 如果需要部分更改，选中需要修改的部分，右键，在对应的圈出来的部分修改它的格式即可。 Word中快速设置统一正文格式的操作步骤图6

word中嵌入excel表格有哪些方法 word中嵌入excel表格有哪些方法 Word中嵌入已有Excel工作表的三种方法 利用复制、粘贴命令来嵌入 此种方法插入的表格内容为Word文档中的普通表格，且与Excel脱离了关系。 1.打开Excel工作表，选定要嵌入的对象。 2.单击常用工具栏中的复制按钮，将选中的对象复制到剪贴板中。 3.回到正在编辑的Word文档中，定位插入点，然后单击编辑菜单中的粘贴命令。 利用插入对象的方法来嵌入表格 此种方法表格一旦嵌入后，双击插入的内容可进入Excel，并在其中编辑它。而且如果对原Excel工作表中的数据进行修改，Word中嵌入的表格也随之改变。 1.打开正在编辑的Word文档，首先定位光标，然后单击插入菜单中的对象命令。 2.弹出对象对话框，选择由文件创建选项卡，在文件名框中输入Excel工作表所在位置，或按浏览按钮进行选择。选中链接到文件复选框，可使插入内容随原Excel表格中的数据的改变而改变，最后按确定按钮。 3.适当调整表格显示内容的位置。 利用选择性粘贴命令来嵌入 利用此方法插入表格后，双击插入的表格可进入Excel，并

在VB中新建word文件

在Visual Basic 6.0 中创建Word文 档 摘要：分析了Word对象模型的结构，特别是Document对象及其使用方法，提出了在Visual Basic 中创建Word格式文档的方法，并给出了该方法的应用实例。 关键词：Visual Basic，Word对象模型，文档 引言 Word文档是实际工作学习中最为常用的文档格式之一。 随着社会信息化程度的提高，一些传统的由人工完成工作逐渐转向由计算机来处理。计算机自动组卷系统便是一个典型的例子。为了追求更高的效率，一些计算机自动组卷系统的单位用户要求由软件输出Word格式的试卷不需排版直接供印刷使用。 由于Microsoft Office套件的普及，Word文档、电子表格文档、电子幻灯片等文档日渐常用。虽然在Office中各个程序的文档可以方便地转换，但是这种转换是以失去文档原本的格式为代价的。例如，在自动组卷系统中，存储在Access数据库中的试卷可以通过Access提供的导出功能产生Word文档，但产生的文档是无格式的，需花费大量时间重新排版方可符合用户在试卷格式上的要求。 针对这一问题，本文讨论通过研究Word对象模型，提出使用该对象模型创建符合用户所要求的特定格式的Word文档的方法。 Word对象模型

1、Word对象模型层次结构 对象是 Visual Basic的基石，几乎在 Visual Basic 中的每个操作都与修改对象有关。Word 的任何元素（如文档、表格、段落、域、书签等）都可以用 Visual Basic 中的对象来代表。 对象代表一个 Word 的元素，如文档、段落、书签或单个的字符。集合也是一个对象，该对象包含其他数个对象，通常这些对象属于相同的类型，例如，一个集合对象中可包含文档中的所有书签对象。通过使用属性和方法，可以修改单个的对象，也可修改整个的对象集合。 Microsoft Word Visual Basic提供一套完整的Word对象模型，这是一个以Application为顶层对象的对象层次结构。其结构如图-1所示。 对象由两种类型的成员构成，一种是属性，第二种成员是方法。 属性是对象的一个特性或者该对象行为的一个方面。例如，文档属性包含名称、内容、保存状态以及是否启用修订。要更改一个对象的特征，可以修改其属性值。要设置一个属性的值，需在对象的后面紧接一个句点、属性名称、一个等号及新的属性值。下面的示例在"MyDoc.doc"文档中启用修订。

word2010版论文格式设置

在Word2010中修改样式 ——用于论文中各级标题和正文格式设置 无论是Word2010的内置样式，还是Word2010的自定义样式，用户随时可以对其进行修改。在Word2010中修改样式的步骤如下所述： 第1步，打开Word2010文档窗口，在“开始”功能区的“样式”分组中单击显示样式窗口按钮，如Figure 1单击显示样式窗口按钮所示。 第2步，在打开的“样式”窗格中右键单击准备修改的样式，在打开的快捷菜单中选择“修改”命令，如Figure 2选择“修改”命令所示。 第3步，打开“修改样式”对话框，用户可以点击左下角的格式按钮， 修改样式涉及的字体和段落格式， Figure 2单击显示样式窗口按钮 Figure 1选择“修改”命令

如Figure 3所示。 Tips : 1. 具体到论文的格式设计，可以修改样式中的标题1、标题2、标题3，分别对应1、1.1、1.1.1三级标题的格式，将光标定位到欲设置格式的位置，单击样式，即能应用格式。 2. 清除格式 打开“开始”选项卡，在“样式”分组中选择清除格式。如Figure 4所示。 Figure 4清除格式 Figure 3“修改样式”对话框

符号和样式链接 ——各级标题的自动编号 第1步，打开Word2010文档窗口，在“开始”功能区的“段落”分组中单击“多级列表”按钮，选取列表样式后，选择“定义新的多级列表”，弹出对话框，如Figure 5所示。单击“更多”按钮，展开高级选项，如Figure 6所示。 Figure 5编辑多级符号 2 3 4

第2步，在对话框中修改编号格式，将不同级别的编号链接到不同样式。则文中所有应用该样式的段落，将自动添加相应级别的编号。 2 1 Figure 6将多级列表链接到样式

vb操作word详细讲解

vb操作word详解 Visual Basic支持一个对象集合，该集合中的对象直接对应于Microsoft Word 97中的元素，并且通过用户界面，用户熟悉这些元素中的绝大多数。例如，Document 对象代表了一个打开的文档，Bookmark对象代表了一个文档中的书签，而Selection对象则代表了在一个文档窗口窗格中的选定容。在Word中，每一类元素－文档、表格、段落、书签、域等等－都可以用Visual Basic的对象来表示。要在Word中自动执行任务，可以使用这些对象的方法和属性。 关于理解和使用Microsoft Office 97对象模型的一般性容，请参阅本书的第二章“理解对象模型”。在Microsoft Office 97中的对象模型相当丰富，其中包含了大约180个对象。要查看Word对象模型的层次关系图，请参阅“帮助”中的“Microsoft Word 对象”。要获得对某种特定对象的详细描述，可以在此图中单击该对象的名字，或是在“帮助”的索引中对特定对象进行搜索。 怎样显示Word Visual Basic帮助 要使用Word Visual Basic帮助，必须在安装过程中选择“自定义”的安装方式，并且为Word选中“Visual Basic在线帮助”复选框。否则，安装程序不会安装Visual Basic帮助。如果用户已经安装好了Word，那么可以再次运行Setup程序来安装Visual Basic帮助。

要查看Word Visual Basic 帮助，可以在“Visual Basic 编辑器里的“帮助”菜单中点击“目录和索引”一项。在“帮助主题”对话框的“目录”一表中，双击“Microsoft Word Visual Basic 参考”，然后再双击“Visual Basic 参考”。“帮助主题”对话框会重新出现，显示出Microsoft Word Visual Basic的目录和索引。 运用Application 对象 在用户启动一个Word 时段的同时，也创建了一个Application 对象。用户可以使用Application 对象的属性或方法来控制或返回应用程序围的特性、控制应用程序窗口的外观或者调整Word 对象模型的其他方面。可以使用Application属性来返回Word Application 对象。以下的示例从视图状态切换到打印预览状态。 Application. PrintPreview = True Application对象的一些属性控制着应用程序的外观。例如，如果DisplayStatusBar属性为True(真)，那么状态栏是可见的，如果WindowState属性值为wdWindowStateMaximize，那么应用程序窗口处于最大化状态。以下的示例设置了屏幕上应用程序窗口的大小。 With Application .WindowState = wdWindowStateNormal .Height = 450 .Width = 600 End With

word论文格式模板

word论文格式模板 1、题目：应简洁、明确、有概括性，字数不宜超过20个字。 2、摘要：要有高度的概括力，语言精练、明确，中文摘要约100—200字; 3、关键词：从论文标题或正文中挑选3～5个最能表达主要内容的词作为关键词。 4、目录：写出目录，标明页码。 5、正文： 论文正文字数一般应在3000字以上。 论文正文：包括前言、本论、结论三个部分。 前言(引言)是论文的开头部分，主要说明论文写作的目的、现实意义、对所研究问题的认识，并提出论文的中心论点等。前言要写得简明扼要，篇幅不要太长。 本论是论文的主体，包括研究内容与方法、实验材料、实验结果与分析(讨论)等。在本部分要运用各方面的研究方法和实验结果，分析问题，论证观点，尽量反映出自己的科研能力和学术水平。 结论是论文的收尾部分，是围绕本论所作的结束语。其基本的要点就是总结全文，加深题意。 6、谢辞：简述自己通过做论文的体会，并应对指导教师和协助完成论文的有关人员表示谢意。 7、参考文献：在论文末尾要列出在论文中参考过的专著、论文及其他资料，所列参考文献应按文中参考或引证的先后顺序排列。 8、注释：在论文写作过程中，有些问题需要在正文之外加以阐述和说明。

9、附录：对于一些不宜放在正文中，但有参考价值的内容，可 编入附录中。 WORD应用中的四种技巧 摘要:WORD文字处理软件其功能十分强大，自身拥有专业、优雅、美观、省时、易操作等特点，可以说是当前全球使用人群最为广泛 的文档工具。本文简要分析了Word软件中的四种应用技巧，经过实 践研究表明，这四种技巧操作性简单并且实用性强，对于提高信息 自动化办公以及电脑写作都具有一定的现实意义。 【关键词】WORD文档office办公软件应用技巧 当前，中文Word软件系统是做长使用的文字处理软件，它的功 能非常强大，并且其输入与排版的操作非常简单易学。无论是书信、报告、书籍亦或者文书都可以通过Word软件进行制作。它将那些繁 琐的制作过程全部变得一目了然，表格制作、图文排版亦或者版面 分栏都变得非常容易操作。现在电脑的应用范围也变得非常广泛， 许多行业的工作都离不开电脑，更离不开Word等办公软件的使用。 但是，由于不同行业的工作目标以及工作任务各有所不同所以其构 思与需求也会有相对的区别，很多人便会开始抱怨使用Word软件的 某些功能便力不从心，甚至会束手无策。本文便总结了Word办公软 件中的一些应用经验及应用技巧，希望对Word办公软件的使用者能 提供一些有效帮助。 1创新设计的禁止office浮动工具菜单栏 在office2007板中，提供了一种全新的创意型外观以及崭新的 用户界面，为了促使用户能够更加轻而易举的寻找到自己需要的功能，office2007软件为用户提供了很多热情洋溢的服务，可是许多 新的服务功能对于部分用户而言，却是弊多利少，劣性效果非常显著。比如说在Word2007版中，如果想要选择文档中的一段文字内容，哪怕只是其中的一个字符，在文本的编辑区域都会自动弹出一个浮 动菜单栏，其中包含有：字体、字号、格式刷等十五种工具内容， 然而这个浮动的菜单栏经常会将文本编辑区域上的一部分内容遮挡住，促使许多人觉得非常碍眼，原本的工作思维也被打乱了。

论文格式修改稿word版

常州工学院经济与管理学院 毕业论文页码顺序装订补充说明 一、论文定稿后装订要求 论文定稿后统一用A4号纸型打印装订，采用左侧装订。 学士学位论文打印版用A4（297mm×210mm）标准大小的白纸印刷和装订。打印页面设置为WORD标准文档，具体页边距规格为：上空2.54cm（厘米），下空2.54 cm，左空3.17cm，右空3.17 cm，页眉1.5 cm，页脚1.75 cm。 二、论文装订说明、顺序和模板 （一）说明 1、第一页：论文封面页 题目采用宋体/仿宋、小二号、加黑居中填写，副题采用宋体/仿宋、小三、加黑居中，其余均为宋体/仿宋、小三、不加黑居中。日期为2012年5月。 2、第二页：摘要和关键词，不写论文题目，摘要用四号黑体字居中，具体内容用小四号宋体字空两个汉字起排；关键词用四号黑体字另起一段居左空两个汉字起排，关键词之间空两个字符，没有标点符号。1.5倍行距，该页用罗马数字编码，具体排版见后面模板。 3、第三页：英文摘要和关键词页，英文题目、摘要和关键词均用Times New Roman字体，论文题目的英文用四号加粗居中，英文摘要另起一行，用四号居中，英文摘要内容用小四号空两个英文字符起排。英文关键词用四号字，另起一段空两个英文字符起排，关键词之间空两个英文字符，用小四号字，没有标点符号。1.5倍行距，该页用罗马数字编码。 4、第四页：目录四号黑体居中，写到二级标题，一级标题用小四号宋体顶格起，二级标题用小四号宋体字缩一格。如果因排版必需，三级标题用小四号宋体字缩三格。标题与页码之间用圆点“·”，注意页码对齐。目录页不写论文题目，用自动生成格式，具体排版见后面模板。 5、第五页起：正文，为1.5倍行距，一级标题用四号黑体字，居左，一级标题之间空一行；

vb net操作Word

Private oWordApplic As Word.Application Private oDocument As Word.Document Private oRange As Word.Range Private oSelection As Word.Selection Public Sub Neword() '激活com word接口 oWordApplic = New Word.Application oWordApplic.Visible = True End Sub '设置选定文本 Public Sub SetRange(ByVal para As Integer) oRange = oDocument.Paragraphs(para).Range oRange.Select() End Sub Public Sub SetRange(ByVal para As Integer, ByVal sent As Integer) oRange = oDocument.Paragraphs(para).Range.Sentences(sent) oRange.Select() End Sub Public Sub SetRange(ByVal startpoint As Integer, ByVal endpoint As Integer, ByVal flag As Boolean) If flag = True Then oRange = oDocument.Range(startpoint, endpoint) oRange.Select() Else End If End Sub '生成空的新文档 Public Sub NewDocument() Dim missing = System.Reflection.Missing.Value Dim isVisible As Boolean = True oDocument = oWordApplic.Documents.Add(missing, missing, missing, missing) oDocument.Activate() End Sub '使用模板生成新文档 Public Sub NewDocWithModel(ByVal FileName As String) Dim missing = System.Reflection.Missing.Value Dim isVisible As Boolean = True Dim strName As String strName = FileName

毕业论文字体字号格式要求【word版】p

【最新资料，WORD文档，可编辑修改】 毕业论文字体字号格式要求 一、封面 题目：小二号黑体加粗居中。? 各项内容：四号宋体居中。 二、目录 目录：二号黑体加粗居中。 章节条目：五号宋体。 行距：单倍行距。 三、论文题目：小一号黑体加粗居中。 四、中文摘要 1、摘要：小二号黑体加粗居中。?? 2、摘要内容字体：小四号宋体。 3、字数：300字左右。 4、行距：20磅? 5、关键词：四号宋体，加粗。词3-5个，每个词间空一格。 五、英文摘要 1、ABSTRACT：小二号Times? New? Roman.?? 2、内容字体：小四号Times? New? Roman.?? 3、单倍行距。 4、Keywords：四号加粗。词3-5个，小四号Times?New?Roman. 词间空一格。 六、绪论??小二号黑体加粗居中。内容500字左右，小四号宋体，行距：20磅 七、正文 （一）正文用小四号宋体 （二）安保、管理类毕业论文各章节按照一、二、三、四、五级标题序号字体格式章：标题?小二号黑体，加粗，居中。 节：标题?小三号黑体，加粗，居中。 一级标题序号如：一、二、三、?标题四号黑体，加粗，顶格。 二级标题序号如：（一）（二）（三）?标题小四号宋体，不加粗，顶格。 ??标题小四号宋体，不加粗，缩进二个字。 四级标题序号如：（1）（2）（3）?标题小四号宋体，不加粗，缩进二个字。 五级标题序号如：①②③??标题小四号宋体，不加粗，缩进二个字。 医学、体育类毕业论文各章序号用阿拉伯数字编码，层次格式为： 1××××（小2 号黑体，居中）××××××××××××××××××××××(内容用4号宋体)。 1.1××××（3号黑体，居左）×××××××××××××××××××××（内容用4号宋体）。 1.1.1××××（小3号黑体，居左）××××××××××××××××××××（内容用4号宋体）。①××××（用与内容同样大小的宋体） a．××××（用与内容同样大小的宋体） （三）表格

检测项目名称、代码及等级

8.2 检测项目名称、代码及等级 8.2.1 本规程已规定的代码应采用两个汉字拼音首个字母组合表示， 未规定的代码应采用与此相同的确定原则，但不得与已规定的代码重名。 8.2.2管道缺陷等级应按表8.2.2规定分类。 表8.2.2 缺陷等级分类表 等级 缺陷性质 1 23 4 结构性缺陷程度轻微缺陷中等缺陷严重缺陷重大缺陷功能性缺陷程度轻微缺陷中等缺陷严重缺陷重大缺陷 8.2.3结构性缺陷的名称、代码、等级划分及分值应符合表8.2.3的 规定。 表8.2.3 结构性缺陷名称、代码、等级划分及分值 缺陷名称缺陷 代码 定义 等 级 缺陷描述分值 破裂PL 管道的外部压 力超过自身的承 受力致使管子发 生破裂。其形式 有纵向、环向和 复合3种 1 裂痕—当下列一个或多个情况存在时： 1）在管壁上可见细裂痕； 2）在管壁上由细裂缝处冒出少量沉积物； 3）轻度剥落。 0.5 2 裂口—破裂处已形成明显间隙，但管道的形状 未受影响且破裂无脱落。 2 3 破碎—管壁破裂或脱落处所剩碎片的环向覆盖 范围不大于弧长60 o。 5 4 坍塌—当下列一个或多个情况存在时： 1）管道材料裂痕、裂口或破碎处边缘环向覆盖 范围大于弧长60o； 2）管壁材料发生脱落的环向范围大于弧长60o。 10 变形BX 管道受外力挤 1 变形不大于管道直径的5％。 1

压造成形状变异 2 变形为管道直径的5%~15% 。 2 3 变形为管道直径的15%~25% 。 5 4 变形大于管道直径的25％。10 腐蚀FS 管道内壁受侵 蚀而流失或剥 落，出现麻面或 露出钢筋 1 轻度腐蚀—表面轻微剥落，管壁出现凹凸面。0.5 2 中度腐蚀—表面剥落显露粗骨料或钢筋。 2 3 重度腐蚀—粗骨料或钢筋完全显露。 5 错口CK 同一接口的两 个管口产生横向 偏差，未处于管 道的正确位置 1 轻度错口—相接的两个管口偏差不大于管壁厚 度的1/2 。 0.5 2 中度错口—相接的两个管口偏差为管壁厚度的 1/2~1之间。 2 3 重度错口—相接的两个管口偏差为管壁厚度的 1~2倍之间。 5 4 严重错口—相接的两个管口偏差为管壁厚度的 2倍以上。 10 起伏QF 接口位置偏 移，管道竖向位 置发生变化，在 低处形成洼水 1 起伏高/管径≤20% 。0.5 2 20%<起伏高/管径≤35% 。 2 3 35%<起伏高/管径≤50% 。 5 4 起伏高/管径>50% 。10 续表8.2.3 缺陷名称缺陷 代码 定义等级缺陷描述分值 脱节TJ 两根管道的端 部未充分接合或 接口脱离 1 轻度脱节—管道端部有少量泥土挤入。 1 2 中度脱节—脱节距离不大于20mm 。 3 3 重度脱节—脱节距离为20mm ~50mm 。 5 4 严重脱节—脱节距离为50mm以上。10 接口材料脱落TL 橡胶圈、沥青、 水泥等类似的接 口材料进入管道 1 接口材料在管道内水平方向中心线上部可 见。 1 2 接口材料在管道内水平方向中心线下部可 见。 3

word毕业设计(论文)各种格式操作

Word毕业设计（论文）各种格式要求操作 关于每个毕业生毕业时设置这个word的格式问题上让很多学生头疼，本人当初做的时候也是花了太多的时间在修改和寻找一些格式的基本要求以及操作，接下来本人就把自己做毕业设计时后用到的一些经验技巧分享给大家。 首先，我们先要确认，自己的电脑安装的word软件是微软的2003版office 软件，而不是什么WPS软件，因为WPS为了简便操作有些功能和office上有出入，所以我讲的有些功能可能在WPS上一下子找不到或根本没有，然后2007或以上更新的版本的工具位置跟2003的版本的也是有出入的，本人操作的是微软2003版的office软件的word程序，请大家在阅读下面的内容时先看清楚这段介绍文字。 接下来本人开始详细讲解，关于字体格式、封面和标题这些内容就由大家自己根据学校的要求和自己指导老师的安排确定了，我主要讲得是：第一点：先是关于目录的问题，想要插入目录的话必须先要在自己的设计或论文中的标题改成标题格式，不是正文格式，然后标题是有分第一标题、第二标题、第三标题，是指一层一层往下介绍的意思，具体你要看自己学校的层次代号及说明里面了，而且有些知道老师可能会有具体要求，希望你们做的时候先跟指导老师沟通一下。 第二点：关于插图，插图如果自己的图片是黑色或深色背面的，建议用Photo shop或者美图秀秀这样图片处理工具把背面颜色去除或者变淡，个人推荐Photo shop，处理起来彻底一点，不过这个软件需要点时间摸索，不适合女生使用，去除背面颜色的原因是如果不去除的话打印出来就是一块黑的，很难看。 第三点：关于页面设置，统一采用A4页面（210×297㎜）。其中页边距为左3.2，右2.8，上下各2.8。页眉15、页脚15。字间距为标准，行间距为1.5倍行距。页眉内容统一为“嘉兴职业技术学院毕业论文（设计）”，采用宋体小五号斜体字居右排写。选择“文件”→“页面设置”→“页边距”上下左右自行按要求设置→纸张A4→版式页眉页脚按要求设置，全部是应用与整篇文档，最后确认，出来后按Ctrl+A全选，点击“格式”→“字体”→“字符间距”设置标准或其他要求确认，继续全选选择“格式”→“段落”→“缩进与间距”左

(完整word版)VB语言基础

V B语言基础 一、数据类型 1、数值型：取值范围：Byte(字节型)━占1字节； 0～255无符号 Integer(整型)━占2字节； -32768～32767 long(长整型)━占4字节； -2147483648～2147483647 single(单精度浮点)━占4字节；略 Double(双精度浮点)━占4字节；略 Currency(货币型)━占8字节小数点左15位，右4位 （精确定点数据类型） 2、逻辑型： Boolean(布尔型)━占2字节； true或false 3、字符串型： String?a?a定长型占字符串长度，变长型再加10 4、日期型： Date(日期型)━占8字节 100-1-1～9999-12-31 5、对象型： Object━占4字节；任何Object引用 6、变体型： Variant━变体型数字占16字节，变体型字符占22字节＋字符串长 注：此类型还包含三种特定值：

Empty；Null；Error； ?7、用户定义的数据类型： ?用户可以利用Type语句定义自己的数据类型。格式如下?Type 数据类型名 ?数据类型元素名As 类型名 ?…… ?End Type ?用Type可定义类似于C语言中的结构体类型。例如：?Type Date_Rec ?RYear As Integer ?RMonth As String*3 ?RDay As Integer ?End Type ?注：记录类型中的元素可以是字符串，但必须是定长字符串，其长度由类型名加上一个星号和常数指明。 ?数据类型转换函数： ?函数名及书写格式转换结果 ?CBool（表达式）布尔型 ?CCur（表达式）货币型 ?CByte（表达式）字节型 ?CDate（表达式）日期型 ?CDbl（表达式）双精度

(完整word版)VB查找并替换WORD文档中的字符串

基本要求：需安装WORD Function WordReplace(FileName As String, SearchString As String, ReplaceString As String, Optional SaveFile As String = "", Optional MatchCase As Boolean = False) As Integer On Error GoTo ErrorMsg '函数运行时发生遇外或错误,转向错误提示信息 Dim wordApp As New Word.Application Dim wordDoc As New Word.Document Dim wordArange As Word.Range Dim wordSelection As Word.Selection Dim ReplaceSign As Boolean Dim I As Integer '判断将要替换的文件是否存在 If Dir(FileName) = "" Then '替换文件不存在 MsgBox "未找到" amp; FileName amp; "文件" '提示替换文件不存在信息 WordReplace = -2 '返回替换文件不存在的值 Exit Function '退出函数 End If Set wordApp = CreateObject("Word.Application") '建立WORD实例 wordApp.Visible = False '屏蔽WORD实例窗体 Set wordDoc = wordApp.Documents.Open(FileName) '打开文件并赋予文件实例 Set wordSelection = wordApp.Selection '定位文件实例 Set wordArange = wordApp.ActiveDocument.Range(0, 1) '指定文件编辑位置wordArange.Select '激活编辑位置 I = 0 '初始化替换次数值 ReplaceSign = True '初始化是否替换成功标志 Do While ReplaceSign ReplaceSign = wordArange.Find.Execute(SearchString, MatchCase, , , , , , wdFindContinue, , ReplaceString, True) '查找并替换 '判断查找并替换是否成功,如果成功替换次数值递增1 If ReplaceSign = True Then I = I + 1 End If Loop MsgBox "已完成对文档的搜索并完成 " amp; I amp; " 替换。" '提示总替换次数 '如果替换成功，则提示是否保存

word论文格式范文

word论文格式范文 【篇一：论文写作word论文格式编辑技巧(最全)】目录 一、目录自动生成........................................................................................................ . (2) （1）格式要 求 ....................................................................................................... (2) （2）定义一级标题、二级标题、三级标 题 (2) （3）设定正文、各级标题格 式 (3) （4）在文中依次设置各级标 题 (3) （5）插入目 录 ....................................................................................................... (4) （6）目录的改动和更 新 ....................................................................................................... .. 4 （7）在word左侧显示索引目 录 (5) 二、参考文献的编号和引用（书签、交叉引用方 法） (5) （1）添加参考文 献 ....................................................................................................... . (5) （2）将每个文献制作成书 签 (6) （3）在文中引用参考文 献 (6)

完整版论文格式模版[Word文档]

完整版论文格式模版[Word文档] 完整版论文格式模版 本文档格式为WORD,感谢你的阅读。 最新最全的学术论文期刊文献年终总结年终报告工作总结个人总结述职报告实习报告单位总结演讲稿 完整版论文格式模版 直观地说，就是论文达到可公之于众的标准样式和内容要求。以下是今天为大家搜集整理的完整版的论文格式模版，欢迎参考阅读! 一、论文内容要求 1.毕业论文字数根据专业及课题不同要求在8000字以上，论文内容应完整、准确，层次分明，数据可靠，文字简练，分析透彻，推理严谨，立论正确。毕业设计说明书字数不低于8000字。 2.论文撰写前应翻译完整的外文文献1,2篇(中文字数不低于3000字)，要求翻译的内容与课题相关;撰写与课题内容相关的文献综述2000字以上。 3.论文应采用国家正式公布实施的简化汉字、法定计量单位和国家制图标准。 4.论文采用的术语、符号、代号全文必须统一，并符合规范要求。论文中使用新的专业术语、缩略语、习惯用语，应加以注释。 5.文稿中的插图、照片必须确保能复制或微缩。 二、论文各部分要求 论文内容一般应由十个主要部分组成，依次为:(1)封面，(2)中文摘要，(3)英文摘要，(4)关键字，(5)目录，(6)前言，(7)论文正文， (8)，(9)附录，(10)致谢。各部分的具体要求如下:

1.封面采用学校统一的封面格式，封面上填写论文题目、作者姓名、学号、所在院(系)、专业名称、指导教师姓名及完成日期。 论文题目不宜过长，一般不超过25个字。 2.中文摘要摘要是论文不加注释和评论的简短陈述，具有独立性和自含性，摘要中有数据、有结论，是一篇完整的短文，可以独立使用和引用，论文摘要在写法上一般不分段落，常采用无人称句。摘要中一般不用图表、化学反应式、数学表达式等，不能出现非通用性的外文缩略语或代号，不得引用参考文献。写作论文摘要时应注意能反映出以下几方面的内容:论文所研究的问题及其目的和意义;论文的基本思路和逻辑结构;问题研究的主要方法、内容、结果和结论。论文摘要一般200,400字。 设计说明书的摘要一般为1000,2000字，摘要应该包含论文中的基本信息，应说明本项研究工作的目的和意义、研究方法(实验方法)、结果和结论，重点是结果和结论。注意突出具有创新性的成果和新见解。 3.英文摘要英文摘要内容应与中文摘要基本对应，要符合英语语法，语句通顺，文字流畅。 4.关键词关键词是为了文献标引而从论文中选取出来的用以表示全文主题内容信息款目的单词或术语。每篇论文一般选取3,8个关键词。 5.目录目录是论文的大纲，反映论文的梗概。目录页每行由标题名称和页码组成，包括中英文摘要;前言;主要内容的章、条、款序号和标题;小结;参考文献;注释;附录;可供参考的文献题录、索引等。 6.前言前言是论文的第一章，是论文评阅人、答辩委员和读者了解论文研究背景和概况的主要篇章。主要目的是向论文评阅人、答辩委员和读者阐述论文中所要研究的问题以及与其有关的背景或对一

Word论文格式模板

Word论文格式 每学期末，学校都会向各科教师收集论文归档，尽管事先布置了论文的排版格式，但交上来的很多论文依然格式不统一，归纳起来主要存在以下几个方面的问题： 1. 纸张大小和页边距不统一。 2. 首行缩进不规范，缩进距离有大有小，有很大一部分论文用一两个空格来缩进。 3?行间距设置不统一。 4. 标题及正文的字体、字号设置不统一。 要统一这些文档格式，如果用逐篇、逐项重新设置的方法来处理的话，上百篇论文真不 知要进行多少烦琐重复的劳动。想用轻松便捷的方法吗？那就跟我一起用自定义宏按钮的方法来解决吧。 定制统一格式按钮 1. 在Word XP中依次单击“工具/宏(M)/录制新宏，”，在“录制宏”对话框中，给将要录制的宏取一个名字，如“ Macrol ”(如图1 )。 2. 单击［工具(T)］按钮，在弹出的对话框中选择“命令”选项卡。 3. 在“命令”选项卡中，“类别”栏选择“宏”，“命令”栏选择要录制的宏命令 Normal.NewMacros.

Macrol”，并将它拖动到工具栏的合适位置。

4. 右击工具栏上的"Normal.NewMacros. Macrol ”，在弹出的快捷菜单中选择“命名 (N) ”，并将“命名”后面框中的 “ Normal.NewMacros. Macrol ”改名为“统一格式”作为工具按钮的名称(如图 ⑵ 宣制按钮閨标? 粘骷按钮图掠电) 复位按钮因标⑤ 輪辑岳钮關?… 更改按钮图榇⑹ 默认样式(U) P 总是只用史字(X) 在菜单中只用文芋电1 閨标与文字@) 开箱一组追 5. 单击［关闭］按钮，完成宏按钮的建立。 录制宏 建好按钮后， Word 会自动弹出录制宏工具图标，进入录制宏状态。接着可做以下几步 操作： 1 ?删除段首空格 (1) 按“ Ctrl+Home ”键，将光标移到段首，按回车键在段首插入一个段落标记。 (2) 单击“编辑/替换”，打开“替换”对话框，设定“查找内容”为“ 9 ”(“作” 为段落标记，后面跟一个中文空格) ，“替换为”设为“ A p ”，“搜索范围”为“全部”，然后 单击［全部替换］按钮。替换结束后，再次单击此按钮，这样可删除段首的连续两个中文空格。 (3) 将“查找内容”改为“ Ap ”(“ Ap ”后跟一个英文空格)，“替换为”和“搜索范围”不变，然后单击四次 ［全部替换］按钮，这样可删除段首的连续四个英文空格。替换结束后单击 ［关闭］按钮退出 对 话框。 2． 设置首行缩进两字符，行距调整为单倍行距 2 ）。 N —g I 统一格式

学术论文格式字体要求

学术论文格式字体要求 下面是学术论文格式字体要求，欢迎你们阅读，希望对你们有帮助。 一、学术论文格式字体要求 (一)需报送全文，文稿请用word录入排版。字数不超过5000字。 (二)应完整扼要，涉及主要观点的图片、曲线和表格不能缺少，正文要有“结论”部分。如稿件内容不清或文章篇幅超长等原因， 编辑有权删改。 (三)论文结构请按下列顺序排列： 1.大标题(第一行)：三黑字体，居中排。 2.姓名(第二行)：小三楷字体，居中排。 3.作者单位或通信地址(第三行)：按省名、城市名、邮编顺序排列，用小三楷字体。 4.关键词。需列出4个关键词，小三楷字体。第1个关键词应为二级学科名称。学科分类标准执行国家标准;关键词后请列出作者的 中国科协所属全国性学会个人会员的登记号。 5.正文。小四号宋体。文中所用计量单位，一律按国际通用标准或国家标准，并用英文书写，如km2,kg等。文中年代、年月日、数 字一律用阿拉伯数字表示。 二、正文中的各级标题 一级标题三号黑体居中 二级标题四号黑体左空2字，单占行汉字加顿号，如“一、” 三级标题四号仿宋体左空2字，单占行汉字加括号，如“(一)”

四级标题小四号黑体左空2字，单占行阿拉伯数字加下圆点，如“1.” 五级标题小四号宋体左空2字，右空1字，接排正文阿拉伯数字加括号，如“(1)”允许用于无标题段落图、表、注释及参考文献体 例 内容字体字号格式说明： 图题五号宋体排图下，居中，单占行图号按流水排序，如“图1”;“图2” 图注小五号宋体排图题下，居中，接排序号按流水排序，如“1.”;“2.” 表题五号黑体排表上，居中，可在斜杠后接排计量单位，组合单位需加括号如“表2几种发动机的最大功率/kW”“表5几种车辆的 速度/(km/h)”表序号按流水排序，如“表1”、“表2” 表栏头小五号宋体各栏居中，计量单位格式同上 图文/表文小五号宋体表文首行前空1字，段中可用标点，段后 不用标点 6.参考文献。文章必须有参考文献。“参考文献”4字作为标题，字体五黑，居中，其他字体五宋。文献着录格式如下： (1)着作：作者姓名。书名。出版社名，出版年月，页码(如有两个以上作者，作者间用逗号分开) (2)期刊：作者姓名。文章名。期刊名，年份，卷(期)、页码。 7.作者简介。请在参考文献之后附作者简介。“作者简介”请用五黑字体左起顶格排，后空一格，接排。作者简介字体五宋，100 字以内，包括姓名、参加的全国性学会名称、中国科协个人会员登 记号、工作单位、电话、传真、电子信箱等。

Word论文参考文献格式设置文档2篇

Word论文参考文献格式设置文档2篇Document format of references in word papers 编订：JinTai College

Word论文参考文献格式设置文档2篇 前言：论文格式就是指进行论文写作时的样式要求，以及写作标准，就是论文达到可公之于众的标准样式和内容要求，论文常用来进行科学研究和描述科研成果文章。本文档根据论文格式内容要求和特点展开说明，具有实践指导意义，便于学习和使用，本文下载后内容可随意调整修改及打印。 本文简要目录如下：【下载该文档后使用Word打开，按住键盘Ctrl键且鼠标单击目录内容即可跳转到对应篇章】 1、篇章1：Word论文参考文献格式设置文档 2、篇章2：Word中参考文献尾注插入的方法与步骤文档 篇章1:Word论文参考文献格式设置文档 一、论文注释 当页页下注怎么设置 1、知道你需要在哪里写注释：你的论文中用到了某一个资料中的某一个观点;你的论文中出现了一个术语来自某个文献;某个并不太熟悉但是很重要人物等等。这些情况都需要你进行注释。

2、在需要注释的位置输入一个脚注，方法是点击“引用”，然后找到插入脚注。我们选择插入脚注。 3、这时候我们的光标自动跳转到了页脚，这里就是我们 插入脚注的地方。我们看到在正文和页脚都多了一个小“1” 这是脚注的序号。 4、如果你觉得脚注序号的格式不对，你需要点击这个位置，展开脚注对话框。然后选择编号格式。 5、点击右边的小三角可以展开看到有很多格式可以选择，根据论文的格式要求进行选择。 6、知道了怎样添加脚注还要知道脚注的书写格式。笔者 列出如下格式标准和例子： 著作类引用格式：责任者（必要时加注责任方式）： 《题名》其他题名信息（如卷册），其他责任者（如译者），出版地：出版者，出版年（必要时加注版次），引文页码。范例：孔飞力：《叫魂》，陈兼、刘昶译，上海：上海三联书店，1999年，。 期刊类：责任者：《文章题名》，《连续出版物（期刊、报纸）题名》其他题名信息（中国大陆以外出版的中文报刊出版地）出版年、卷、期或出版日期，页码或版次（任选），影

Word论文格式模板

Word 论文格式 每学期末，学校都会向各科教师收集论文归档，尽管事先布置了论文的排版格式，但交上来的很多论文依然格式不统一，归纳起来主要存在以下几个方面的问题： 1. 纸张大小和页边距不统一。 2. 首行缩进不规范，缩进距离有大有小，有很大一部分论文用一两个空格来缩进。 3. 行间距设置不统一。 4. 标题及正文的字体、字号设置不统一。 要统一这些文档格式，如果用逐篇、逐项重新设置的方法来处理的话，上百篇论文真不知要进行多少烦琐重复的劳动。想用轻松便捷的方法吗？那就跟我一起用自定义宏按钮的方 法来解决吧。 1. 在Word XP 中依次单击“工具/宏(M)/ 录制新宏”，在“录制宏”对话框中，给将要录 制的宏取一个名字，如“Macro1 ”（如图1）。 2. 单击[ 工具(T)] 按钮，在弹出的对话框中选择“命令”选项卡。 3. 在“命令”选项卡中，“类别”栏选择“宏”，“命令”栏选择要录制的宏命令“Normal.NewMacros. Macro1 ”，并将它拖动到工具栏的合适位置。

5. 单击[ 关闭]按钮，完成宏按钮的建立。录制宏 建好按钮后， Word 会自动弹出录制宏工具图标，进入录制宏状态。接着可做以下几步 操作： 1. 删除段首空格 （ 1）按“ Ctrl+Home ”键，将光标移到段首，按回车键在段首插入一个段落标记。 （ 2）单击“编辑 / 替换”，打开“替换”对话框，设定“查找内容”为“ ^p ”（“ ^p ”为 段落标记，后面跟一个中文空格） ，“替换为”设为“ ^p ”，“搜索范围”为“全部” ，然后单击 [全部替 换 ] 按钮。替换结束后， 再次单击此按钮， 这样可删除段首的连续两个中文空格。 （ 3）将“查找内容”改为“ ^p ”（“ ^p ”后跟一个英文空格） ，“替换为”和“搜索范围”不变，然后单击四次 [ 全部替换 ] 按钮，这样可删除段首的连续四个英文空格。替换结束后单击 [关闭 ] 按钮退出对 话框。 4. 右击工具栏上的“ Normal.NewMacros. Macro1 ”，在弹出的快捷菜单中选择“命名 “Normal.NewMacros. (N) ”，并将“命名”后面框中的 Macro1 ”改名为“统一格式”作为工具按钮的名称（如图 2）。