窗体上有一个名称为CD1的通用对话框控件和由4个命令按钮组成的控件数组Command1，其下标从左到右分别为0、123。窗体外观如图所示。对上述程序，下列叙述中错误的是（）

A . A、“确定”和“OK” B . B、“OK”和“确定” C . C、“Command1”和“OK” D . D、“Command1”和“确定”

A . Enabled B . Visible C . Interval D . Timer

A . cmdc B . cmdb C . cmdA D . Command1

A . Frm1_Click（）Cmd1_Click（） B . Form_Click（）Command1_Click（） C . Frm1_Click（）Command1_Click（） D . Form_Click（）Cmd1_Click（）

Private Sub Command1_Click（） CommonDialog1.______="打开文件" CommonDialog1.Filter="All Files（*.*）|*.*" CommonDialog1.InitDir="c:\" CommonDialog1.ShowOpen End Sub 该程序的功能是，程序运行后，单击命令按钮，将显示“打开”文件对话框，其标题是“打开文件”，在“文件类型”栏内显示“AIl Files（*.*）”，并显示C盘根目录下的所有文件，请填空。

Private Sub Timer1_ TxtTime.text=Time End Sub 在下画线上应填入的内容是 A．Enabled B．Visible C．Interval D．Time

<img src='https://img2.soutiyun.com/shangxueba/ask/4359001-4362000/4359886/ct_ctvbbm_choose_05019(20092).jpg' /> 设有如下的类型声明 TyPe Person name AS String*8 major AS String*20 End TyPe 当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test29 .dat中。设文本框中的数据已正确地赋值给Person类型的变量P.则能够正确地把数据写入文件的程序段是 A．Open"c：\Test29.dat"For Random As1 Put1，1，p C10se 1 B．OpeH"c：\Test29.dat"For Random As 1 Get1，1，p C108C1 C．Open"c：\Test29.dat"For Random As1 Len=Len(p) Put1，1，p C108C1 D．OPell"c：\Test29.dat"For，Random As1 Len=Len(p) Get1，1，p C106e1

A.应用程序(*．exe) B.*．doc C.*．txt D.不确定

A．显示打开文件对话框后若未选择或输入任何文件名,则算法2会出错,算法1不会 B．显示打开文件对话框后若未选择或输入任何文件名,则算法1会出错,算法2不会 C．两种算法的执行结果完全一样 D．算法1允许输入的文件名中含有空格,而算法2不允许

算法1： Private Sub Command1_Click（） CommonDialog1.ShowOpen Open CommonDialog1.FileName For Input As1 End Sub 算法2： Private Sub Command1_Click（） CommonDialog1.ShowOpen IfCommonDialog1.FileName＜＞””Then Open CommonDialog1.FileName For Input As1 End If End Sub 下面关于这两种算法的叙述中正确的是（）。 A．显示打开文件对话框后若未选择或输入任何文件名，则算法2会出错，算法1不会 B．显示打开文件对话框后若未选择或输入任何文件名，则算法1会出错，算法2不会 C．两种算法的执行结果完全一样 D．算法1允许输入的文件名中含有空格，而算法2不允许

Private Sub Command1_Click（） Sum = 0 For i = 0 To 4 Sum = Sum + ________ Next ________ = Sum End Sub

窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（）。<img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/9ee39e48e3711140203a592ce77b107b.jpg' /><img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/54c76f430783fad60b8a548d0f7a9765.jpg' />

<img src='https://img2.soutiyun.com/ask/uploadfile/2523001-2526000/b1da673322f0d1df5aa81b5625094699.jpg' /> 在下划线上应填入的内容是 A．Time B．False C．True D．Timer

Private SubCommand1_Click() CommonDialogl.Filter=【 】 CommonDialogl.FilterIndex=【 】 CommonDialogl.ShowSave RichTextBoxl.SaveFile【 】 End Sub

A、CommonDialog1.Filter=-ALLLFiles[*．*| Pictures(*.Bmp)|*.Bmp B、CommonDialoS1.Filter=&quot;ALLLFiles&quot;|*.*|&quot;Pictures(*.Bmp)&quot;|*.Bmp C、CommonDialog1.Filter={ALLLPUes{I*．*I Pictures(*.Bmp)|*.Bmp) D、ComlnonDialogFilter=&quot;ALLLPdes|*.*|Pictures(*.Bmp)|*.Bmpn

A．语句fun=n有错，因为n是整型，fun没有定义类型 B．运行程序，输入值为5时，文本框中显示655 C．运行程序，输入值为6时，文本框中显示42 D．ByRef表示参数按址传递

A．0 B．-1 C．-2 D．-3

A．12345 B．678910 C．23456 D．62345

A．打开的对话框中文件&ldquo;保存类型&rdquo;框中显示&ldquo;All(*.*)&rdquo; B．实现保存文件的操作，文件名是VB.txt C． DefaultExt属性与FileName属性所指明的文件类型不一致，程序出错 D．对话框的Filter属性没有指出txt类型，程序运行出错

A．输出0 B．输出25 C．输出45 D．无任何输出