单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private SubCommand1_Click() Dim num As Integer num=1 DO Until mum>6 Print num; num=num+2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ______。
A.1 3.4 5.8
B.1 3 5
C.1 4 7
D.无数据输出
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为Save,默认文件名为SaveFile,在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是 ______。
A.Private Sub Command Click() CommonDialogFileName="SaveFile" CommonDialogFilte="All Files|*.*|(*.tx|*.txt|(*.do |*.doc" CommonDialogFilterIndex=2 CommonDialogDialogTitle="Save" CommonDialogAction=2 End Sub
B.Private Sub Commandl_Click() CommonDialog FileName="SaveFile" CommonDialog Filter= "All Files| *. * | (*. tx[*. txt| *. doc| *. doc" CommonDialog FilterIndex= 1 ComonDialog DialogTitle = "Save" CommonDialog Action= 2 End Sub
C.Private Sub Cmmandl_Click() CommonDialog FileName= "Save" CommonDialog FiLter="All Files | *. * |(*. tx|*. txt|(*. do |*. doc" CommonDialog FilterIndex= 2 CommonDialog DialogTitle = "SaveFile" CommonDialog Action= 2 End Sub
D.Private Sub Commandl_Click() CommonDialog FileName = "SaveFile" CommonDialog Filter= "All Files|*. *|(*. tx|*. txt| (*. do |*. doc" CommonDialog FilterIndex=1 CommonDialog DialogTitle= "Save" CommonDialog Action=1 End Sub
点击查看答案&解析
单项选择题
在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母e,则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(5,KeyAscii) End Sub
A.eeeee
B.EEEEE
C.eeeeee
D.EEEEEE
点击查看答案&解析
相关试题
以下程序段的输出结果是 【11】 。num...
以下程序的功能是:从键盘上输入若干个学生...
执行下面的程序段后,i的值为 【14】 ...
下面程序的功能是:计算1~10之间奇数之...
如果单选按钮是“选中”的,即单选按钮中间...