在窗体上加上一个富文本控件RichTextBox，画一个命令按钮，当单击命令按钮的时候，将显示“保存文件”对话框，设置该对话框可用于保存文本文件(默认文件类型)和Word文档，然后将富文本控件中显示的内容以指定的文件名保存，完成程序。Private SubCommand1_Click()CommonDialogl.Filter=【 】CommonDialogl.FilterIndex=【 】CommonDialogl.ShowSaveRichTextBoxl.SaveFile【 】End Sub
题目
在窗体上加上一个富文本控件RichTextBox，画一个命令按钮，当单击命令按钮的时候，将显示“保存文件”对话框，设置该对话框可用于保存文本文件(默认文件类型)和Word文档，然后将富文本控件中显示的内容以指定的文件名保存，完成程序。
Private SubCommand1_Click()
CommonDialogl.Filter=【 】
CommonDialogl.FilterIndex=【 】
CommonDialogl.ShowSave
RichTextBoxl.SaveFile【 】
End Sub
相似考题
更多“在窗体上加上一个富文本控件RichTextBox,画一个命令按钮,当单击命令按钮的时候,将显示“保存文件” ”相关问题
-
第1题：
在窗体上加上一个富文本控件Rich TextBox，画一个命令按钮，当单击命令按钮的时候，将显示“打开文件”对话框，设置该对话框只用于找开文本文件，然后在富文本控件中显示打开的文件内容。
Private Sub Command1_Click ( )
CommonDialogFilter = 【 】
CommonDialogShowOpen
RichTextBoxFileName = 【 】
End Sub
正确答案："Text Files(*.txt)|*.txt" CommonDialogl.FileName
"Text Files(*.txt)|*.txt" , CommonDialogl.FileName 解析：要设置通用对话框只用于打开文本文件，需要设置通用对话框控件的Filter属性值，在这里应该是"Text Files(*，txt)|*.txt"，在使用了对话框控件的ShowOpen后，出现的打开文件对话框中的文件类型只有Text Files(*.txt)，选择了需要打开的文本文件后，应该让文件的内容显示在富文本框中，因此需要将通用(打开文件)对话框中选择的文件(包括文件路径和文件名，即FileName的值)赋给富文本控件。 -
第2题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A．
B．H
C．
D．
正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。 -
第3题：
（ 14 ）窗体中有两个命令按钮： “ 显示 ” （控件名为 cmdDisplay ）和 “ 测试 ” （控件名为 cmdTest ） 。 以下事件过程的功能是：单击 “ 测试 ” 按钮时，窗体上弹出一个消息框。如果单击消息框的 “ 确定 ” 按钮 ，隐藏窗体上的 “ 显示 ” 命令按钮；单击 “ 取消 ” 按钮关闭窗体。按照功能要求，将程序补充完整。
Private Sub cmdTest_Click()
Answer= 【 14 】 （ “ 隐藏按钮 ” ， vbOKCancel ）
If Answer=vbOK Then
cmdDisplay.Visible= 【 15 】
Else
Docmd.Close
End If
End Sub
正确答案：
-
第4题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。
正确答案：A
A) 【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。
-
第5题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A)机床
B)车床
C)钻床
D)轴承
正确答案：C
本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。