Private Sub Command1_Click()
C.ommonDialog1.Filter= (12)
C.ommonDialog1.ShowOpen
PCSTextBox.Text= (13)
E.nd Sub
[试题]在窗体上加上一个文本框控件TextBox,画一个命令按钮,当单击命令按钮的时候将显示"保存文件"对话框,设置该对话框可用于保存文本文件(默认) 和Word文档,然后在文本框控件中显示保存的文件名,请填空。Private Sub Command1_Click()C.ommonDialog1.Filter= (13)C.ommonDialog1.Filter= (14)C.ommonDialog1.ShowSaveTextBox.Text= (15)E.nd Sub
[单选题]在窗体上画一个名称为Commandl的命令按钮。单击命令按钮时执行如下事件过程:Private Sub Commandl_Click()a$=”software and hardware”b$=Right(a$,8)c$=Mid(a$,1,8)MsgBox a$,bs,cS,1E.nd sub则在弹出的信息框标题栏中显示的标题是( )。A.software and hardwareB.hardwareC.softwareD.1
[单选题]在窗体上画一个命令按钮,然后编写如下时间过程( )。程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是A. 579B. 123C. 456D. 123456
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是( )。A.hardwareB.softwareC.hardwareD.1
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_Click( ) a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox aS,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是A.software and hardwareB.softwareC.hardwareD.1
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程,则在弹出的信息框的标题栏中显示的信息是 ______。 Private SubCommand1_Click() a$="software and hardware" b$=Right(a$,8) c$ =Mid(a$,1,8) MsgBox a$ ,, b$ ,c$,1 End SubA.software and hardwareB.softwareC.hardwareD.1
[单选题]在窗体上画一个命令按钮,然后编写如下程序。运行后,单击命令按钮,输出结果为 ( )。Private Sub Command4_Click()D.ima As Integer,bASIntegera=1b=2PrintN(a,b)E.nd SubF.unction N(X As Integer,yAsInteger)AsIntegerN=IIf(x>y,x,y)E.nd FuncfionA.B.C.D.
[单选题]在窗体上画一个命令按钮,命名为CommandI。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程 F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。 能够正确实现上述功能的代码是A.Privme Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If
[主观题]在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到Text1中。例如,若在Text1中输入的是abDfdb,则单击Command1按钮后Text1中显示的字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。Private Sub Command1_Click( )D.im str As String, s As String,
[单选题]在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果是( )。Private Sub p1(n As Integer)F.or i=n To 1 Step-1x=String(i,"*")Print xNext iE.nd SubPrivate Sub Command1_Click()p1(3)E.nd SubA)*B)C)D)A.*** ** *B.* ** ****C.* * *D.******