更多"在窗体上画一个命令按钮，命名为CommandI。程序运行后，如果单击命"的相关试题:
[单项选择]在窗体上画一个命令按钮，名称为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。能够正确实现上述功能的代码是( )。
A. Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Funcfion
B. Privae Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function
C. Private Sub Command1_Click() x=InputBox("请输入整数") F1(Va(x)) Print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Funcfion
D. Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByrRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
[单项选择]在窗体上画一个命令按钮，然后编写如下程序。运行后，单击命令按钮，输出结果为 ( )。
Private Sub Command4_Click（ ）
Dima As Integer,bASInteger
a=1
b=2
PrintN(a,b)
End Sub
Function N(X As Integer,yAsInteger)AsInteger
N=IIf(x＞y，x，y)
End Funcfion
[单项选择]在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果是( )。
Private Sub p1(n As Integer)
For i=n To 1 Step-1
x=String(i,"*")
Print x
Next i
End Sub
Private Sub Command1_Click（ ）
p1(3)
End Sub
[单项选择]在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果为 ( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i, "*") Print x Next i End Sub Private Sub Command1_Click（ ） p1 (3) End Sub
A. * * * * * *
B. * * * * * *
C. * * *
D. * * * * * *
[单项选择]在窗体中添加一个通用对话框Commondialog1和一个命令按钮Command1，当单击按钮时，打开颜色对话框，能实现此功能的程序段是
A. Private Sub Command1_Click() CommondialogShowOpen End Sub
B. Private Sub Command1_Click() Commondialog1.ShowColor End Sub
C. PrivateSubCommand1_Click() Commondialog1.ShowOpen Commondialog1.ShowFont End Sub
D. Private Sub Command1_Click() Commondialog1.ShowColor Commondialog1.ShowHelp End Sub
[单项选择]在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，要求单击命令按钮时，打开一个保存文件的对话框，该窗口的标题为“Save”，缺省文件名称为“SaveFile”，在“文件类型”栏中显示*txt，则能够满足上述要求的程序是（ ）。
A. java
B. javac
C. javap
D. javadoc
[单项选择]在窗体上画一个名称为CommonDialog1的通用对话框和一个名为Command1的命令按钮。要求实现这样一个功能：单击命令按钮后，打开一个通用对话框用于保存文件，其窗口标题为“保存”，默认文件名为Data，在“文件类型”栏中显示*.txt。下列程序中能实现以上功能的是______ 。
A. Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.｜* ｜(*.tx｜(*.do｜*.doc" CommonDialog1. Filterlndex = 2 CommonDialog1. DialogTitle = “保存” CommonDialog1. Action = 2 End Sub
B. Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.*｜(*.tx｜(*.do｜*.doc" CommonDialog1. FilterIndex = 2 CommonDialog1. DialogTitle =“保存” CommonDialog1. Action = 1 End Sub
C. Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.*｜(*.tx｜(*.do｜*.doc" CommonDialog1. FilterIndex = 1 CommonDialog1. DialogTitle = “保存” CommonDialog1. Action = 1 End Sub
D. Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.*｜(*.tx｜(*.do｜*.doc" CommonDialog1. FilterIndex = 1 CommonDialog1. DialogTitle = “保存” CommonDialog1. Action = 2 End Sub
[单项选择]在窗体上画一个名称为、commonDidog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文稿件的通用对话框。该窗口的标题为”Save",缺省文件名为”SaveFile",在“文件类型”栏中显示*.txt,则能够满足上述要求的程序是
A. Private Sub Command1_Click( ) CommonDislog1.FileName="SaveFile" CommonDialog1.Filter="All Files
B. Pnrate Sub Command1_Click( ) CommonDialog1.FileNamc="SaveFile" CommonDialog1.Filtcr="All Files
C. Private Sub Command1_C1ick( ) CommonDialog1.FileName="Saven" CommonDislog1.Filter="All Files
D. PnvateSubCommarldl_C1ick( ) CommonDialog1.FUeName="SaveFile" CommonDialog1.Filter="All Files
[单项选择]在窗体上画一个命令按钮，然后编写如下程序
Private Sub Command4 Click（ ）
Dim a As Integer，b As Integer
a=1
b=2
Print N(a，b)
End Sub
Function N(x As Integer，y As Integer)As Integer
N=IIf(x＞y，x，y)
End Function
程序运行后，单击命令按钮，输出结果为（ ）。
A. l
B. 2
C. 5
D. 8
