สร้างเอกสาร Word ใน VisualBasic6.0

บทคัดย่อ : บทความนี้วิเคราะห์โครงสร้างของโมเดลออบเจ็กต์ Word โดยเฉพาะออบเจ็กต์ Document และการใช้งาน เสนอวิธีการสร้างเอกสารรูปแบบ Word ใน Visual Basic และยกตัวอย่างการประยุกต์ใช้วิธีนี้

คำสำคัญ : VisualBasic, โมเดลวัตถุ Word, เอกสาร

การแนะนำ

เอกสาร Word เป็นหนึ่งในรูปแบบเอกสารที่ใช้กันมากที่สุดในการทำงานและการเรียนจริง

ด้วยการปรับปรุงข้อมูลทางสังคม งานบางอย่างที่แต่เดิมทำด้วยตนเองได้ค่อยๆ กลายเป็นงานคอมพิวเตอร์ ระบบม้วนขึ้นอัตโนมัติของคอมพิวเตอร์เป็นตัวอย่างทั่วไป เพื่อให้มีประสิทธิภาพสูงขึ้น ผู้ใช้ระบบตรวจสอบอัตโนมัติของคอมพิวเตอร์บางรายต้องการให้ซอฟต์แวร์ส่งออกเอกสารการสอบในรูปแบบ Word สำหรับการพิมพ์โดยตรงโดยไม่ต้องเรียงพิมพ์

เนื่องจากชุดโปรแกรม Microsoft Office ได้รับความนิยม เอกสารต่างๆ เช่น เอกสาร Word เอกสารสเปรดชีต และสไลด์อิเล็กทรอนิกส์จึงถูกนำมาใช้กันมากขึ้น แม้ว่าเอกสารจากโปรแกรมต่างๆ ใน ​​Office จะสามารถแปลงได้อย่างง่ายดาย แต่การแปลงนี้มาพร้อมกับการสูญเสียรูปแบบดั้งเดิมของเอกสาร ตัวอย่างเช่น ในระบบการตรวจสอบอัตโนมัติ สามารถสร้างเอกสารทดสอบที่จัดเก็บไว้ในฐานข้อมูลการเข้าถึงเป็นเอกสาร Word ผ่านทางฟังก์ชันการส่งออกที่ Access มอบให้ อย่างไรก็ตาม เอกสารที่สร้างขึ้นจะไม่ได้รับการฟอร์แมตและต้องใช้เวลามากในการจัดเรียงใหม่เพื่อให้เป็นไปตามนั้น ข้อกำหนดรูปแบบกระดาษทดสอบของผู้ใช้

เพื่อตอบสนองต่อปัญหานี้ บทความนี้จะกล่าวถึงการศึกษาโมเดลออบเจ็กต์ Word และเสนอวิธีการใช้โมเดลออบเจ็กต์เพื่อสร้างเอกสาร Word ในรูปแบบเฉพาะที่ตรงกับความต้องการของผู้ใช้

แบบจำลองวัตถุคำ

1. ลำดับชั้นของโมเดลวัตถุ Word

ออบเจ็กต์เป็นรากฐานสำคัญของ Visual Basic และการดำเนินการเกือบทั้งหมดใน Visual Basic เกี่ยวข้องกับการปรับเปลี่ยนออบเจ็กต์ องค์ประกอบใดๆ ของ Word (เช่น เอกสาร ตาราง ย่อหน้า เขตข้อมูล บุ๊กมาร์ก ฯลฯ) สามารถแสดงด้วยวัตถุใน Visual Basic ได้

วัตถุแสดงถึงองค์ประกอบของ Word เช่น เอกสาร ย่อหน้า ที่คั่นหน้า หรืออักขระแต่ละตัว คอลเลกชันยังเป็นออบเจ็กต์ที่มีออบเจ็กต์อื่นๆ อีกหลายรายการ ซึ่งโดยปกติจะเป็นประเภทเดียวกัน ตัวอย่างเช่น คอลเลกชั่นสามารถมีออบเจ็กต์ที่คั่นหน้าทั้งหมดในเอกสารได้ โดยใช้คุณสมบัติและวิธีการ คุณสามารถปรับเปลี่ยนวัตถุแต่ละรายการหรือคอลเลกชันทั้งหมดของวัตถุได้

Microsoft WordVisualBasic มีชุดรูปแบบออบเจ็กต์ Word ที่สมบูรณ์ ซึ่งเป็นลำดับชั้นของออบเจ็กต์โดยมีแอปพลิเคชันเป็นออบเจ็กต์ระดับบนสุด โครงสร้างของมันถูกแสดงไว้ในรูปที่ 1

-

