36、窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组Co mmand1，其下标从左到右分别为0、1、2、3，窗体外观如图所示。 命令按钮的事件过程如下： Private Sub Co mmand1＿Click（Index As Integer） Select Case Index Case 0 CD1 .Action ＝1 Case 1 CD1 .ShowSave Case 2 CD1 .Action ＝5 Case 3 End End Select End Sub 对上述程序，下列叙述中错误的是（ ）。 A．单击"打开"按钮，显示打开文件的对话框 B．单击"保存"按钮，显示保存文件的对话框 C．单击"打印"按钮，能够设置打印选项，并执行打印操作 D．单击"退出"按钮，结束程序的运行
37、窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为"计算"的命令按钮Co mmand1，并编写了以下程序： Private Sub Co mmand1＿Click（） Call Cale （HV．Value ，HT．Value） End Sub Public Sub Cale（x ASInteger ，y ASInteger） Text1．Text ＝x＊y End Sub 运行程序，单击"计算"按钮，可根据速度与时间计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是（ ）。 A．过程调用语句不对，应为Cale （HV，HT） B．过程定义语句的形式参数不对，应为Sub Cale（x AsControl ，y As Control） C．计算结果在文本框中显示出来 D．程序不能正确运行
38、在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Co mmand1＿Click（） x＝0 Do Until x＝－1 a＝InputBox（＂请输入A 的值＂） a＝Val（a） b ＝InputBox（＂请输入B的值＂） b ＝Val（b） x＝InputBox（＂请输入x 的值＂） x＝Val（x） a＝a＋b ＋x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、－1，则输出结果为（ ）。 A．2 B．3 C．14 D．15
39、在窗体上画一个名称为Co mmand1的命令按钮，再画两个名称分别为Labell、Label2的标签，然后编写如下程序代码： Private X As Integer Private Sub Co mmand1＿Click（） X＝5：Y ＝3 Call proc（x，y） Labell ．Caption ＝x Label2．Caption ＝y End Sub Private Sub proc（a As Integer ，ByVal b As Integer） X＝a＊a Y ＝b ＋b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是（ ）。 A．25和3 B．5和3 C．25和6 D．5和6
