网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上画一个通用对话框,其Name属性为Cont,再画一个命令按钮,Name属性为Command1,然后编写如下事件过程:

Private Sub Command1_Click()

Cont.FileName= ""

Cont.Flags=vbOFNFileMustExist

Cont.Filter= "All Files|*.*"

Cont.FilterIndex=3

Cont.DialogTitle= "Open File"

Co nt.Action=1

If Cont.FileName= "" Then

MsgBox "No file selected"

Else

Open Cont.FileName For Input As #1

Do While Not EOF(1)

Input #1, b$

Print b$

Loop

End If

End Sub

以下各选项,对上述事件过程描述错误的是( )。

A.该事件过程用来建立一个Open对话框,可以在这个对话框中选择要打开的文件

B.选择后单击"打开"按钮,所选择的文件名即作为对话框的FileName属性值

C.Open对话框不仅仅用来选择一个文件,还可以打开、显示文件

D.过程中的"Cont.Action=1"用来建立Open对话框,它与Cont.ShowOpen等价


参考答案

更多 “ 在窗体上画一个通用对话框,其Name属性为Cont,再画一个命令按钮,Name属性为Command1,然后编写如下事件过程:Private Sub Command1_Click()Cont.FileName= ""Cont.Flags=vbOFNFileMustExistCont.Filter= "All Files|*.*"Cont.FilterIndex=3Cont.DialogTitle= "Open File"Co nt.Action=1If Cont.FileName= "" ThenMsgBox "No file selected"ElseOpen Cont.FileName For Input As #1Do While Not EOF(1)Input #1, b$Print b$LoopEnd IfEnd Sub以下各选项,对上述事件过程描述错误的是( )。A.该事件过程用来建立一个Open对话框,可以在这个对话框中选择要打开的文件B.选择后单击"打开"按钮,所选择的文件名即作为对话框的FileName属性值C.Open对话框不仅仅用来选择一个文件,还可以打开、显示文件D.过程中的"Cont.Action=1"用来建立Open对话框,它与Cont.ShowOpen等价 ” 相关考题
考题 在窗体(Name 属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Commnd1_Click() a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_ Load () Text1 Text=“” Text2 Text=“” End sub程序运行后,在第一个文本框(Text1)和第二个文本框(text2)中分别输入123和321,然后单击命令按钮,则输出结果为______ 。A.444B.321123C.123321D.132231

考题 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click() A=Text1.Text+TextText Print a End Sub Private SUb Form胃Load() Text1.Text= " " TextText=" " End Sub程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44,然后单击命令按钮,则输出结果为A.77B.33+44C.3344D.4433

考题 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Private Sub Command1_Click()Dim a(5,5)For i=1 To 3For j=1 To 4a(i,j)=i*jNextNextFor n=1 To 2For m=1 To 3Print a(m,n);NextNextEnd Sub程序运行后,单击命令按钮,输出结果是A.2 4 6 1 2 3B.1 2 3 2 4 6C.1 2 3 4 5 6D.6 5 4 3 2 1

考题 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim as=0:j=1a=Array(1,2,3,4)For i=4 To 1 Step-1s=s+a(i)*jj=j*10NextPrint sEnd Sub运行上面的程序并单击命令按钮,其输出结果是A.4221B.1234C.34D.12

考题 在窗体(Name属性为form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮 (Name属性为Command1),然后编写如下两个事件过程,该过程的运行结果为______。Private Sub Command1_Click() a = Text1, Taxt + Text2, Text Print aEnd SubPrivate Sub form_ Load() Text1.Text = "123" Text2.Text = "321"End SubA.444B.321123C.123321D.132231

考题 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码; Option Base 1 Private Sub Command1_ Click() Dim a(4, 4), For i = 1 To 4 For j = 1 To 4 a(i, j) = (i - 1) * 3 + j Next j Next i For i = 3 To 4 For j = 3 To 4 Print a(j, i); Next j Print Next i End Sub程序运行后,单击命令按钮,输出结果为______。A.6 9 7 10B.7 10 8 11C.8 11 9 12D.9 12 10 13

考题 在窗体上画两个文本框(其Name属性分别为Text1和Tex12)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: 程序运行后,单击命令按钮,在两个文本框中显示的值分别为()。A10和0B2和100C3和50D4和168

考题 在窗体上画两个文本框,(其Name 属性分别为Text1和Text2)和一个命令按纽(其Name属性为Command1),然后编写如下事件过程() A1和0B2和72C3和50D4和168

考题 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?