[填空題] 在窗體上加上一個(gè)富文本控件RichTextBox，畫(huà)一個(gè)命令按鈕，當(dāng)單擊命令按鈕的時(shí)候，將顯示“保存文件”對(duì)話框，設(shè)置該對(duì)話框可用于保存文本文件(默認(rèn)文件類(lèi)型)和Word文檔，然后將富文本控件中顯示的內(nèi)容以指定的文件名保存，完成程序。 Private SubCommand1_Click() CommonDialogl.Filter= 【6】 CommonDialogl.FilterIndex= 【7】 CommonDialogl.ShowSave RichTextBoxl.SaveFile 【8】 End Sub

[6]"文本文件|*.txt|Word文檔|*.doc" [7]1 [8](CommonDialogl.FileName)

本題主要考查通用對(duì)話框中“另存為”文件對(duì)話框的相關(guān)屬性和方法。其中主要的屬性有： Filter屬性——用來(lái)指定在對(duì)話框中顯示的文件類(lèi)型，可以同時(shí)指定多種格式，每一種格式用豎線“1”分為兩個(gè)部分，前面表示該文件類(lèi)型的含義，后面表示該文件的后綴。如”視頻壓縮文件|*.mpg"。 FilterIndex屬性——用來(lái)指定默認(rèn)的過(guò)濾器，其為一整數(shù)，即Filter屬性中的索引序號(hào)。本題中指定了兩種文件類(lèi)型，題目要求默認(rèn)文件類(lèi)型為文本類(lèi)型，如果設(shè)置Filter屬性為”文本文件|*.txt|Word文檔|*. doc"，則設(shè)置FilterIndex為1，如果設(shè)置Filter屬性為”Word文檔|*.doc|文本文件|*.txt”，則設(shè)置 FilterIndex為2。 FileName屬性一用來(lái)設(shè)置保存的文件的路徑及文件名。單擊對(duì)話框的“保存”按鈕，則將該文件名返回，因此在[8]中通過(guò)SaveFile方法，將RichTextBox中的內(nèi)容保存在該文件中。