填空题
在窗体上加上一个文本控件PCSTextBox,画一个命令按钮,当单击命令按钮的时候将显示“打开文件”对话框,设置该对话框只用于打开文本文件,然后在文本控件中显示打开的文件名。请填空。
Private Sub Command1_Click()
CommonDialog1. Filter=
【14】
CommonDialog1. ShowOpen PCSTextBox. Text=
【15】
End Sub
【参考答案】
[14] "Text Files(*.txt)|*.txt"
[15] CommonDialog1.FileName
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
以下程序判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以 5余3,除以7余4,则输出;否则,将焦点定位在文本框Text中,选中其中的文本。 Private Sub Command1_Click() x=Val(Text1.Text) If 【9】 Then Print x Else Text1.SetFoeus Text1.SetStart=0 End If End Sub
点击查看答案&解析
单项选择题
阅读程序: Sub subP(b() As Integer) For i=1 To 4 b(i)=2 * i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序,单击命令按钮,输出结果为
A.2
4
6
8
B.5
6
7
8
C.10
12
14
16
D.出错
点击查看答案&解析
相关试题
设计一个计时程序。该程序用户界面如图所示...
在窗体中添加一个命令按钮,然后编写如下代...