Tujuan kerja makmal
Kerja makmal berfungsi untuk mendapatkan kemahiran praktikal dalam menggunakan keupayaan bahasa Visual Basic for Applications semasa membuat prosedur pemprosesan teks menggunakan sifat dan kaedah objek Microsoft Word.
Maklumat asas tentang objekPerkataan, sifat dan kaedah mereka
Visual Basic for Applications menyokong satu set objek yang sepadan dengan elemen Word. Menggunakan sifat dan kaedah objek ini, anda boleh mengautomasikan semua operasi dalam Word. Walau bagaimanapun, adalah dinasihatkan untuk mengautomasikan pelaksanaan operasi yang tidak ada cara standard dalam Word atau melaksanakannya menggunakan alat standard adalah kerja yang memakan masa atau rutin.
Yang paling penting ialah:
Sebuah objek Dokumen mewakili dokumen terbuka yang baru atau yang telah dibuat sebelumnya.
Sifat utama objek Dokumen ialah:
Kira - bilangan buka masuk masa ini dokumen;
ActiveDocument - dokumen aktif.
Beberapa kaedah objek Dokumen dan koleksi Dokumen :
Buka - membuka fail yang mengandungi dokumen sedia ada dan secara automatik menambahkannya pada koleksi;
Tambah - menambah dokumen kosong baharu;
Jimat - menyimpan perubahan pada dokumen sedia ada tanpa menutupnya;
Jimat Sebagai (objek sahaja) - menyimpan dokumen aktif yang baru dibuat dalam folder semasa;
item - membolehkan anda mengakses elemen koleksi;
Aktifkan (objek sahaja) - mengaktifkan dokumen terbuka;
Cetak (hanya untuk objek) - cetak dokumen;
tutup - menutup dokumen.
Objek Perwatakan (simbol). Perkataan (perkataan). Ayat (tawaran), Perenggan (perenggan). Bahagian (bahagian dokumen), menyatakan penstrukturan teks dokumen.
Semua objek ini mempunyai sifat berikut:
Kira - harta itu mengembalikan bilangan elemen dalam koleksi;
Pertama - harta itu mengembalikan objek yang merupakan elemen pertama koleksi;
Terakhir - harta mengembalikan objek yang terakhir
unsur.
Koleksi Watak , Kata-kata , Ayat mempunyai satu kaedah sahaja item(Indeks) .
Koleksi Perenggan mempunyai semua sifat yang disenaraikan di atas untuk kumpulan koleksi tertentu dan banyak sifat yang nilainya menentukan format perenggan.
Format perenggan juga boleh ditentukan menggunakan kaedah. Berikut ialah beberapa kaedah pengumpulan Perenggan:
item - mentakrifkan elemen koleksi;
Tambah - menambah baru perenggan kosong(parameter kaedah menentukan titik sisipan, ditentukan oleh objek Julat);
SisipPerenggan , InsertParagraphAfter , SisipkanPerengganSebelumnya - masukkan perenggan kosong dan bukannya teks sama ada selepas atau sebelum teks yang ditentukan oleh objek Pemilihan atau Julat;
Tetapkan semula - mengalih keluar pemformatan manual, menggunakan format yang ditentukan oleh gaya perenggan pada perenggan;
Inden , Luar biasa - menambah atau mengurangkan inden perenggan dari tepi helaian;
TabHangingIndent ( Kira ), TabIndent ( Kira ) - meningkat ( Kira>0), menurun ( Kira<0) выступ или отступ абзаца от края листа на заданное количество позиций;
Angkasa 1, Angkasa 2, Angkasa 15 - tetapkan jarak baris (satu, dua, satu setengah).
Objek Julat (julat) dan Pemilihan (highlight) mewakili bahagian dokumen.
Sebuah objek Julat membolehkan anda menentukan julat sewenang-wenangnya, yang merupakan urutan elemen diindeks dan boleh diperolehi melalui kaedah Julat atau harta benda Julat objek lain.
Sifat objek Julat ialah:
Mulakan - Kedudukan watak permulaan julat.
tamat - kedudukan aksara akhir julat.
Teks - membolehkan anda mendapatkan atau menukar kandungan objek.
Sebuah objek Pemilihan menentukan kawasan yang dipilih (serpihan) dalam dokumen. Pemilihan dalam dokumen mentakrifkan kawasan bersebelahan elemen, tetapi bukan julat yang ditakrifkan oleh permulaan dan penghujungnya. Hanya satu pilihan boleh dibuat, jadi satu objek Pilihan boleh aktif pada satu masa. Sebuah objek Pemilihan boleh diperolehi menggunakan harta tersebut Pemilihan atau kaedah Pilih objek lain.
Di bawah adalah beberapa kaedah yang wujud dalam objek Pemilihan Dan Julat :
Bergerak - kaedah untuk memindahkan titik sisipan;
MoveStart , BergerakEND - kaedah untuk menukar nilai sifat Mula dan Tamat;
Runtuh - meruntuhkan julat ke permulaan atau penghujungnya.
Seterusnya - kaedah mendapatkan pautan ke elemen seterusnya bagi koleksi objek dalam julat atau serpihan yang dipilih;
Padam - memadam teks dalam julat.
InsertAfter , MasukkanSebelum memasukkan teks sebelum atau selepas teks dalam julat. Selepas anda menampal teks, julat berkembang untuk memasukkan teks yang ditampal.
Salinan - menyalin objek ke papan keratan;
potong - mengalihkan objek ke papan keratan;
tampal - membolehkan anda meletakkan kandungan penimbal dalam kawasan yang ditentukan oleh objek Julat atau Pemilihan.
10. Pengaturcaraan dalam Word
10.1 Mengapa program dalam Word
Mencipta aplikasi VBA dalam Word, situasi biasa
Word ialah aplikasi tertua dan paling popular yang disertakan dalam Microsoft Office. Dalam kebanyakan organisasi, pengguna menyediakan dokumen dalam Word.
Dari sudut pengaturcaraan, Word adalah alat untuk menghasilkan laporan mengenai pangkalan data. Dalam kes ini, laporan ialah sebarang dokumen yang dijana berdasarkan maklumat daripada pangkalan data, contohnya, perjanjian, sijil penerimaan, pesanan resit tunai, pengumuman untuk sumbangan tunai, pesanan kepada jabatan perakaunan, invois, dsb. Sudah tentu, laporan yang boleh dijana dalam Word juga termasuk dokumen dengan data ringkasan - laporan tempoh, penyata, dsb.
Penulis terpaksa membuat aplikasi dengan laporan yang dibangunkan dalam pelbagai produk perisian - Microsoft Access, Crystal Reports, Microsoft Reporting Services, dll. Jika aplikasi anda menjana laporan pangkalan data dalam Microsoft Word, maka, kemungkinan besar, laporan tersebut tidak akan menjadi yang terpantas dari segi penjanaannya dan bukan yang paling mudah dari segi pengaturcaraan. Tetapi mereka pasti akan menjadi yang paling mesra terhadap pengguna akhir. kenapa?
Selalunya di perusahaan terdapat keperluan untuk membetulkan hanya beberapa baris dalam borang laporan - sebagai contoh, bukannya "Pengarah" meletakkan "Pemangku Pengarah". Jika laporan dibuat dalam Crystal Reports atau Microsoft Reporting Services, anda perlu menghubungi pembangun dengan segera. Dan selepas beberapa lama I.O. akan disahkan sebagai pengarah, dan pembangun perlu mengedit laporan itu semula.
Jika laporan itu pada mulanya dibuat dalam dokumen Word, maka pengguna sentiasa boleh membuat perubahan yang diperlukan pada dokumen yang dibuat - sebahagian besar pengguna dalam perusahaan tahu cara bekerja dalam Word. Tidak perlu segera mencari pembangun lagi.
Terdapat faedah lain untuk menghasilkan laporan dalam Word. Sebagai peraturan, apabila menghasilkan laporan dalam Word, nilai daripada pangkalan data digantikan ke dalam templat laporan, yang disimpan dalam pangkalan data atau sistem fail (dalam fail *.dot). Jika format laporan adalah rumit, dengan banyak reka bentuk khusus (contohnya, pengumuman untuk sumbangan tunai), maka adalah lebih mudah untuk menyediakan templatnya dalam Word daripada, sebagai contoh, dalam Laporan Kristal atau Perkhidmatan Pelaporan.
Satu lagi aplikasi perisian Word berfungsi dengan format dokumen yang berbeza. Word boleh berfungsi dengan dokumen pelbagai format. Keupayaan ini boleh digunakan untuk pemprosesan besar-besaran dokumen.
Satu kes daripada amalan: dalam direktori pada cakera kami telah mengumpul beberapa ratus dokumen "pelbagai saiz" daripada pengguna yang berbeza. Sebahagian daripada mereka dicipta dalam Word dalam versi berbeza, ada yang hanya fail teks, beberapa dokumen dalam format HTML, XML atau EML (mesej e-mel). Perusahaan telah melaksanakan sistem pengurusan dokumen berdasarkan SharePoint Portal Server dan kami perlu membawa semua dokumen ini kepada satu format (Word 2003) dan memuat naiknya ke SharePoint Portal Server. Sudah tentu, tanpa automasi dalam keadaan sedemikian, anda perlu bermain-main untuk masa yang lama.
Aplikasi perisian ketiga Word ialah memformat dokumen, contohnya, menggunakan gaya secara pemrograman, mencari dan menggantikan bahagian teks dalam banyak dokumen sekaligus, bekerja dengan struktur dokumen, dsb. Lazimnya, tugas sedemikian ditetapkan di rumah penerbitan, contohnya, semasa menyediakan manuskrip.
Modul carian tidak dipasang.
Perkataan VBA, bagaimana ia dilakukan
(Tamat. Bermula di No. 7)
Peristiwa
Peristiwa ialah tindakan yang dikenali oleh objek (contohnya, klik tetikus pada bar menu, tekan kekunci, dokumen baharu dibuka, pengguna menutup aplikasi) yang mana respons boleh diprogramkan. Apabila sesuatu peristiwa berlaku, kaedah itu diaktifkan, i.e. atur cara dan fungsi yang telah ditetapkan yang berkaitan dengan objek mula dilaksanakan.
Pengaktifan kaedah boleh berlaku bukan sahaja akibat tindakan pengguna, tetapi juga apabila peristiwa berlaku, seperti ralat dalam program atau ketibaan masa tertentu, dsb., dalam kes ini kaedah itu dikatakan diaktifkan oleh sistem. Prosedur pengendalian acara boleh diakses daripada editor VBA. Apabila memprogramkan objek, seperti borang, kami mempunyai akses kepada senarai keseluruhan prosedur acara. Pada asasnya, sebab kejadian objek yang berbeza tidak berbeza antara satu sama lain, sebab kejadiannya tetap klik tetikus yang sama, tekan kekunci, perubahan fokus objek, dll., tetapi prosedur untuk memprosesnya dibahagikan mengikut kepada kepunyaan mereka kepada objek itu.
Anda boleh memprogramkan tindak balas kepada klik tetikus pada medan Borang dan Butang Perintah dalam borang ini dengan cara yang berbeza; prosedur untuk memproses acara yang nampaknya sama akan berbeza, kerana akan tergolong dalam objek yang berbeza. Terdapat juga urutan di mana peristiwa berlaku yang mesti diambil kira semasa memprogramkannya. Sebagai contoh, acara Klik didahului oleh acara MouseDown dan acara MouseUp. Tetapi perlu diingatkan bahawa tidak perlu mengambil kira semua peristiwa semasa menulis program anda, anda hanya perlu memilih yang anda perlukan untuk bekerja. Anda boleh melakukannya tanpa pemproses acara pengaturcaraan, tetapi sebaik sahaja anda memutuskan untuk menulis program yang mengandungi borang pengguna, anda akan segera berhadapan dengan keperluan untuk memprogramkan prosedur pemprosesan acara.
Kelas objek
Satu lagi konsep penting dalam pengaturcaraan berorientasikan objek ialah kelas. Kelas ialah templat dari mana objek dicipta semasa pelaksanaan program. Kelas mentakrifkan sifat dan kaedah sesuatu objek. Jika kita mengambil contoh dari kehidupan, maka sebagai kelas objek kita boleh mengambil kelas sekolah, di mana objek itu adalah pelajar, masing-masing mempunyai sifat tersendiri yang unik untuk mereka. Selain itu, setiap objek dalam kelas mempunyai satu atau lebih sifat yang sama, contohnya, umur, yang menentukan sama ada objek tergolong dalam kelas.
Objek yang dicipta daripada kelas dipanggil contoh kelas.
Model Objek Aplikasi
Sebelum anda mula mencipta program automasi untuk bekerja dengan aplikasi, anda perlu membiasakan diri dengan model objek (hierarki kelas) aplikasi. Hierarki kelas mentakrifkan hubungan antara objek dan mengandungi maklumat tentang akses kepada objek lain. VBA menggunakan Pelayar Objek untuk tujuan ini.
Tetingkap melihat objek dipaparkan seperti berikut:
1. Aktifkan tetingkap Visual Basic Editor.
2. Pilih arahan View\View Objects (atau tekan F2).
Tetingkap View Objects akan muncul pada skrin (Gamb. 1).
3. Pilih perpustakaan yang diperlukan daripada senarai perpustakaan yang terletak di sudut kiri atas.
Tetingkap Kelas memaparkan senarai semua kelas dalam perpustakaan yang dipilih.
4. Pilih kelas yang diperlukan dalam senarai Kelas.
Senarai komponen kelas yang dipilih akan muncul di sebelah kanan tetingkap paparan, i.e. sifat, pemalar dan kaedahnya.
5. Pilih baris yang diperlukan dalam senarai komponen.
Maklumat tambahan akan muncul dalam tetingkap bantuan yang terletak di bawah.
Jika anda memerlukan maklumat terperinci tentang komponen kelas, klik ikon tanda soal pada bar alat.
PENGATURCARAAN DALAM WORD.
Model Objek Perkataan
Dalam aplikasi Word kita perlu bekerja dengan objeknya. Oleh itu, mari kita lihat mereka dengan lebih terperinci.
Dalam Rajah. Rajah 2 menunjukkan model lengkap objek Word. Objek utama, berdiri di bahagian atas piramid hierarki objek, adalah Word itu sendiri, dianggap sebagai aplikasi (Aplikasi), di peringkat seterusnya terdapat set objek (Dokumen, Dialog, Windows, dll.) dan objek tunggal ( sebagai contoh, Pemilihan). Setiap daripada mereka juga mengandungi sejumlah besar objek, sifat dan kaedah. Contohnya, objek Dokumen termasuk objek yang dikaitkan dengannya, seperti Perkataan, Perenggan, Penanda Halaman, Aksara, Dokumen, dsb. Objek ini pula mengandungi lebih banyak objek, sifat dan kaedah. Objek yang termasuk objek serupa dipanggil set atau koleksi (Koleksi), ia dibezakan dengan nama yang ditulis dalam bentuk jamak (contohnya, Dokumen, Windows, Perkataan). Menggunakan sifat dan kaedah yang wujud dalam objek Koleksi, anda boleh memilih satu objek tertentu daripadanya untuk diproses. Koleksi yang berbeza boleh mengandungi objek yang sama, contohnya, objek Words kepunyaan koleksi Dokumen, dikaitkan dengan objek Pemilihan dan dengan objek Julat. Objek Words itu sendiri adalah koleksi objek. Hanya kerana objek tergolong dalam koleksi tidak bermakna ia dianggap sebahagian daripada sesuatu yang lain.
Untuk melihat keseluruhan model objek Word, mari gunakan tetingkap Object Viewer dalam editor Visual Basic.
Dalam tetingkap Visual Basic Editor, klik butang Lihat Objek dan pilih Word daripada menu pop timbul senarai Pilih Perpustakaan. Di sebelah kanan tetingkap, di bawah tajuk Kelas, semua set objek Word akan disenaraikan, dan di sebelah kiri - semua sifat dan kaedah objek yang dipilih.
Mari kita beralih kepada penerangan tentang objek utama dan koleksi objek Word, kaedah dan sifatnya, serta contoh penggunaannya.
Objek aplikasi
Seperti yang dinyatakan di atas, objek ini mewakili aplikasi Word. Objek Aplikasi termasuk sifat dan kaedah yang mengembalikan objek peringkat atas.
Sebagai contoh, sifat ActiveDocument mengembalikan objek Dokumen dan harta yang dipanggil Aplikasi digunakan untuk mengembalikan objek Aplikasi. Contoh berikut menunjukkan nama pengguna untuk Word. Nama ini direkodkan dalam menu Alat/Pilihan dalam tab Pengguna. Pernyataan MsgBox ialah fungsi VBA yang memaparkan kotak dialog dengan mesej MsgBox Application.UserName (Rajah 3).
Banyak sifat dan kaedah yang mengembalikan objek antara muka pengguna yang paling biasa—seperti dokumen aktif (sifat ActiveDocument)—boleh digunakan tanpa penentu objek Aplikasi.
Sebagai contoh, bukannya menulis Application.ActiveDocument.PrintOut, anda hanya boleh menulis ActiveDocument.PrintOut. Sifat dan kaedah yang boleh digunakan tanpa penentu objek Aplikasi dianggap "global". Untuk melihat sifat dan kaedah global dalam Pemapar Objek, klik pada baris<глобальные>di bahagian atas senarai dalam blok Kelas.
Objek Aplikasi mempunyai lebih 80 sifat yang mencerminkan semua tetapan aplikasi. Mari kita senaraikan sebahagian daripadanya (Jadual 1).
Bagaimanakah anda boleh menukar sifat objek Aplikasi dalam program semasa melakukan sesuatu? Terdapat beberapa prosedur khas yang boleh digunakan untuk melakukan ini. Prosedur ini mempunyai nama khas dan dilakukan secara automatik semasa beberapa operasi (Jadual 3).
Dengan memasukkan rentetan arahan VBA ke dalam makro ini, anda boleh mempengaruhi objek, contohnya, semasa membuat dokumen baharu, alih keluar bar skrol dan bar status daripada skrin dengan menulis makro berikut dalam modul Normal:
Sub AutoBaharu Awam()
Application.DisplayScrollBars = Palsu
Application.DisplayStatusBar = Palsu
Malah, anda boleh menyimpan makro ini dalam mana-mana templat atau dokumen. Pengecualian ialah makro AutoExec, yang hanya berfungsi daripada templat Normal.dot yang disimpan dalam folder yang ditentukan sebagai folder pelancaran.
Tindakan serupa boleh dilakukan menggunakan prosedur pengendalian acara objek Aplikasi.
Objek Aplikasi mempunyai beberapa peristiwa (Jadual 4).
Untuk memprogramkan respons kepada peristiwa objek Aplikasi, anda mesti melakukan beberapa tindakan terlebih dahulu:
1. Isytiharkan pembolehubah objek dalam modul kelas.
2. Catatkan prosedur pemprosesan acara.
3. Mulakan objek yang diisytiharkan daripada modul lain.
Bagaimana untuk mengisytiharkan pembolehubah Objek
Untuk melakukan ini, anda perlu mencipta modul kelas baharu dan mengisytiharkan objek jenis Aplikasi dengan acara. Untuk melakukan ini, pilih baris Modul Kelas daripada menu Sisipkan, dan dalam tetingkap Program untuk modul kelas baharu, masukkan kod berikut (Gamb. 4):
Apl Awam DenganAcara Sebagai Word.Application
Panggil tetingkap sifat dan tukar sifat Nama daripada Kelas1 kepada EventClassModule.
Penerangan Prosedur Acara
Selepas objek baru telah diisytiharkan dengan peristiwa, ia akan muncul dalam tetingkap Program dalam senarai juntai bawah Objek, dan anda boleh menulis prosedur acara untuk objek baharu. (Apabila anda memilih objek baharu dalam senarai Objek, peristiwa yang sah untuknya disenaraikan dalam senarai juntai bawah Prosedur.) Pilih acara daripada senarai juntai bawah Prosedur, dan prosedur kosong ditambahkan pada modul kelas (Rajah 5). Anda boleh menulis kod yang diperlukan untuk mengendalikan acara.
Memulakan Objek yang diisytiharkan
Sebelum prosedur dilaksanakan, adalah perlu untuk menyambungkan objek yang diisytiharkan dalam modul kelas (kami memanggilnya App) ke objek Aplikasi. Ini dilakukan oleh kod berikut dari mana-mana modul.
Malapkan X Sebagai EventClassModule Baharu
Sub Daftar()
Tetapkan X.App = Word.Application
Kini yang tinggal hanyalah untuk melengkapkan prosedur Pendaftaran. Anda boleh menjalankannya dari menu atau memanggilnya dari prosedur modul lain. Objek App dalam modul kelas kemudiannya akan menunjuk ke objek Aplikasi Word, dan prosedur acara dalam modul kelas akan dilaksanakan apabila peristiwa berlaku.
Koleksi objek Dokumen
Dokumen ialah koleksi semua objek Dokumen yang sedang dibuka dalam Word.
Set ini mempunyai sifat, kaedah dan peristiwa tersendiri.
Set Dokumen mempunyai beberapa sifat (Jadual 5).
Anda boleh menggunakan sifat Documents untuk mengembalikan set Dokumen. Contoh berikut menunjukkan nama dokumen terbuka
Untuk Setiap aDoc Dalam Dokumen
aName = aName & aDoc.Name & vbCr "vbCr ialah pemalar yang mentakrifkan watak carriage return (kod 13)
Set Dokumen mempunyai lebih banyak kaedah (Jadual 6).
Kaedah Tambah digunakan untuk mencipta dokumen kosong baharu dan menambahkannya pada koleksi Dokumen. Contoh berikut mencipta dokumen baharu berdasarkan templat Normal.dot.
Tambah sintaks kaedah:
ungkapan.Tambah(Templat, Templat Baharu)
ungkapan - ungkapan yang mengembalikan objek Dokumen.
Templat ialah parameter pilihan. Mengandungi nama templat yang akan digunakan untuk dokumen baharu. Jika parameter diabaikan, Normal.dot digunakan.
NewTemplate ialah parameter pilihan. Jika parameter adalah Benar, dokumen dibuka sebagai templat. Nilai lalai ialah Palsu.
Kaedah Item digunakan untuk memilih item tertentu daripada set. Unsur boleh dikenal pasti dengan nama atau nombornya dalam set.
Sintaks kaedah:
ungkapan.Item(Indeks)
Ungkapan - Ungkapan yang mengembalikan objek Dokumen.
Indeks - nama atau nombor indeks elemen set.
Kaedah Item ialah kaedah lalai untuk set. Oleh itu dua baris kod berikut adalah setara.
Permohonan.Dokumen(1)
Permohonan.Dokumen.Item(1)
Baris berikut juga setara:
Application.Documents("Report.doc")
Application.Documents.Item("Report.doc")
Buka fail dokumen menggunakan kaedah Buka.
Sintaks kaedah Terbuka adalah seperti berikut:
expression.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument, WritePasswordTemplate, Format)
ungkapan ialah ungkapan yang mengembalikan objek Dokumen.
FileName - parameter "nama fail" yang diperlukan. Parameter ini menentukan laluan ke dokumen. Anda boleh merakam berbilang fail dengan mengasingkan nama fail dengan ruang.
ConfirmConversions ialah parameter pilihan yang boleh menjadi Benar jika anda mahu memaparkan kotak dialog Tukar Fail jika fail itu tidak dalam format Word.
ReadOnly ialah parameter pilihan. Sama dengan Benar jika fail dibuka baca sahaja.
AddToRecentFiles - parameter pilihan; jika sama dengan Benar, fail itu ditambahkan pada senarai fail di bahagian bawah menu Fail.
PasswordDocument ialah parameter pilihan. Mengandungi kata laluan untuk membuka dokumen.
PasswordTemplate ialah parameter pilihan. Mengandungi kata laluan untuk membuka templat.
Kembalikan ialah parameter pilihan. Jika FileName mengandungi nama fail dokumen yang telah dibuka, maka jika parameternya True, dokumen itu dibuka semula tanpa menyimpan perubahan yang dibuat. Jika nilai parameter adalah Palsu, maka dokumen yang sudah terbuka akan diaktifkan.
WritePasswordDocument ialah parameter pilihan. Mengandungi kata laluan yang diperlukan semasa menyimpan perubahan dokumen.
WritePasswordTemplate ialah parameter pilihan. Mengandungi kata laluan untuk menyimpan perubahan templat.
Format ialah parameter pilihan. Mengandungi penukar untuk menukar fail. Boleh ditulis sebagai salah satu pemalar: wdOpenFormatAuto, wdOpenFormatDocument, wdOpenFormatRTF, wdOpenFormatTemplate, wdOpenFormatText, atau wdOpenFormatUnicodeText. Nilai lalai ialah wdOpenFormatAuto.
Untuk menentukan format fail luaran, gunakan sifat OpenFormat bagi objek FileConverter, yang mengembalikan nilai yang ditulis pada parameter ini.
Kod berikut membuka fail Sales.doc. Nama fail ditunjukkan dalam petikan.
Documents.Open FileName:="C:\My Documents\Sales.doc" " membuka dokumen "Sales.doc"
Contoh berikut merentasi dokumen dalam koleksi Dokumen untuk mencari dokumen dalam koleksi bernama "Report.doc". Jika dokumen ini berada dalam koleksi Dokumen, ia diaktifkan; jika tidak, dokumen dibuka.
Untuk Setiap dokumen Dalam Dokumen
Jika doc.Name = "Report.doc" Kemudian dijumpai = Benar
Jika dijumpai<>Benar Kemudian
Documents.Open FileName:="C:\Documents\Report.doc"
Documents("Report.doc").Aktifkan
Kaedah Tutup digunakan untuk menutup dokumen dan mempunyai sintaks:
expression.Close(SaveChanges, OriginalFormat, RouteDocument)
ungkapan - ungkapan yang mengembalikan objek Dokumen atau Dokumen.
SaveChanges ialah parameter pilihan. Mentakrifkan tindakan yang perlu diambil semasa menyimpan dokumen. Boleh menjadi salah satu pemalar WdSaveOptions berikut:
WdDoNotSaveChanges (jangan simpan perubahan);
WdPromptToSaveChanges (tunjukkan kotak dialog yang meminta anda menyimpan perubahan);
WdSaveChanges (simpan tanpa digesa).
OriginalFormat ialah parameter pilihan. Menentukan format untuk menyimpan dokumen. Boleh menjadi salah satu daripada pemalar wdOriginalFormat berikut: wdOriginalDocumentFormat, wdPromptUser, wdWordDocument.
RouteDocument ialah parameter pilihan. Benar jika dokumen dimajukan kepada penerima seterusnya.
Baris kod berikut menutup dokumen bernama "Report.doc" tanpa menyimpan perubahan. Ia menentukan parameter SaveChanges, yang diberikan nilai "jangan simpan perubahan" oleh pemalar.
Documents("Report.doc").Tutup SaveChanges: = wdDoNotSaveChanges
Kaedah Simpan digunakan untuk menyimpan satu atau semua dokumen. Kaedah ini mempunyai beberapa jenis rakaman, bergantung pada hasil yang dijangkakan.
1. Ungkapan.Simpan.
Rekod dalam jenis ini menyimpan dokumen atau templat yang ditentukan. Jika dokumen atau templat belum disimpan sebelum ini, kotak dialog Simpan Sebagai menggesa pengguna untuk nama fail.
Di sini ungkapan ialah ungkapan yang mengembalikan objek Dokumen atau Templat.
2. Expression.Save(NoPrompt, OriginalFormat).
Entri ini menyimpan semua dokumen dalam set Dokumen. Jika dokumen belum disimpan sebelum ini, kotak dialog Simpan Sebagai menggesa pengguna untuk nama fail. Entri ini juga mengandungi dua parameter pilihan.
Parameter NoPrompt. Jika tetapan ini Benar, Word menyimpan semua dokumen secara automatik. Jika nilai parameter adalah Palsu, maka Word menggesa pengguna untuk menyimpan setiap dokumen yang telah diubah.
Parameter OriginalFormat menentukan laluan untuk menyimpan dokumen. Boleh sama dengan salah satu pemalar wdOriginalFormat berikut: wdOriginalDocumentFormat, wdPromptUser atau wdWordDocument.
3. Ungkapan.Simpan(Ulasan)
Entri ini akan menyimpan versi dokumen yang ditentukan dengan ulasan.
Contoh berikut menyimpan dokumen aktif.
ActiveDocument.Simpan
Contoh berikut menyimpan setiap dokumen dalam koleksi Dokumen tanpa menggesa pengguna.
Documents.Save NoPrompt:=True, OriginalFormat:=wdOriginalDocumentFormat
Jika fail Sales.doc dibuka, kod berikut menyimpan versi fail dengan ulasan ditambahkan padanya.
Untuk Setiap dokumen dalam Dokumen
Jika Instr(1, doc.Name, "Sales.doc", 1) > 0 Kemudian
doc.Versions.Save Comment:="perubahan kecil"
Objek dokumen
Mewakili objek Dokumen, elemen koleksi Dokumen. Tidak seperti set Dokumen, objek Dokumen mempunyai lebih daripada seratus sifat. Pada asasnya, sifat objek Dokumen digunakan untuk mengembalikan objek atau set objek lain untuk berfungsi dengan sifat dan kaedahnya. Dalam dokumen, anda terutamanya perlu bekerja dengan perkataan, perenggan, simbol dan penanda halaman, jadi mari kita lihat beberapa sifat objek Dokumen yang mengembalikan objek ini (Jadual 7).
Untuk menjadi selektif tentang dokumen daripada set, anda boleh menggunakan sifat ActiveDocument bagi objek Aplikasi.
Contoh berikut menggunakan kaedah Aktifkan untuk memulakan dokumen bernama "Dokumen 1." Contoh juga menetapkan orientasi mendatar muka surat dan mencetak dokumen.
Dokumen("Dokumen 1").Aktifkan
ActiveDocument.PageSetup.Orientation = wdOrientLandscape
ActiveDocument.PrintOut
Sifat Bookmarks mengembalikan set Bookmarks yang mengandungi semua penanda halaman dalam dokumen.
Contoh ini mencari kedudukan mula dan akhir untuk penanda halaman pertama dalam dokumen aktif.
Dengan ActiveDocument.Bookmarks(1)
BookStart = .Mula
Sifat Aksara mengembalikan set Aksara yang mengandungi semua aksara dalam dokumen.
Contoh berikut menunjukkan aksara pertama dalam pemilihan. Jika tiada pilihan, maka aksara pertama selepas kursor dikembalikan.
char = Pemilihan.Watak(1).Teks
MsgBox "watak pertama ialah ... " & char
Contoh lain mengembalikan bilangan aksara dalam ayat pertama (ruang disertakan dalam kiraan).
numchars = ActiveDocument.Ayat(1).Characters.Count
Baca tentang peristiwa dan kaedah objek Dokumen dalam artikel seterusnya.
Malyshev S.A.
|
Buku ini akan membantu anda menguasai persekitaran bersepadu pembangunan VBA dan belajar memprogram dalam VBA menggunakan objek, sifat, kaedah dan peristiwanya. Teknik pengaturcaraan yang dibincangkan digambarkan dengan contoh yang boleh anda cuba serta-merta dalam amalan. Anda akan dapat menggunakan pengetahuan yang diperoleh untuk mengkonfigurasi dan meningkatkan popular permohonan pejabat, termasuk Aplikasi pejabat XP dan untuk mencipta aplikasi anda sendiri.
Buku ini direka untuk mereka yang bersiap dengan cepat dan tanpa usaha tambahan Belajar memprogram untuk Windows menggunakan VBA.
Buku:
Bekerja dengan teks dalam Word VBA
Bekerja dengan teks dalam Word VBA
Objek Julat dan Pemilihan ialah titik permulaan untuk hampir semua operasi yang boleh anda lakukan pada teks menggunakan Word VBA. Sesetengah tindakan ini boleh digunakan pada dokumen secara keseluruhan, tetapi secara amnya anda memerlukan julat atau pilihan sebelum anda membuat perubahan.
Objek Julat dan Pilihan mempunyai banyak persamaan, tetapi terdapat beberapa perbezaan utama. Kedua-dua objek mewakili jujukan aksara yang bersebelahan yang boleh anda lakukan pelbagai operasi. Kedua-dua objek mempunyai banyak sifat am dan kaedah. Walau bagaimanapun, sesetengah sifat dan kaedah adalah unik untuk pilihan dan yang lain adalah unik untuk julat. Perbezaan ketara ialah objek Pemilihan sepadan dengan pemilihan di kawasan tetingkap: teks, imej grafik atau mana-mana objek lain, manakala objek Julat wujud secara bebas daripada pemilihan dan sentiasa mengandungi teks.
Gunakan objek Pemilihan jika prosedur anda bergantung kepada pengguna, contohnya, pengguna mesti menentukan teks yang mana tindakan tertentu akan dilakukan atau jika anda perlu menunjukkan kepada pengguna dengan tepat teks yang akan diubah. Dalam situasi lain, objek Julat adalah lebih sesuai. Mereka menyediakan kelajuan yang lebih tinggi pelaksanaan program dan kurang menakutkan pengguna: Word mengemas kini kandungan skrin apabila kandungan kawasan yang dipilih berubah, dan kandungan skrin tidak dikemas kini apabila julat diubah. Selain itu, perubahan julat tidak ditunjukkan dalam pilihan yang dibuat pengguna.
Walaupun perbezaannya, objek Pemilihan dan Julat boleh dibuat antara satu sama lain. Ciri ini amat penting kerana banyak fungsi penyuntingan hanya berfungsi dengan julat. Berbeza dengan ini, satu-satunya cara paparkan kandungan julat kepada pengguna - pilihnya. Gunakan teknik mudah berikut.
* Untuk memilih julat, gunakan kaedah Pilihnya. Sebagai contoh, untuk objek RangeR arahannya ialah RangeR. Pilih.
* Untuk mengakses julat yang mewakili kandungan yang sama seperti kawasan yang dipilih, gunakan sifat Julat.
Ingat: jika kaedah yang berkaitan dengan data teks dipanggil pada julat dan anda mahu menggunakannya pada pemilihan, cuma sertakan pernyataan Pemilihan dalam kod anda. Julat. Nama Kaedah.
Word VBA menawarkan pelbagai kaedah untuk mengalih dan mengubah saiz julat dan pilihan. Dalam bahagian ini saya hanya menganggap yang paling penting sahaja; Anda perlu merujuk sistem bantuan untuk kaedah lain.
Kaedah Kembangkan mengembangkan julat atau pilihan sedia ada dengan menambahkan blok teks ke penghujung. Blok boleh menjadi watak, perkataan, perenggan, atau apa-apa lagi. Anda hanya boleh menambah satu blok yang dipratentukan; Selain itu, menambah blok tersebut pada permulaan julat atau pemilihan adalah tidak dibenarkan.
Untuk menambah perkataan pada kawasan yang diserlahkan yang akan mengikutinya serta-merta, gunakan arahan berikut:
Selection.Expand(wdWord)
Anda boleh menggunakan mana-mana pemalar berikut untuk memanjangkan objek; wdCharct er, wdWord, wdSentence, wdParagraph, wdSection, wdStory, wdCell, wdColumn, wdRow, wdTable dan (untuk objek Pilihan sahaja) wdLine. Lalai ialah pemalar wdWord.
Kini terdapat titik melekit yang harus kita tangani: Objek pilihan (tetapi bukan julat) juga mengandungi kaedah Kembangkan. Kaedah ini termasuk yang sesuai Alat perkataan, yang membolehkan anda mengembangkan kawasan yang dipilih semasa anda menggerakkan penuding tetikus. Setiap kali atur cara memanggil kaedah Lanjutkan, pemilihan dikembangkan oleh blok teks yang serta-merta mengikuti titik sisipan: perkataan semasa, ayat, perenggan, pemilihan atau keseluruhan dokumen. Jika anda menetapkan hujah sebagai satu aksara, seperti Selection.Expand("C"). kawasan yang dipilih akan dikembangkan kepada aksara yang ditentukan pertama kali ditemui.
Word VBA membolehkan anda mentakrifkan semula permulaan dan penghujung julat atau pemilihan. Cuma perlu diingat bahawa kaedah yang menyertakan perkataan Move dalam nama mereka menukar lokasi julat atau pemilihan: mereka tidak mengalihkan teks yang terkandung dalam objek yang ditentukan.
Kaedah Move menukar julat atau pemilihan dengan mula mengecilkannya, menandakan lokasinya dan tidak lagi mempunyai sebarang teks di dalamnya. Lokasinya bertepatan dengan permulaan objek asal. Kaedah Move kemudian menggerakkan objek "mampat" mengikut arahan anda. Setelah langkah selesai, anda boleh menggunakan kaedah Expand and Mover,nd untuk mengisi objek dengan teks.
Contoh berikut mengalihkan julat bernama ke belakang dua perenggan dalam dokumen. Ambil perhatian bahawa anda menggunakan pemalar bernama sebagai nilai argumen Uni t (untuk senarai semua pemalar bernama yang sah, lihat
"Memperluaskan julat dan pilihan" lebih awal dalam bab ini). Argumen Count ialah integer positif jika anda ingin mengalihkan objek ke hadapan melalui dokumen (iaitu, ke arah penghujung), atau integer negatif jika anda ingin mengalihkan objek ke belakang melalui dokumen. Dalam contoh di bawah, hujah tidak disertakan dalam kurungan kerana nilai pulangan kaedah (bilangan elemen yang dipindahkan) tidak digunakan:
oTheJulat .Unit Gerakkan: = waPerenggan, Kiraan, : = -2
Kaedah MoveStart. dan MoveEnd berfungsi dengan cara yang sama seperti kaedah Move, hanya mereka menukar titik permulaan atau penamat julat atau pemilihan, masing-masing. Arahan berikut akan mengalihkan permulaan pemilihan tiga perkataan lebih dekat ke penghujung dokumen:
Select-on.KoveStart Unit:= wdWord, Count:= 3
Ambil perhatian bahawa jika anda mengalihkan titik permulaan objek ke penghujung, Word akan mengecilkan julat atau pemilihan dan mengalihkannya mengikut arahan yang diberikan.
Sepasang kaedah lain, Start Of atau EndOf, akan merombak atau mengembangkan permulaan atau akhir julat atau pemilihan. Kaedah Start Of menggerakkan permulaan objek kembali ke permulaan blok semasa, manakala kaedah EndOt menggerakkan hujung objek ke hadapan ke hujung blok semasa.
Anda boleh menggunakan hujah Extend dengan sebarang kaedah untuk mengawal perkara yang Word lakukan. Jika bahagian kocok objek sudah berada di tepi yang anda cuba alihkan, tiada apa yang berlaku. Gunakan pemalar wdMove untuk mengecilkan objek, atau pemalar wdExtend untuk menggerakkan bahagian yang ditentukan sahaja. Di bawah ialah contoh yang berkaitan:
Pemilihan. Mula Unit:= wdAyat, Lanjutkan:= wdMove
Selalunya anda perlu memampatkan julat atau pilihan ke titik yang tidak mengandungi sebarang teks. Dari segi teknikal, julat atau pemilihan yang runtuh ialah julat yang titik permulaan dan penamatnya adalah sama. Memampatkan objek sedemikian adalah penting dalam situasi di mana anda perlu memasukkan medan, jadual atau elemen lain sebelum atau selepas kawasan atau julat yang dipilih tanpa menggantikan teks. (Anda boleh memasukkan teks kosong, perenggan baharu dan beberapa elemen lain dalam julat atau pemilihan "tidak dimampatkan").
Gunakan kaedah Runtuhkan untuk memampatkan julat atau pilihan. Anda boleh mengecilkan objek ke titik permulaan atau penamatnya menggunakan argumen Arah pilihan. Pernyataan berikut mengecilkan pemilihan ke titik permulaannya:
Pemilihan. Runtuh
Dan contoh ini mengecilkan pemilihan ke titik akhirnya:
Selection.Collapse(Arah:=wdCollapseEnd)
Jika anda meruntuhkan julat yang berakhir dengan tanda perenggan ke titik tamatnya (menggunakan pemalar wdCollapseEnd), Word akan meletakkan julat runtuh selepas tanda perenggan (bermaksud julat runtuh akan berada dalam perenggan seterusnya). Jika anda ingin meletakkan sesuatu sebelum tanda perenggan julat asal, anda mesti mengalihkan julat kembali menggunakan kaedah MoveEnd, menggunakan pernyataan seperti ini:
Unit Range.MoveEnd:= wdCharacter, Count:= -1
Memadam semua teks dalam julat atau pilihan adalah mudah: hanya gunakan kaedah Padam objek yang sepadan. Anda juga boleh menggunakan kaedah Potong jika anda ingin mengalih keluar teks dan meletakkannya pada papan keratan. Sudah tentu, kaedah Soru menyalin teks ke papan keratan tanpa menjejaskan teks dalam julat atau pemilihan.
Anda boleh menampal teks yang diletakkan sebelum ini pada papan keratan ke dalam mana-mana julat atau pilihan dengan menggunakan kaedah Tampal objek. Jika objek destinasi masih belum dimampatkan, teks yang ditampal hanya akan menggantikan teks asal dalam objek, sama seperti yang dilakukan semasa anda menjalankan perintah Tampal dalam Word.
Walaupun menggunakan papan keratan untuk memindahkan teks dari satu tempat ke tempat lain nampaknya agak biasa, kaedah ini tidak selalunya paling berkesan. Jauh lebih mudah untuk digunakan Sifat teks atau FormattedTeks julat atau pilihan. Tetapkan sifat ini kepada julat atau pilihan yang mengandungi teks yang ingin anda sampaikan, dan itu sahaja. Objek destinasi mesti dimampatkan sehingga teks yang dihantar mesti diganti teks sedia ada dalam objek.
Coretan kod berikut memindahkan teks daripada pemilihan kepada julat termampat yang terikat pada penanda halaman (baris keempat kod melakukan operasi pemindahan). Hanya teks itu sendiri masuk ke lokasi baharu; sebarang pemformatan hilang:
Dengan ActiveDocument.Bookmarks("TheBookmark")
ActiveDocument.Range(Mula:=.Mula, Tamat=.Mula)
RangeY.Text = Selection.Teks
Untuk menyampaikan teks dan memformatkannya, cuma gantikan sifat Teks dengan sifat FormattedText.
Teknik yang paling mudah diingati untuk menambah teks ialah menetapkan sifat Teks julat atau pilihan kepada teks yang anda pilih untuk dimasukkan. Ini digambarkan oleh contoh yang ditunjukkan di bawah:
Julat2.Teks = "Hei, hei! Tetapi tiada sesiapa di rumah!"
Ingatlah bahawa menggunakan sifat Teks akan menggantikan apa-apa yang ada pada objek. Untuk mengelakkan ini (melainkan anda benar-benar mahu menggantikan teks sedia ada), kecilkan objek terlebih dahulu.
Gunakan kaedah Sisip Sebelum atau Sisip Selepas objek Julat atau Pemilihan untuk memasukkan teks pada lokasi tertentu dalam dokumen tanpa menjejaskan teks sedia ada. Kaedah ini membolehkan anda memasukkan teks baharu sejurus sebelum atau selepas objek yang ditentukan, masing-masing. Word termasuk teks yang ditampal dalam kawasan atau julat yang dipilih.
Apabila menggunakan mana-mana kaedah, satu-satunya hujah ialah teks yang anda ingin masukkan. Coretan kod berikut menyisipkan perenggan baharu yang mengandungi perkataan Entri Tenusu pada permulaan pemilihan (perhatikan penggunaan pemalar VBA vbCr untuk menambah tanda perenggan). Selepas ini, perenggan baharu ditambahkan pada penghujung, yang bermula dengan tarikh semasa. Jika anda memilih keseluruhan perenggan sebelum melaksanakan kod ini, perenggan yang mengandungi tarikh semasa, akan muncul selepas tanda perenggan di kawasan yang diserlahkan.
Pengaturcaraan dalam VBA dalam Word
Teks output ke Dokumen perkataan
5.1. Objek Kata Asas
Word.Objek aplikasiSebagai tambahan kepada semua keupayaan pengaturcaraan VBA yang dibincangkan dalam Bahagian I, anda boleh menambah keupayaan untuk mengeluarkan semua hasil pengiraan, transformasi, mesej kepada dokumen Word, dengan keupayaan berlepas selanjutnya untuk mencetak. Untuk melakukan ini, anda perlu melihat objek asas aplikasi Word.
Masukkan model objek Word ialah objek Aplikasi kerana ia mengandungi semua objek Word lain. Elemennya pada tahap yang berbeza hierarki adalah kira-kira 180 objek. Objek Aplikasi akar itu sendiri mempunyai lebih seratus elemen: sifat, kaedah dan peristiwa.
Sifat Word.Application objectSifat mana-mana objek dibahagikan kepada dua kumpulan: sifat peserta (objek) dan sifat terminal (pembolehubah VBA biasa).
Sistem bersatu untuk mengatur bar menu dan butang alat disediakan oleh objek CommandBars, bantuan oleh Assistant dan carian oleh FileSearch.
Pusat Objek perkataan ialah koleksi Dokumen dan Templat, atau lebih tepatnya elemen konstituennya, dokumen itu sendiri dan templat.
Mari lihat objek latar belakang.
Objek AutoCorrect menyokong pembetulan automatik teks yang ditaip. Keupayaannya adalah setara dengan arahan AutoCorrect dalam menu Alat.
Objek Pelayar membenarkan anda mengalihkan titik sisipan yang menghala ke objek dalam dokumen.
Koleksi objek Dialog mewakili koleksi kotak dialog, terbina dalam Word. Anda tidak boleh menambah atau memadamkan elemen baharu daripada koleksi ini secara pengaturcaraan. Tetapi tetingkap yang sepadan boleh dibuka dan ditunjukkan pada skrin paparan dan dengan itu mengatur dialog oleh pengguna mengenai topik yang ditentukan oleh tetingkap yang sepadan.
Tiga objek yang berkaitan dengan tatabahasa dan semakan ejaan: Bahasa, Kamus, Cadangan Ejaan, – membolehkan anda menetapkan bahasa yang dikehendaki, pilih kamus, termasuk kamus tersuai, dan juga bekerjasama dengan senarai perkataan yang dicadangkan untuk pembetulan jika ralat ejaan dikesan. Perintah Ejaan dan Bahasa dalam menu Alat menyediakan yang serupa kefungsian apabila bekerja dengan dokumen secara manual.
Menggunakan objek Pilihan, anda boleh menetapkan pelbagai pilihan aplikasi dan dokumen secara pemrograman, sama seperti yang anda lakukan jika anda memilih arahan Pilihan pada menu Alat.
Bekerja dengan dokumen dan kelas DokumenApabila aplikasi dibuka, koleksi Dokumen dibuat yang mengandungi semua dokumen terbuka. Pada permulaan, koleksi mengandungi sekurang-kurangnya satu dokumen baharu atau sedia ada sebelum ini. dokumen baharu ditambah menggunakan kaedah Tambah, dan yang sedia ada ditambah menggunakan kaedah Buka objek Dokumen. Untuk sampai ke dokumen yang diperlukan, cukup untuk menunjukkan indeksnya - nama fail yang menyimpan dokumen, atau failnya nombor siri dalam koleksi. Kaedah Item boleh digunakan untuk tujuan yang sama, tetapi ia biasanya ditinggalkan. Kaedah Simpan membolehkan anda menyimpan dokumen, dan kaedah Tutup, dengan menyimpan dokumen dalam fail, menutupnya dan mengeluarkannya daripada koleksi.
Sifat Dialog global mengembalikan koleksi kotak dialog. Pemalar wdDialogFileOpen menentukan kotak dialog tertentu - objek kelas Dialog.
Kelas yang mentakrifkan penstrukturan teks dokumen
Teks adalah asas kepada kebanyakan dokumen. Ia boleh distrukturkan menggunakan unit yang berbeza apabila menyelesaikan masalah transformasi tertentu. Unit minimum teks biasanya simbol. Di samping itu, terdapat unit berikut: perkataan, ayat, perenggan, serta formasi yang lebih besar: halaman, perenggan, bab.
Kelas Aksara, Perkataan, Pernyataan, Perenggan, Bahagian membolehkan anda bekerja dengan urutan (koleksi) aksara, perkataan, ayat, perenggan dan bahagian. Paling unit besar selepas perenggan ada bahagian. Unsur koleksi Aksara, Perkataan dan Pernyataan ialah objek kelas Julat. Objek Julat membolehkan anda bekerja dengan sama ada satu elemen atau jujukan unsur yang sewenang-wenangnya. Dokumen, subdokumen, perenggan, bahagian - semuanya mempunyai kaedah atau sifat Julat yang mengembalikan julat yang dikaitkan dengan objek. Oleh itu, bekerja dengan teks dilakukan dalam satu cara atau yang lain melalui kaedah dan sifat objek Julat.
Dokumen Peristiwa Objek
Objek Dokumen boleh bertindak balas kepada tiga peristiwa yang berlaku akibat tindakan pengguna.
Jadual 16
Dokumen Peristiwa Objek Dokumen dan bahagiannyaMari kita lihat kelas utama yang mentakrifkan struktur dokumen.
1. Subdokumen (Subdocument) – koleksi dan subdokumen itu sendiri. Terdapat beberapa had yang munasabah pada saiz satu dokumen. Jika dokumen mempunyai lebih daripada 10–20 halaman, ia menjadi menyusahkan untuk digunakan. Dalam kes ini, ia mengandungi dokumen utama dan subdokumen. Dokumen utama dalam kes ini, ia mempunyai koleksi subdokumen, setiap daripada mereka, sebenarnya, dokumen yang boleh dikerjakan secara bebas.
Kaedah AddFromRange bagi kelas SubDocuments mencipta subdokumen dengan memilih kawasan daripada dokumen utama ditentukan oleh parameter Julat.
2. Jadual (Jadual), TablesOfAuthoritiesCategories (T.O.A.C), TablesOfAuthorities (TableOfAuthorities), TablesOfContents (TablesOfContent), TablesOfFigures (TablesOfFigure). Kelas Jadual mentakrifkan jadual "biasa" dengan bilangan baris dan lajur arbitrari dan pengisian medan sewenang-wenangnya. Kelas selebihnya mentakrifkan jadual jenis khas.
3. Bentuk(Bentuk), Bentuk Sebaris(Bentuk Sebaris)– kedua-dua koleksi dengan elemennya membolehkan anda menambah lukisan pada dokumen, tetapi bukan sahaja mereka. Objek ActiveX dan OLE juga merupakan elemen koleksi ini. Unsur-unsur kedua-dua koleksi ini berbeza dalam cara ia terikat pada dokumen: yang pertama boleh dialihkan secara bebas, yang kedua diikat dengan ketat pada kawasan tertentu dokumen.
4. Senarai(Senarai), ListParagraphs(ListParagraph), listTemplates (ListTemplate)– senarai adalah mudah untuk dimasukkan ke dalam dokumen apabila berurusan dengan penghitungan. Senarai boleh direka bentuk mengikut templat. Terdapat dua kumpulan templat: senarai bernombor dan senarai buletin. Koleksi ListTemplates mengandungi templat reka bentuk senarai dan kelas ListTemplate menerangkan templat tertentu. Templat digunakan pada senarai perenggan dan memberikannya struktur yang ditentukan oleh templat. Koleksi Senarai mengandungi senarai dokumen tersebut (senarai perenggan) yang diformatkan sebagai senarai bernombor atau senarai buletin. Koleksi ListParagraphs mewakili senarai perenggan daripada semua senarai dalam dokumen. Harta ListParagraphs, yang mengembalikan objek kelas yang sepadan, dimiliki bukan sahaja oleh dokumen, tetapi juga oleh objek Senarai dan Julat. Jadi, diberikan senarai - objek Senarai, anda boleh memilih senarai perenggan. Lebih kerap anda perlu melakukan operasi yang bertentangan - gunakan salah satu templat yang mungkin pada senarai perenggan, memberikannya struktur senarai "sebenar". Kemudian gunakan objek ListFormat.
5. Komen(Ulasan), Penanda Halaman(Penanda Halaman), Nota Kaki (Nota Kaki), Nota Akhir(Nota Akhir), Medan(Medan)– koleksi ini dan elemennya mencerminkan konsep bebas tetapi serupa. Ini adalah bahagian dokumen yang secara tidak langsung berkaitan dengannya. Semasa melihat dokumen biasa, mereka mungkin tidak kelihatan.
Koleksi komen dan kelas ulasan mentakrifkan ulasan. Komen, seperti yang anda ketahui, diperkenalkan untuk menerangkan istilah atau konsep tertentu dalam dokumen. Secara rasmi, mereka ditugaskan ke kawasan tertentu - objek julat.
Dokumen besar bahagian berasingan yang anda perlu akses selalu, ia patut diberikan dengan penanda halaman. Koleksi penanda halaman menentukan semua penanda halaman untuk dokumen tertentu.
Cara lain untuk mengulas ialah nota kaki. Ia boleh terdiri daripada dua jenis: subhalaman (di bahagian bawah halaman) dan akhir (di penghujung dokumen). Yang pertama dikumpulkan dalam koleksi nota kaki, yang kedua - nota hujung.
6. Medan (Medan) - koleksi ini membolehkan anda bekerja dengan medan dokumen. Salah satu ciri medan ialah nilainya dikemas kini secara automatik bergantung pada keadaan atau konteks luaran yang berubah.
7. Julat Cerita (Julat) - koleksi ini mewakili koleksi bahagian dokumen yang dipanggil serpihan (Story). Bilangan serpihan dokumen yang berbeza ditetapkan. Anda tidak boleh menambah item pada koleksi ini dengan cara biasa menggunakan kaedah Tambah. Serpihan muncul dalam koleksi apabila bahagian dokumen yang sepadan dibuat.
Serpihan mempunyai jenis yang ditentukan oleh pemalar daripada penghitungan wdStoryType. Serpihan utama ialah teks dokumen, jenis yang ditentukan oleh pemalar wdMainTextStory. Komen, pautan dan pengaki membentuk serpihan jenis lain, iaitu serpihan itu sendiri ialah objek Julat. Jadi terima kasih kepada serpihan, anda boleh, sebagai contoh, bekerja dengan koleksi ulasan sebagai satu kawasan.
8. Pembolehubah (Pembolehubah) – anda boleh mengaitkan koleksi pembolehubah jenis Varian dengan dokumen. Ini adalah koleksi penting untuk pengaturcara, kerana jangka hayat pembolehubah yang disertakan di dalamnya bertepatan dengan jangka hayat dokumen. Ini memungkinkan untuk menyimpan maklumat tentang pengendalian prosedur tertentu antara sesi. Sebagai contoh, anda boleh mempunyai kaunter yang mengira bilangan panggilan kepada makro, dan bergantung pada ini, tentukan operasi selanjutnya dengan cara yang berbeza.
Objek Julat dan PemilihanObjek Dokumen mempunyai kaedah Julat, yang mengembalikan objek Julat, dan kaedah Pilih, yang mencipta objek Pilihan. Kaedah Julat ialah fungsi yang mengembalikan objek Julat sebagai hasilnya; Kaedah Pilih ialah prosedur tanpa parameter yang mencipta objek Pemilihan sebagai kesan sampingan. Objek Julat mempunyai kaedah Pilih yang mengubah kawasan objek Julat menjadi pilihan. Kaedah Pilih dengan itu mentakrifkan objek Pemilihan baharu. Secara simetri, objek Pemilihan mempunyai sifat Julat yang mengembalikan objek Julat sepadan dengan kawasan yang dipilih.
Kebanyakan bahagian dokumen yang diterangkan sebelum ini juga merupakan bahagian (sifat) objek Julat dan Pemilihan.
Objek Julat adalah seperti anak patung bersarang: setiap kawasan mengandungi kawasan yang lebih kecil. Berikut ialah contoh tetapan yang betul (walaupun bukan yang paling cekap) bagi objek Julat:
ActiveDocument.Julat.Bahagian(1).Julat.Perenggan(l).Julat.Ayat(1). Perkataan(1).Watak(1)
Bekerja dengan teksObjek Julat dan Pemilihan membolehkan anda melakukan operasi asas pada teks: "pilih", "tambah", "ganti", "padam". Objek kami mempunyai set kaedah yang besar yang membolehkan kami melaksanakan operasi ini. Semua kaedah yang dibincangkan di sini adalah milik kedua-dua objek melainkan dinyatakan sebaliknya.
Pemilihan
Memilih beberapa bahagian teks pada asasnya bermakna mentakrifkan objek Julat atau Pemilihan. Objek mentakrifkan kawasan tertentu dalam teks dokumen, dan sifat Mula dan Tamatnya membolehkan anda menetapkan permulaan dan penghujung kawasan ini. Dengan menukar nilai harta, anda boleh menetapkan kawasan yang dikehendaki pelepasan.
Alih ialah kaedah utama untuk mengalihkan titik sisipan. Selebihnya kaedah dalam kumpulan ini adalah pengubahsuaian kepada satu darjah atau yang lain. Kaedah Move(Unit, Count) mengecilkan kawasan ke satu titik, menariknya ke permulaan atau akhir, dan kemudian menggerakkan titik sisipan. Parameter Unit mentakrifkan unit pergerakan, dan Kira – bilangan unit ini (lalai 1). Tanda pembolehubah Count menentukan arah pengecutan dan pergerakan. Nilai positif parameter ini menentukan penguncupan ke akhir dan pergerakan ke hadapan, nilai negatif - penguncupan ke permulaan dan pergerakan ke belakang. Penguncupan tulen tanpa menggerakkan titik sisipan ditentukan sebagai pergerakan satu unit. Kaedah ini mengembalikan bilangan unit yang mana pergerakan itu sebenarnya berlaku, atau 0 jika ia tidak dijalankan. Parameter Unit menerima nilai wdCharacter (lalai), wdWord, wdSentence, wdParagraph, wdSection, wdStory, wdCell, wdColumn, wdRow dan wdTable.
Kaedah pemindahan tidak menjejaskan teks itu sendiri - ia hanya mengubah kawasan diberikan oleh objek Julat dan Pemilihan. Oleh itu, kaedah ini hanya terpakai untuk pembolehubah Julat dan bukan untuk kawasan tetap. Sebagai contoh, rekod
ActiveDocument.Perenggan(l).Julat.Gerakan
tidak mempunyai kesan kerana kawasan perenggan pertama tidak boleh diubah. Kaedah Move mengecilkan kawasan ke satu titik, yang dialihkan, jadi selepas pelaksanaannya kawasan itu hilang, hanya titik sisipan yang kekal. Kaedah MoveStart dan MoveEnd menggerakkan titik permulaan atau penamat sesuatu kawasan, biasanya meluaskan kawasan tersebut.
Memadam teks
Kaedah Padam membolehkan anda memadam teks. Apabila dipanggil tanpa parameter, ia memadamkan objek Julat atau Pemilihan yang memanggilnya. Apabila digunakan dalam bentuk Delete(Unit,Count) , bahagian teks dalam kawasan yang ditentukan akan dipadamkan. Parameter Unit menentukan unit, tetapi apabila memadam, hanya dua nilai yang mungkin: wdWord dan wdCharacter. Parameter Count menentukan bilangan unit yang akan dialih keluar. Jika rantau dikurangkan kepada satu titik, aksara sebelum atau selepas titik sisipan dialih keluar, bergantung pada tanda parameter Kira.
Memasukkan teks
Kumpulan kaedah Sisipkan objek Julat dan Pemilihan membolehkan anda memasukkan ke dalam dokumen. Untuk memasukkan teks, gunakan kaedah InsertBefore(Teks) dan InsertAfter(Teks). Teks parameter taip rentetan menentukan teks untuk disisipkan sebelum atau selepas kawasan yang ditentukan oleh julat atau objek pilihan. Selepas anda menampal teks, kawasan itu secara automatik mengembang untuk memasukkan teks yang ditambahkan.
Sifat Teks membolehkan anda menggantikan teks dalam kawasan yang dipilih, jadi tidak perlu memanggil kaedah Sisip (Teks). Kaedah InsertBefore dan InsertAfter adalah selamat kerana teks ditambah tanpa mengubah kandungan kawasan tersebut. Perkara yang sama sekali berbeza ialah kaedah penyisipan, yang jauh dari selamat. Apabila anda memasukkan ke dalam rantau, seperti menggunakan kaedah InsertSymbol atau InsertParagraph, kandungan rantau itu digantikan.
Bekerja dengan penimbal
Kaedah Soru, yang tidak mempunyai parameter, menyalin objek (kandungan kawasan) ke penimbal. Kaedah potong, bertindak serupa, juga harus memadamkan objek. Tetapi objek itu sendiri tidak dipadamkan - ia hanya dikontrak ke satu titik, supaya operasi selanjutnya boleh dilakukan padanya.
Kadangkala bukan teks yang disalin ke penimbal, tetapi formatnya. Ini dilakukan dengan kaedah CopyFormat, yang menyalin format berdasarkan aksara pertama objek pemilihan. Jika aksara ini adalah tanda perenggan, format perenggan akan disalin. Hanya objek pilihan yang mempunyai kaedah CopyFormat.
Kaedah Tampal membolehkan anda meletakkan (“tampal”) kandungan penimbal ke dalam kawasan yang ditentukan oleh objek Julat dan Pemilihan. Operasi ini berbahaya kerana ia menggantikan, bukan menambah, teks. Oleh itu, kaedah Tampal biasanya digunakan pada objek Julat dan Pemilihan yang sebelum ini telah diruntuhkan ke titik sisipan. Kaedah PasteFormat menggunakan pemformatan yang disimpan dalam penimbal pada objek Pemilihan.
Sebagai contoh, mari buat makro yang memasukkan senarai "pelajaran, peperiksaan, lulus!", menyalinnya dan meletakkannya semula pada helaian.
Sub Makro1()
Dengan Selection.ParagraphFormat
Selection.TypeText Text:="Bekerja dengan teks:"
Pemilihan.JenisPerenggan
ListGallery(wdBulletGallery).ListTemplates(1)._ListLevels(1)
ListGallery(wdBulletGallery).ListTemplates(1).Name = ""
Selection.Range.ListFormat.ApplyListTemplate
ListTemplate:=ListGallery(wdBulletGallery).ListTemplates(1), ContinuePreviousList:=False, ApplyTo:= _wdListApplyToWholeList, DefaultListBehavior:=wdWord10ListBehavior
Selection.TypeText Text:="lesson"
Pemilihan.JenisPerenggan
Selection.TypeText Text:="exam"
Pemilihan.JenisPerenggan
Selection.TypeText Text:="lulus"
Pemilihan.JenisPerenggan
Selection.Range.ListFormat.RemoveNumbers
NumberType:=wdNumberParagraph
Pemilihan.JenisPerenggan
Selection.Font.Bold = wdTogol
Selection.Font.Italic = wdTogol
Selection.TypeText Text:="Kerja selesai!"
Pemilihan.WholeStory
Selection.PasteAndFormat(wdPasteDefault)
5.2. Memformat Dokumen
Bekerja dengan teks(sambungan)Paling ciri penting Bekerja pada VBA dalam Word ialah memasukkan teks ke dalam dokumen apabila bekerja dengan aplikasi. Ini dilakukan menggunakan objek Julat dan Pemilihan, yang merupakan pusat kepada hampir semua operasi yang boleh dilakukan menggunakan Word VBA. Sesetengah tindakan ini boleh digunakan pada dokumen secara keseluruhan, tetapi secara amnya anda memerlukan julat atau pilihan sebelum anda membuat perubahan. Walau bagaimanapun, kami akan melihat perkara yang boleh anda lakukan dengan dokumen apabila anda menciptanya.
Dokumen Word yang terbuka sudah mengandungi objek Julat yang sepadan dengan banyak elemennya. Setiap perenggan, jadual, sel jadual, ulasan, dsb. mentakrifkan julat. Sebagai contoh, untuk memasukkan beberapa teks ke dalam dokumen sedia ada, anda perlu menulis kod:
ActiveDocument.Paragraphs(1).Range.Text = "Oxo-xo!!"
Lebih-lebih lagi baris yang diberi akan terletak di hujung perenggan sedia ada. Sebaliknya, menggunakan objek Pemilihan, anda juga boleh memasukkan beberapa teks ke dalam dokumen dengan menggunakan kaedah Tambah dan memberikan sifat Teks kepada objek Pemilihan:
Selection.Text = "Mempelajari cara bekerja dengan teks dalam dokumen Word ialah bahagian penting dalam pembelajaran program dalam VBA, " + TextBox1.Text + ", dan memenuhi keperluan semua pengaturcara!"
Akibat daripada ini kod program Baris berikut akan dipaparkan dalam dokumen Word:
Belajar untuk bekerja dengan teks dalam dokumen Word ialah bahagian penting dalam keupayaan untuk memprogram dalam VBA, Svetlana, dan memenuhi keperluan semua pengaturcara!
Di sini nama Svetlana, sebagai contoh, dibaca daripada medan teks dalam beberapa bentuk yang hanya mempunyai satu medan input untuk nama dan butang "Teks output" (Gamb. 64).
nasi. 64. Borang kemasukan data
Apabila bekerja dengan teks dalam lembaran kerja Word, anda perlu mengetahui kod berikut:
definisi warna
Selection.Font.Color =
wdColorRed – merah
wdColorDarkRed – burgundy
wdColorDarkTeal – pirus
wdColorBlue – biru
wdColorGreen – hijau
wdColorBlack – hitam
wdColorOrange – oren
penentuan kandungan lemak
Selection.Font.Bold =
wdToggle – keberanian
definisi gaya
Selection.Font.Italic=
wdToggle – condong
definisi penjajaran
Selection.ParagraphFormat.Alignment=
wdAlignParagraphRight – penjajaran kanan
wdAlignParagraphCenter – penjajaran tengah
wdAlignParagraphJustify – penjajaran kiri
memasukkan ayat tertentu ke dalam teks
Selection.TypeText Text:="Contoh kerja dengan teks"
memasukkan yang baru baris kosong
Pemilihan.JenisPerenggan
menetapkan saiz huruf
Pemilihan.Font.Saiz = 14
Catatan. Untuk reka bentuk yang betul kod, manfaatkan keupayaan untuk mencipta makro program.
Salah satu elemen reka bentuk kotak dialog ialah kawalan Imej. Ciri-ciri utamanya:
Autosize – menukar saiz gambar pada borang (secara automatik atau tidak);
Gambar – paparan fail grafik, dipaparkan pada borang;
pictureSizeMode – menetapkan penskalaan gambar (bukan keseluruhan gambar, seluruh permukaan objek, sepenuhnya di dalam objek);
PictureAligment – menetapkan kedudukan gambar di dalam objek (kiri, kanan, atas, bawah);
pictureTilling – menutup objek dengan mozek gambar.
Sifat ini sama ada ditetapkan dalam tetingkap sifat objek atau dinyatakan dalam penyenaraian.
Contoh 30. Buat program yang akan mengira jumlah haba yang dibebaskan dalam konduktor apabila arus mengalir melaluinya. Formula untuk mengira jumlah haba dikenali sebagai hukum Joule–Lenz:
di mana Q ialah jumlah haba dalam Joule;
U - voltan dalam volt;
t – masa dalam saat;
S - luas keratan rentas konduktor dalam milimeter persegi;
l - panjang konduktor dalam meter;
p – kerintangan bahan pengalir dalam Ohm? mm 2 /m.
Semua data awal dimasukkan ke dalam medan teks borang. Berdasarkan hasil pengiraan, hasilnya dipaparkan dalam bentuk nota penerangan dalam dokumen, dan hasil berangka dipaparkan dalam tetingkap borang khas.
Teknologi pelaksanaan
Buat borang mengikut rajah yang ditunjukkan. 65.
nasi. 65. Bentuk yang dibangunkan contoh 30 dalam keadaan kerja dan output maklumat yang terhasil kepada dokumen perkataan
Apabila membuat borang, tetapkan sifat elemen yang diperlukan. Tetapkan sifat Berkunci TextBox6 kepada True untuk mengelakkan pengguna daripada menaip teks secara tidak sengaja ke dalamnya.
Penerangan mengenai prosedur
Butang Sub Perintah Peribadi1_Klik()
Jika Documents.Count = 0 Kemudian Documents.Add
Selection.Text = "Apabila arus dengan voltan " + TextBox1.Text + "volt melalui konduktor dengan panjang " + TextBox4.Text + " meter, keratan rentas " + TextBox3.Text + "sq mm dan kerintangan" + TextBox5.Text + " Ohm*mm2/m untuk " + TextBox2.Text + " saat akan diserlahkan " + TextBox6.Teks + " joule of heat"
Selection.Collapse direction:=wdCollapseEnd
Peribadi Sub PerintahButton2_Click()
Sub TextBox1_Change() Peribadi
Sub TextBox2_Change() Peribadi
Sub TextBox3_Change() Peribadi
Sub TextBox4_Change() Peribadi
Sub TextBox5_Change() Peribadi
Subscet Persendirian()
Jika IsNumeric(TextBox1.Text) = Benar Dan
IsNumeric(TextBox2.Text) = Benar Dan
IsNumeric(TextBox3.Text) = Benar Dan
IsNumeric(TextBox4.Text) = Benar Dan
IsNumeric(TextBox5.Text) = Benar Dan Bukan Val(TextBox4.Text)
0 Dan Bukan Val(TextBox5.Text) = 0 Kemudian
rez = ((Val(TextBox1.Teks) ^ 2) * Val(TextBox2.Teks) *
Val(TextBox3.Teks)) / (Val(TextBox4.Teks) *
Val(TextBox5.Teks))
TextBox6.Text = Str$(rez)
CommandButton1.Enabled = Benar
TextBox6.Text = ""
CommandButton1.Enabled = Palsu
Catatan. Apabila bekerja permohonan ini Semua nilai medan input mestilah angka. VBA mempunyai fungsi khas untuk menyemak sama ada rentetan yang dimasukkan ialah rekod nombor atau tidak - IsNumeric. Untuk menyemak sama ada nilai dalam dua medan input terakhir adalah bukan sifar, gunakan fungsi Val, yang menukar ungkapan rentetan menjadi angka jika ungkapan rentetan ini mengandungi digit pada permulaan (atau semuanya terdiri daripadanya).
Fungsi Str melakukan yang bertentangan dengan apa yang dilakukan oleh Val - ia menukar nilai angka ungkapan kepada rentetan, yang membolehkan nilai ini diproses selanjutnya sebagai rentetan.
Oleh itu, fungsi Val dan Str menukar jenis data pembolehubah yang mereka proses, masing-masing daripada rentetan ke angka dan dari angka ke rentetan (lihat Bab 3).
Buat butang atau panel dalam WordAnda tidak boleh menetapkan butang atau item menu pada borang untuk memanggil terus aplikasi daripada Word - ini hanya boleh dilakukan untuk modul. Oleh itu anda perlu memohon cara seterusnya. Buat makro (Menu + Sisipan + Modul) dalam projek terbuka:
Namakan semula makro ini mengikut kehendak anda, seperti Teplo. Dan ikuti langkah-langkah ini.
1. Klik kanan di mana-mana pada bar alat.
2. Daripada menu ini, pilih arahan Tetapan (atau Alat + Tetapan).
3. Dalam kotak dialog Tetapan, klik pintasan tab Perintah.
4. Tatal ke bawah senarai Kategori dan cari Makro. Pilih item ini. Dalam senarai "Simpan dalam", pilih nama dokumen anda di mana makro dicipta (Gamb. 66).
nasi. 66. Mencari makro untuk membuat butang
5. Dalam tetingkap kanan, cari makro yang diperlukan (atau program VBA).
6. Seret nama makro atau program ini ke bar alat.
7. Buat label butang yang sepadan dan, jika perlu, gambar (menggunakan butang kanan tetikus).
8. Tutup kotak dialog Persediaan untuk selesai.
Setelah semua langkah di atas selesai, butang untuk melancarkan aplikasi akan dibuat.
Tugas untuk menyatukan bahanContoh 31. Buat program yang membolehkan anda mengisi permohonan pelajar standard institusi pendidikan, jika semua data yang diperlukan diisi dalam medan teks yang sepadan dalam borang, dan sebab kelas hilang dipilih daripada senarai juntai bawah (Gamb. 67, 68).
nasi. 67. Bentuk contoh 31 yang dibangunkan dalam susunan kerja
Contoh 32. Buat program yang membolehkan anda mengira jumlah wang yang dibelanjakan untuk petrol semasa melancong ke negara ini.
Sila ambil kira perkara berikut: syarat perjalanan boleh: sehala, pergi balik, anda boleh mengambil kereta orang lain (syarat ini diambil kira dalam senarai lungsur "keadaan perjalanan" pada borang yang dibuat).
Kepada guru kelas
kumpulan AS-42
Sidorov O.I.
daripada seorang pelajar
Petrenko Oleg Ivanovich
Kenyataan Petrenko Oleg Ivanovich18.05.2007nasi. 68.
Hasil yang diperoleh dikira menggunakan formula:
Keputusan = jarak * (penggunaan petrol setiap 100 km) / 100*harga petrol seliter.
Sila ambil perhatian bahawa jika anda memilih untuk melakukan perjalanan "dalam kereta orang lain", maka harga petrol ialah 0 rubel.
nasi. 69. Bentuk yang dibangunkan contoh 32 dalam susunan kerja
Juga ambil kira bahawa jika hasil pengiraan melebihi 400 rubel, maka paparkan mesej "Perlukah kita pergi ke pasaran?"
Apabila membuat borang, patuhi Rajah. 69, apabila mengeluarkan teks ke dokumen Word - rajah. 70.
Apabila melakukan perjalanan ke dacha yang terletak 55 km jauhnya, dengan harga petrol seliter 18.50 rubel, penggunaan petrol akan menjadi 101.75 rubel.
nasi. 70.
Contoh 33. Membangunkan program yang menghasilkan Laporan pendapatan pelabur pada pada masa ini. Sila ambil perhatian bahawa dalam antara muka borang, kadar faedah dipilih daripada senarai juntai bawah (menyediakan dua jenis faedah).
nasi. 71. Bentuk contoh 33 yang dibangunkan dalam susunan kerja
Semasa mengira, patuhi formula berikut:
jika skema pengiraan adalah mudah, maka
Pendapatan = jumlah yang didepositkan + jumlah yang didepositkan * kadar faedah/100*tempoh/360;
jika skema pengiraan adalah kompleks, maka
Pendapatan = jumlah yang didepositkan + jumlah yang didepositkan * kadar faedah/100*tempoh/360 +0.01*(jumlah yang didepositkan * kadar faedah/100*tempoh/360).
Apabila membangunkan antara muka borang, bergantung pada angka yang diberikan. 71, dan apabila mengeluarkan pengiraan ke dokumen Word - Rajah. 72.
Laporan pendapatanPada masa ini, warganegara Olga Konstantinovna Evseeva mempunyai minat mudah pada akaunnya dengan jumlah pelaburan awal sebanyak 1000 rubel. selama 150 hari pada kadar 2% 1008.33 rubel.
nasi. 72. Format anggaran untuk mengeluarkan pengiraan kepada dokumen perkataan
Hasil pengiraan dengan penjelasan yang sesuai dipaparkan dalam dokumen Word, dan hasil berangka pengiraan diberikan dalam medan borang.
Contoh 34. Membangunkan program yang membolehkan anda mengisi permohonan untuk mengembalikan semula kad pelajar jika ia rosak (dicuri, hilang, dibasuh, dll.). Nyatakan sebab kerosakan dalam senarai juntai bawah borang yang dibuat.
Apabila bekerja, patuhi rajah berikut. 73 dan 74.
Italic menunjukkan ungkapan yang disisipkan oleh program selepas medan teks yang sepadan bagi borang yang sedang dibangunkan diisi.
nasi. 73. Bentuk contoh 34 yang dibangunkan dalam susunan kerja
nasi. 74. Format anggaran untuk mengeluarkan pernyataan ke dalam dokumen perkataan
