网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
在窗体上画1个命令按钮和1个通用对话框,其名称分别为Commandl和CommonDialogl,然后编写如下事件过程:
Private Sub Commandl_CUck()
CommonDialog1.______="打开文件"
CommonDialog1.Filter="All Files(*.*)|*.*"
CommonDialog1.InitDir="C:\"
CommonDialog1.ShowOpen
End Sub
该程序的
参考答案
更多 “ 在窗体上画1个命令按钮和1个通用对话框,其名称分别为Commandl和CommonDialogl,然后编写如下事件过程:Private Sub Commandl_CUck()CommonDialog1.______="打开文件"CommonDialog1.Filter="All Files(*.*)|*.*"CommonDialog1.InitDir="C:\"CommonDialog1.ShowOpenEnd Sub该程序的 ” 相关考题
考题
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim a() a=Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承
考题
在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Commandl的命令按钮。然后编写如下事件过程: Private Commandl_Click() CommonDialogl.FileName="" CommonDialogl.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialogl.Filterlndex=2 CommonDialogl.DialogTifle="VBTestA.该对话框被设置为“打开”对话框B.在该对话框中指定的默认文件名为空C.该对话框的标题为VBTestD.在该对话框中指定的默认文件类型为文本文件(*.Txt)
考题
在窗体上画一个命令按钮(名称为 Commandl),然后编写如下事件过程: Private Sub Commandl_Click() Static a As Integer a=a+1 End Sub 运行程序,第3次单击命令按钮后,变量a的值为( )A.0B.1C.2D.3
考题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.VVVB.VisC.sicD.11
考题
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:A. 1和0B. 2和72C. 3和50D. 4和168
考题
假定通用对话框的名称为CommonDialogl,命令按钮的名称为Commandl,则单击命令按钮后,能使打开的对话框的标题为"New Title"的事件过程是______。A. Pdvate Sub Commandl_click() CommonDialogl.DialogTitle="New Title" CommonDialogl.ShowPrinter End SubB.Private Sub Cormnandl_click() CommonDialogl.DialogTitle="New Title" CommonDialogl.ShowFont End SubC.Private Sub Commandl_click() CommonDialogl.DialogTitle="New Title" CommonDialogl.ShowOpen End SubD.Pfivate Sub Commandl_click() CommonDialogl.DialogTitle="New Title" CommonDialogl.ShowColor End Sub
考题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:Pfivae Sub Commandl_click()a=0For i=1 To 2For j=1 To 4If i Mod 20 Thena=a-1End Ifa=a+1Next jNext IMsgBox aEnd Sub程序运行后,单击命令按钮,消息框中的输出结果是______。
考题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: PrivateSubCommandl_CnCk() aS="VisualBasic", Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是( )。A.VVVB.VisC.sicD.11
考题
在窗体上画一个命令按钮和一个通用对话框,其名称分别为Command1和CommonDialogl,然后编写如下代码; Private SubCommand1_Click() CommonDialogl.Filter=" All Files |*.*|(*.exe)|*.exe|(*.doC)[*.doc|(*.bmp)|*.bmp" CommonDialogl.FileName=" " CommonDialogl.Flags=vbOFNFileMustExist CommonDialogl.FilterIndex=3 CommonDialogl.DialogTitle="OpenFile(*.doC) CommonDialogl.Action=1 If CommonDialogl.FileName= "Then MsgBox "No file selected",37,"Checking" Else End If End Sub 程序运行后,单击命令按钮,将显示一个对话框,该对话框的标题是 ______。A.空字符B.OpenFile(*.doC)C.打开文件D.保存文件
考题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n \ 3 Next n print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是A.15B.18C.21D.24
考题
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程: Private Sub Commandl_click() CommonDialogl.Friter="AllFiles(*.*)|*.*|Text Files"_ "(*.txt)|*.txt|Executable Files(*.exe)|*.exe" CommonDialog1.FilterIndex=3 CommonDA.AllFries(*.*)B.TextFiles(*.txt)C.Executable Fries(*.exe)D.不确定
考题
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如 下事件过程: Private Sub Commandl_Click() CommonDialogl,Flags=vbOFNHideReadOnly CommontDialogl.Filter="All Files(*.*)|*.*|Text Files (*.*)|*.txt|"_ Batch Files (*.bat) |*.bat" CommonDialogl.Filterlndex=1 CommonDialogl.Showopen MsgBox CommonDialogl.FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是A.All Fries(*.*)B.Text Files(*.*)C.Batch Files(*.bat)D.All Files (*.*)|Text Files(*.*)
考题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Forn=1 To 20 If n Mod 3<>Thenm=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24
考题
在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,然后编写如下代码:Dim Save All As StringPrivate Sub Commandl_C1iCk()Text1.Text=Left(UCase(SaveAU),4)End SubPrivate Sub Textl_KeyPress(KeyAscii As Intege)SaveA11=Save All+Chr(KeyAscii)End Sub程序
考题
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。
考题
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:程序运行后,单击命令按钮,将产生l00个1000以内的随机整数,放入数组aft中,然后查找并先后使用消息框输出这100个数中的最大值Max和最小值Min,请填空。
考题
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),然后编写如下事件过程:
热门标签
最新试卷