ออบเจ็กต์ประกอบด้วยสมาชิกสองประเภท ประเภทหนึ่งคือคุณสมบัติ และประเภทที่สองคือวิธีการ

คุณสมบัติเป็นลักษณะของวัตถุหรือลักษณะของพฤติกรรมของวัตถุ ตัวอย่างเช่น คุณสมบัติเอกสารประกอบด้วยชื่อ เนื้อหา สถานะการบันทึก และการเปิดใช้งานการแก้ไขหรือไม่ หากต้องการเปลี่ยนคุณสมบัติของออบเจ็กต์ คุณต้องแก้ไขค่าคุณสมบัติของออบเจ็กต์ หากต้องการตั้งค่าของคุณสมบัติ ให้ตามด้วยจุด ชื่อคุณสมบัติ เครื่องหมายเท่ากับ และค่าคุณสมบัติใหม่ตามวัตถุ ตัวอย่างต่อไปนี้เปิดใช้งานการเปลี่ยนแปลงการติดตามในเอกสาร "MyDoc.doc"

->เอกสาร("MyDoc.doc").TrackRevisions=True->

วิธีการคือการกระทำที่วัตถุสามารถทำได้ ตัวอย่างเช่น ออบเจ็กต์ Document มีวิธี PRintOut ทุกครั้งที่สามารถพิมพ์เอกสารได้ วิธีการมักจะมีพารามิเตอร์ที่กำหนดวิธีดำเนินการ ตัวอย่างต่อไปนี้จะพิมพ์สามหน้าแรกของเอกสารที่ใช้งานอยู่

->ActiveDocument.PrintOutFrom:=1,ถึง:=3->

ในกรณีส่วนใหญ่ วิธีการคือการกระทำ และคุณสมบัติคือคุณสมบัติ การใช้ method จะทำให้บางสิ่งบางอย่างเกิดขึ้นกับ object ในขณะที่การใช้ properties จะส่งกลับข้อมูลเกี่ยวกับ object หรือทำให้คุณสมบัติบางอย่างของ object เปลี่ยนไป

2. วัตถุเอกสารและวัตถุการรวบรวมเอกสาร

ใน Visual Basic คุณสามารถใช้วิธีการของวัตถุเอกสารหรือวัตถุคอลเลกชันเอกสารเพื่อแก้ไขไฟล์ได้ วัตถุเอกสารเป็นวัตถุหลักที่ใช้ในบทความนี้เพื่อสร้างเอกสาร Word

โครงสร้างของชุดวัตถุเอกสาร (เอกสาร) (หรือเอกสาร) ในรูปแบบวัตถุ Word แสดงในรูปที่ 2

-

วัตถุคอลเลกชันย่อหน้าและวัตถุ PageSetup จะเป็นตัวเอกด้านล่าง ออบเจ็กต์คอลเลกชันย่อหน้าคือคอลเลกชันของออบเจ็กต์ย่อหน้าในส่วนที่เลือก ช่วง หรือเอกสาร ออบเจ็กต์ PageSetup แสดงถึงคำอธิบายการตั้งค่าเพจ ออบเจ็กต์ PageSetup มีคุณสมบัติการตั้งค่าหน้าทั้งหมดของเอกสาร (ระยะขอบซ้าย ขอบล่าง ขนาดกระดาษ ฯลฯ)

บนพื้นฐานของความคุ้นเคยกับโมเดลวัตถุ Word เราสามารถใช้วัตถุ Document เพื่อดำเนินการต่างๆ บนเอกสาร Word ได้ เช่น:

2.1 สร้างเอกสารใหม่

คอลเลกชันเอกสารประกอบด้วยเอกสารที่เปิดอยู่ทั้งหมด หากต้องการสร้างเอกสารใหม่ ให้ใช้วิธีการเพิ่มเพื่อเพิ่มออบเจ็กต์เอกสารไปยังคอลเลกชั่นเอกสาร

วิธีหนึ่งในการสร้างเอกสารใหม่คือการใช้วิธีการเพิ่ม วิธีการเพิ่มจะส่งคืนวัตถุเอกสารซึ่งอ้างอิงถึงเอกสารใหม่ ในตัวอย่างต่อไปนี้ ออบเจ็กต์เอกสารที่ส่งคืนโดยวิธีการเพิ่มถูกกำหนดให้กับตัวแปรออบเจ็กต์ newDoc จากนั้นตั้งค่าคุณสมบัติและวิธีการต่างๆ ของวัตถุ Document เอกสารใหม่สามารถควบคุมได้อย่างง่ายดายผ่านตัวแปรอ็อบเจ็กต์ newDoc

->SetnewDoc=Documents.Add

ด้วยใหม่Doc

.Content.Font.Name="อาเรียล"

