填空题在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示 “打开文件”对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。 　　Private Sub Command1_Click() 　　　　CommonDialog1．Filter=【 】 　　　　CommonDialog1．ShowOpen 　　　　PCSTextBox．Text=【 】 　　End Sub

填空题 【3】 和软件开发方式及技木的落后是诱发软件危机的根本原因。

填空题以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。在【12】和【13】处填入适当的内容，将程序补充完整。 Private Sub Form_Click() Dim x As Single，amax As Single，amin As Single x=InputBox("Enter a score") amax=x amin=x Do While 【12】 If x＞amax Then amax=x End If If 【13】 Then amin=x End If x=InputBox("Enter a score") Loop Print"Max="；amax，"Min="；amin End Sub

填空题设有如下程序 Private Sub Fom1_Click( ) Dim s As Integer，b As Integer a=20：b=50 p1 a，b p2 a，b p3 a，b Print"a="；a，"b=";b End Sub Sub pl(x As Integer，ByValy As Integer) x=x+10 y=y+20 End Sub Sub p2(ByVal x As Integer，y As Integer) x=x+10 y=y+20 End Sub Sub p3(ByVal x As Integer，ByValy As Integer) x=x+10 y=y+20 End Sub 该程序运行后，单击窗体，则在窗体上显示的内容是：a={{U}} 【9】 {{/U}}和b={{U}} 【10】 {{/U}}。

填空题工程中有Form1、两个窗体。Form1窗体外观如图1所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮"计算并显示"(其名称为Command1)，则显示窗体，且根据输入的圆的半径计算圆的面积，并在的窗体上显示出来，如图2所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示"请输入数值数据!"。请填空。PrivateSubCommand1_Click()If=""ThenMsgBox"请输入半径!"ElselfNotIsNumeric(________)ThenMsgBox"请输入数值数据!"Elser=Val(________).Show________.Print"圆的面积是"＆3.14"r*rEndIfEndSub

填空题单击窗体上的命令按钮Command1，程序的输出为 【6】 。 Private Sub Command1_Click() a="AbC" b="dEF" c=UCase(a) +LCase(b) Print Asc(c) End Sub

填空题下列程序弹出对话框中按钮的个数为______。 MsgBox "确认!",vbAbortRetryIgnore+vbMsgBoxHelpButton+vbQuestion,"提示/

填空题以下程序段在窗体上输出{{U}} [12] {{/U}}，在图片框中输出name，在立即窗口中输出{{U}} [13] {{/U}}。 A="your" B="aname" C="iscr" PrintRight(A,3) Picturel.PrintMid(B，2，4) Debug.PrintLeft(C，2)

填空题在用Open语句打开文件时，如果省略“For方式”，则打开的文件的存在方式是 (14) 。

填空题在显示字体对话框之前必须设置 【6】 属性，否则，将发生字体不存在的错误。

填空题在3种不同类型的组合框中，只能选择而不能输入数据的组合框是______。

填空题图片按钮的 【6】 属性用来设置命令按钮无效时显示的图形。

填空题在Visual Basic工程prjl中包含有两个窗体，窗体form1(主窗体)上有两个命令按钮command1和 command2，一个文本控件text1；窗体dialog是一个对话窗体，窗体包含两个命令按钮OK和Cancel，一个文本控件text1和一个标签控件labe11。 编写程序要求实现的功能为：窗体form 1上command1的caption属性值为name，程序运行后，当单击 eommand1时，弹出对话窗体dialog，其labe11控件中的提示信息为“please input your name：”，要求用户输入自己的姓名。如果单击OK按钮，保存当前输入的内容并返回form1界面，command1的caption属性值为email。若再次单击command1命令按钮，仍然出现dialog对话窗体，此时dialog的labe11提示用户输入自己的email，当用户输入email后，单击“确定”按钮，保存当前输入的内容并返回form1界面；如果单击Cancel按钮，则输入内容无效并返回form1。 Private Sub Command1_Click() Dialog. Text1. Text = "" Dialog. Show End Sub Private Sub Command2_Click() Text1. Text = "email: "+ Dialog. email +" name: "+ Dialog. fname End Sub Private Sub Form_ Load() Command1. Caption = "name" 【7】 . Caption = "please input your name: Dialog. i = 0 End Sub Option Explicit Public i As Integer Public email As String Public fname As String Private Sub CancelButton_Click() i=0 email = "" fname = "" Forml. Command1. Capt ion = "name" Dialog. Hide Form1. Show End Sub Private Sub OKButton_ Click() 【8】 Select Case i Case 1: email = Text1. Text Labe11. Caption = "please input your email:" 【9】 . Caption = "email" Case 2: fname = Text1. Text 【10】 . Caption = "name" i=0 End Select Dialog. Hide Form1. Show End Sub

填空题第一趟排序后序列中关键字最大的记录交换到最后的排序方法是______。

填空题在Visual Basic应用程序中，窗体文件和工程文件的扩展名分别为{{U}} 【3】 {{/U}}和{{U}} 【4】 {{/U}}。

填空题为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的______属性设置为500.

填空题打开“部件”对话框的另一种方法是单击主菜单中的 (9) 菜单项，然后在弹出的下拉菜单中选择 (10) 子菜单。

填空题当列表框中的项目较多、超过了列表框的长度时，系统会自动在列表框边上加一个______。

填空题执行下列语句后，输出结果是______。 s$="ABCDEFG" Print InStr(s$, "efg") Print LCase$(s$)

填空题数据库技术的主要特点为 【4】 ，具有较高的数据和程序的独立性以及对数据实行集中统一的控制。