在窗体上加上一个文本框控件TextBox，画一个命令按钮，当单击命令按钮的时候将显示"保存文件"对话框，设置该对话框可用于保存文本文件（默认） 和Word文档，然后在文本框控件中显示保存的文件名，请填空。

Private Sub Command1_Click（）

C．ommonDialog1.Filter= (13)

C．ommonDialog1.Filter= (14)

C．ommonDialog1.ShowSave

TextBox.Text= (15)

E．nd Sub

[试题]在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示"打开文件"对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。Private Sub Command1_Click（）C．ommonDialog1.Filter= (12)C．ommonDialog1.ShowOpenPCSTextBox.Text= (13)E．nd Sub

[主观题]在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母（不区分大小写），单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在Text1中输入的是abDfdb，则单击Command1按钮后Text1中显示的字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。Private Sub Command1_Click（ ）D．im str As String, s As String,

[单选题]在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：PrivateSubCommand1_Click()a=1.2c=Len(Str( )+Space(10))Text1.Text=cE．ndSub程序运行后，单击命令按钮，在文本框中显示( )A．3B．8C．14D．10

[单选题]（ 31 ） 在窗体上画一个命令按钮和一个文本框 （ 名称分别为 Command1 和 Text1 ） ， 并把窗体的Keyprewie w属性设置为 True ，然后编写如下代码：D．im SaveAll As StringPrivate Sub Form_Load ()ShowText1.Text= ” ”Text1.SetFocusE．nd SubPrivate Sub Command1_Click()Text1.Text=Lcase(SaveAll)+SaveAllE．nd SubPri

[单选题]在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Command1_Click() Text1.Text=UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAseii) End Sub 程序运行后，在键盘上输入“abcdefg”，单击命令按

[单选题]窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入12345，单击命令按钮后的输出结果为( )。 Private Sub Command1_Click() Dim A As Integer,B As Integer Text1.SelStart=2 Text1.SelLength=2 A=Val(Text1.SelText) B=Len(Text1.Text) Print A*B End SubA．68B．115C．170D．1170

[单选题]在窗体中添加一个命令按钮Commandl和一个文本框Text1，编写命令按钮Com-mand1 的 Click事件代码； Private Sub Command1_Click() Dim S As String*20 S=TextText End Sub 该程序的功能是当单击按钮Command1时，把变量S中内容写入一个顺序文件 datl. dar中，正确的程序段是 ( )A．Open "datl. dat", For lnput As#1 Write井1,SB．Open"datl. da

[单选题]（ 31 ）在窗体上有一个命令按钮 Commandl 和一个文本框 Textl ，编写事件代码如下：Private Sub Command1_Click()D．im i,j,xF．or i = 1 To 20 step 2x = 0F．or j = To 20 step 3x = x + 1Next jNext iTextl.Value=Str(x)E．nd Sub打开窗体运行后，单击命令按钮，文本框中显示的结果是A． ） 1B． ） 7C． ） 17D． ） 400

[试题]（ 11 ） 在窗体上画一个命令按钮和一个文本框 ， 其名称分别为 Command1 和 Text1 ， 然后编写如下事件过程 ：Private Sub Command1_Click()D．im inData As StringText1.Text = ""Open "d:/myfile.txt" For ( 14 ) As #1D．o While ( 15 )Input #1, inDataText1.Text = Text1.Text + inDataLoopC．lose #1E．nd

[单选题]在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1，然后编写如下两个事件过程： Private Sub Command1_Click() a=InputBox("请输入一个字符串") Text1．Text=a End Sub Private Sub Textl_Change() Label1．Caption=UCase(Mid(Text1．Text，8)) End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“Visual