.SaveAsFileName:="Sample.doc"

จบด้วย ->

2.2 เปิดเอกสาร

หากต้องการเปิดเอกสารที่มีอยู่ ให้ใช้วิธีการเปิดของคอลเลกชันเอกสาร รหัสต่อไปนี้เปิดเอกสารชื่อ MyDocument.doc (ซึ่งอยู่ในโฟลเดอร์ "MyFolder")

->Documents.OpenFileName:="C:/MyFolder/MyDocument.doc"->

2.3 บันทึกเอกสารที่มีอยู่

หากต้องการบันทึกเอกสาร ให้ใช้วิธีการบันทึกของวัตถุเอกสาร รหัสต่อไปนี้จะบันทึกเอกสารชื่อ Sales.doc

->เอกสาร("Sales.doc").บันทึก->

หากคุณใช้วิธีการบันทึกกับคอลเลกชันเอกสาร เอกสารที่เปิดอยู่ทั้งหมดจะสามารถบันทึกได้ รหัสด้านล่างจะบันทึกเอกสารที่เปิดอยู่ทั้งหมด

->เอกสารบันทึก->

2.4 บันทึกเอกสารใหม่

หากต้องการบันทึกเอกสาร ให้ใช้วิธีการ SaveAs ของออบเจ็กต์ Document รหัสต่อไปนี้จะบันทึกเอกสารที่ใช้งานอยู่ในโฟลเดอร์ปัจจุบันชื่อ "Temp.doc"

->ActiveDocument.SaveAsFileName:="Temp.doc"->

พารามิเตอร์ FileName สามารถมีได้เฉพาะชื่อไฟล์หรือพาธแบบเต็ม (เช่น "C:/Documents/TemporaryFile.doc")

2.5 ปิดเอกสาร

หากต้องการปิดเอกสารฉบับเดียว ให้ใช้วิธีการปิดของวัตถุเอกสาร รหัสต่อไปนี้จะปิดและบันทึกเอกสารชื่อ Sales.doc

->Documents("Sales.doc").CloseSaveChanges:=wdSaveChanges->

เอกสารทั้งหมดสามารถปิดได้โดยใช้วิธีการปิดของการรวบรวมเอกสาร รหัสต่อไปนี้จะปิดเอกสารทั้งหมดโดยไม่บันทึกการเปลี่ยนแปลง

->Documents.CloseSaveChanges:=wdDoNotSaveChanges->

สร้างเอกสาร Word ใน Visual Basic

1. สร้างวัตถุเอกสารใน Visual Basic

งานทั้งหมดเริ่มต้นด้วยวัตถุ Document ขั้นแรก ให้สร้างอินสแตนซ์ของวัตถุ Document ใน Visual Basic จากนั้นคุณสามารถดำเนินการควบคุมต่างๆ บนอินสแตนซ์ได้:

->DimnewDocAsWord.Document

SetnewDoc=newWord.Document->

เมื่อสร้างออบเจ็กต์ Document แล้ว คุณสามารถตั้งค่ารูปแบบเริ่มต้นของเอกสารได้โดยตั้งค่าแบบอักษร ระยะห่างบรรทัด และคุณสมบัติอื่นๆ ของออบเจ็กต์ย่อย Content:

->ด้วย newDoc

.Content.Font.Name="宋体"

.Content.Font.Size=12

.Content.Paragraphs.LineSpacing=15.5

จบด้วย ->

ซึ่งส่งผลให้เอกสาร Word ว่างเปล่า

2. เพิ่มข้อความลงในเอกสาร Word

ถัดไป เพิ่มข้อความลงในเอกสารเปล่า คุณจะใช้วัตถุคอลเลกชันย่อหน้าเพื่อทำสิ่งนี้ เมธอด InsertAfter จะแทรกข้อความหลังออบเจ็กต์ Selection หรือ Range ส่วนเมธอด InsertBefore จะแทรกข้อความก่อนออบเจ็กต์ Selection หรือ Range รหัสต่อไปนี้จะเพิ่มและจัดรูปแบบย่อหน้าต่อท้ายเอกสาร:

->ด้วย newDoc

.Content.InsertAfter "ย่อหน้าตัวอย่าง..."

.Paragraphs(NewDoc.Paragraphs.count).Alignment=wdAlignParagraphCenter

.Paragraphs(NewDoc.Paragraphs.count).Range.Font.Bold=จริง

.Paragraphs(NewDoc.Paragraphs.count).Range.Font.Size=28

จบด้วย ->

Paragraphs(index) สามารถใช้เพื่อส่งคืนวัตถุ Paragraph โดยที่ดัชนีคือหมายเลขดัชนี ค่าแอตทริบิวต์ count ระบุจำนวนของวัตถุ Paragraph ในส่วนข้อความหลักของเอกสาร NewDoc.Paragraphs.count คือหมายเลขดัชนีของย่อหน้าข้อความที่กำลังเพิ่มอยู่ทุกประการ

หากคุณต้องการแทรกตาราง คุณสามารถใช้วัตถุตารางได้ วิธีการเพิ่มสามารถเพิ่มตารางใหม่ภายในช่วงที่ระบุ ตัวอย่างต่อไปนี้เพิ่มตาราง 3x4 ที่จุดเริ่มต้นของเอกสารที่ใช้งานอยู่

->SetmyRange=ActiveDocument.Range(เริ่มต้น:=0,สิ้นสุด:=0)

ActiveDocument.Tables.AddRange:=myRange,NumRows:=3,NumColumns:=4->

สามารถรับตารางได้โดยใช้อักขระแท็บ รหัสต่อไปนี้จะแทรกตาราง 1x4 ที่ส่วนท้ายของเอกสาร

->NewDoc.Content.InsertAfter"คะแนน"&vbTab&""&vbTab&"ผู้ประเมิน"&vbTab&""&vbCr->

ตารางที่สร้างขึ้นจะแสดงในรูปที่ 3:

-

3. การตั้งค่าหน้า

หลังจากเพิ่มย่อหน้าทั้งหมดลงในเอกสารแล้ว คุณสามารถใช้ออบเจ็กต์ PageSetup เพื่อตั้งค่าเพจได้ ซึ่งจะต้องดำเนินการโดยการตั้งค่าคุณสมบัติต่างๆ ของออบเจ็กต์ PageSetup

3.1 ตั้งค่าคอลัมน์และระยะห่างระหว่างคอลัมน์:

->newDoc.PageSetup.TextColumns.SetCountNumColumns:=2

newDoc.PageSetup.TextColumns.Spacing=CentimetersToPoints(2)->

3.2 ตั้งค่าระยะขอบหน้า:

->WithnewDoc.PageSetup

.TopMargin=เซนติเมตรถึงจุด(4.5)

.BottomMargin=เซนติเมตรถึงจุด(1.5)

.LeftMargin=เซนติเมตรถึงจุด(0.8)

.RightMargin=เซนติเมตรถึงจุด(2)

จบด้วย ->

3.3 กำหนดขนาดกระดาษ:

->WithnewDoc.PageSetup

.PageHeight=CentimetersToPoints(28.1)

.PageWidth=CentimetersToPoints(38.9)

จบด้วย ->

รายการการตั้งค่าอื่นๆ จะไม่อธิบายโดยละเอียด

4. เอกสารส่งออก

สำหรับเอกสารที่สร้างขึ้น เราสามารถเลือกบันทึกเป็นไฟล์ดิสก์หรือพิมพ์ออกมาโดยตรง:

->newDoc.SaveAsFileName:="Sample.doc"

newDoc.PrintOut->

ตัวอย่างการใช้งาน

วิธีการข้างต้นถูกนำไปใช้ในระบบตรวจสอบอัตโนมัติของคอมพิวเตอร์ที่พัฒนาโดยผู้เขียนสำหรับฝ่ายองค์กรของคณะกรรมการพรรคเทศบาล โดยกระบวนการของระบบจะแสดงในรูปที่ 4

-

เอกสารทดสอบที่สร้างโดยระบบนี้จำเป็นต้องใช้โดยตรงในการสอบเพื่อประเมินและเลือกผู้ปฏิบัติงานระดับรากหญ้า ขั้นแรก ผู้จัดทำคำถามจะป้อนพารามิเตอร์กระดาษทดสอบ นั่นคือ กฎสำหรับการขึ้นรูปเอกสาร จากนั้นซอฟต์แวร์จะจัดทำเอกสารโดยอัตโนมัติ เอกสารและส่งออกเอกสารในรูปแบบ Word ระบบซอฟต์แวร์ที่พัฒนาโดยผู้เขียนโดยใช้วิธีการข้างต้นตรงตามความต้องการของผู้ใช้อย่างเต็มที่ ขณะนี้ระบบได้ถูกนำมาใช้งานแล้ว ซึ่งช่วยปรับปรุงประสิทธิภาพการทำงานอย่างมาก และได้รับการยกย่องจากผู้ใช้

บทสรุป

วิธีสร้างเอกสาร Word ใน Visual Basic ที่เสนอในบทความนี้ขึ้นอยู่กับโมเดลออบเจ็กต์และใช้งานได้จริงในระดับสูง นอกจากนี้ยังสามารถใช้ในแพลตฟอร์มการพัฒนาอื่น ๆ ที่รองรับ ActiveX -