VB电大形成性考核作业

VB程序设计作业1一、选择1在设计应用程序时，可以查看到应用程序工程中所有组成部分的窗口是（D）。A窗体设计 B.代码 C.属性 D.工程资源管理器窗口2窗体的Load事件的触发时机是（B）。A用户单击窗体时 B.窗体被加载时C窗体显示之后 D.窗体被卸载时3与传统的程序设计语言相比，Visual Basic最突出的特点是（C）。A结构化程序设计 B.程序开发环境C事件驱动编程机制 D.程序调试技术4VB6.0集成开发环境的主窗口中不包括（C）。A标题栏 B.菜单栏 C.状态栏 D.工具栏5如果对象的名称为Mytext，而且对象有一个属性Text,那么在代码中引用该属性的正确格式是（B）。AText.Mytext B.Mytext.text C.Mytext.(Text) D.Mytext*Text6下列可以激活属性窗口的操作时（D）。A用鼠标双击窗体的任何部位 B.执行“工程”菜单中的“属性窗口”命令C按Ctrl+F4 D.按F4键7假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是（A）。A单击窗体上没有控件的地方 B.单击任一个控件C不执行任何操作 D.双击窗体的标题栏8如果要在文本框中的内容在运行时不能编辑，需将文本框的（B）属性设置为True。ACaption B.PasswordChar C.Text D.Char9如果想让文本框中的内容在运行时不能编辑，需将文本框的（A）属性设置为True。ALocked B.MultiLine C.TabStop D.Visible10对于定时器(Timer)控件，设置其定时是否开启的属性是（C）。AIndex B.Tag C.Enabled D.Left11要在窗体Form1内显示“myfrm”，使用的语句是（C）。AForm1.caption=”myfrm” B.Form1.caption=”myfrm”CForm1.Print”myfrm” D.Form1.Print “myfrm”12对象的性质和状态特征称为（C）。A事件 B.方法 C.属性 D.类13下列正确的赋值语句是（B）。Ax+y=20 B.y=x+20 C.3x=y D.s=p*r*r14当使用上下文相关的帮助时，选择要帮助的内容，然后按（D）键，就可出现MSDN窗口直接显示所需的帮助信息。AHelp B.F10 C.Esc D.F115将调试通过的工程经“文件”菜单的“生成.exe”编译成名.exe后，将该可执行文件放到其他机器上不能运行的主要原因是（D）。A运行的机器上无VB系统 B.缺少.frm窗体文件C.该可执行文件有病毒 D.以上原因都不对二、填空题：1当进入VB集成开发环境后，发现没有显示“工具箱”窗口，应选择 菜单的 选项，使“工具箱”窗口显示。视图 工具箱 （View Toolbox）2在VB中，事件过程名由 和 构成。对象名 事件名3工程文件的扩展名是 ，窗体文件的扩展名是 。.vbp .frm4对象是代码和数据的集合，例如，Visual Basic中的 、 、 等都是对象。控件 窗体 菜单5对象的方法用于 。当方法不需要任何参数并且也没有返回值时，调用对象的方法的格式为 。例如对窗体Form1使用Show方法，应写成 。完成某种特定的功能 对象名.方法名 Form1.show6要使文本框显示滚动条，需要将其 属性设置为 。Multiline True （ScrollBars 1,2或3）7欲设置定时器的时间间隔为4秒，则属性Interval的值为 。40008要使标签框的大小随Caption属性做自动调整，应将 属性设置为 。Autosize true9通过 可以在设计时直观地调整窗体在屏幕上的位置。窗体布局窗口10要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK！时，应当编写的语句是 。txtshow.text=GOOD WORK！ 11若命令按钮的名称为Cmdopen，程序要求单击以上命令按钮时，打开一个窗口frm1，请对以下事件过程填空。Private Sub Cmdopen_ End SubClick frm1.show12事件就是在对象上所发生的事情，Visual Basic 中的事件如 、 、 等。一个对象响应的事件可以有 个，用户不能建立新的事件。事件过程是指 。假设某一事件过程如下：Private Sub Cmd1_Click()Form1.Caption=”VB示例”End Sub则响应该过程的对象名是 ，事件名是 。单击 双击 装载 多 响应某个事件后所执行的程序代玛 cmd1 Click（click Dbclick load 多 响应某个事件后所执行的程序代码cmd1 click）13. 对象的方法用于 ，当方法不需要任何参数并且也没有返回值时，调用对象的方法的格式为 。例如，对窗体Form1使用Show方法，应写成 完成某种特定的功能 对象名.方法名 Form1.Show14为了在编写代码时能自动进行语法检查，必须执行 菜单中的 命令，打开 对话框，然后选择“编辑器”选项卡中的 。工具 选项 选项 自动语法检测15定时器(Timer)控件可识别的事件是 ，发生该事件的时间间隔由定时器的 属性设置，其单位为 。timer interval ms三、问答题1什么是可是化编程和事件驱动？参考答案答：可视化编程是目前最直观的一种编程方法，人们一般用Visual一词表示它。之所以叫做“可视”，是指你无需编程，仅通过直观的操作方式即可完成界面的设计工作。因此，可视化语言是目前最好的Windows应用程序开发工具。在这种语言中引入了控件的概念，每个控件都有若干方法和事件，并通过一系列的属性来控制控件的外观。利用这些控件，编程过程就如同画画，随意点几下鼠标，一个按钮就完成了，这些工作在使用传统编程语言的情况下，需要编写大量复杂的程序代码才能实现。可视化编程主要用到了事件驱动机制，其原理是：当应用程序运行后，程序处于等待状态，当某个事件发生后，程序就去执行此事件的事件过程，当这个事件过程执行完后，应用程序又处于等待另一个事件发生的状态。2对象、属性、事件和方法之间的关系如何？参考答案答：对象是代码和数据的封装体，在VB中，“数据”表现为属性，“代码”则表现为事件和方法。建立一个对象后，其操作通过与该对象的有关属性、事件和方法来描述。属性是一个对象的基本特性，每个对象都有它自己的属性。通过修改对象的属性，可以改变对象的外观和功能。方法就是要对象执行的动作，一般可以将它理解为VB提供的一种特殊的过程和函数。其特殊性在于，这些过程和函数是封装在对象内部的，是在对象上实施的某种操作功能。事件就是在对象上所发生的事情。对象的事件是由VB预先设置好的、能被对象识别的动作。用户不能建立新的事件，但可以根据需要对事件进行编程。从非严格意义上讲，可以将事件理解为一种特殊的方法。3简述事件驱动机制与传统编程方式的不同。参考答案答：传统的面向过程的应用程序中，应用程序自身控制了执行哪一部分代码和按何种顺序执行代码，程序从第一行代码开始执行并按应用程序中预定的路径执行，用户无法改变程序的执行流程。在事件驱动的应用程序中，程序的执行发生了根本的变化，代码不是按照预定的路径执行，而是在响应不同的事件时执行不同的代码片段。每个对象都有一个相应的事件集，每个事件发生都要执行一段程序代码。事件可以由用户操作触发，也可以由操作系统或其它应用程序的消息触发，甚至可由应用程序本身的消息触发。这些事件的顺序决定了代码执行的顺序，因此，应用程序每次运行所经过的代码路径是不确定的，它的执行流程由用户来决定。在程序设计时，不需要指出先执行哪部分代码，或按什么顺序执行代码，只需编写针对某个事件的程序代码即可。4简述事件驱动的工作过程。参考答案答：事件驱动是VB应用程序的基本机制，其基本过程是：（1）启动应用程序，装载和显示窗体。（2）窗体或窗体上的控件等待事件的发生。事件可由用户引发（例如键盘操作或鼠标点击）、可由系统引发（例如定时器控件）、也可由代码间接引发（例如当代码装载其他窗体时产生的Load事件）。（3）当某个事件发生后，执行其对应的事件过程代码。（4）重复执行第2和第3步。直到遇到End语句或单击“结束”按钮停止程序的运行。四、程序设计题1 在窗体上添加一个文本框和两个命令按钮，并把两个命令按钮的标题分别设置为“隐藏文本框”和“显示文本框”。当单击第一个命令按钮时，文本框消失；而当单击第二个命令按钮时，文本框重新出现，并在文本框中显示“VB程序设计”（字体大小为16）。程序运行界面如图1所示。Private Sub Form_Load() Text1.Text = VB程序设计 Text1.FontSize = 16End SubPrivate Sub Command1_Click() Text1.Visible = FalseEnd SubPrivate Sub Command2_Click() Text1.Visible = TrueEnd Sub2设计一个计算程序。该程序用户界面如图2所示，由四个文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4）,和三个按钮；命令按钮1（command1）、命令按钮2（command2）、命令按钮3（command4）组成，程序运行后，用户按清除按钮，则清除文本框中显示的内容，按计算按钮，则计算三科平均成绩。单击退出按钮则退出。Private Sub Command1_Click() Text1.Text = Text2. Text = Text3.Text = End SubPrivate Sub Command2_Click() If Text1 Text = Or Text2.Text = Or Text3.Text = Then MsgBox 成绩输入不全！ Else Text4.Text = (Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text) /3 End IfSub EndPrivate Sub Command3_Click()Unload MeEnd Sub3编写一收款计算程序。要求用户输入商品的“单价”、“数量”和“折扣”后，单击“计算”按钮显示“应付款”，单击“清除”按钮，清除文本框中所有的数据。程序运行界面如图3所示。 Private Sub Command1_Click() If Text1.Text = Then MsgBox 至少要输出单价！ Text1.SetFocus Exit Sub End If If Text2.Text = Then Text2.Text = 1 If Text3.Text = Then Text3.Text = 1 Text4.Text = Text1.Text * Text2.Text * Text3.TextEnd Sub作业二一、选择题1按照变量的作用域可将变量划分为（B）。A公有、私有、系统 B.全局变量、模块级变量、过程级变量C动态、常数、静态 D.Public 、 Private、 Protected2可获得字符的ASCII码的函数是（C）。AVal B.Fix C.Asc D.Chr3要退出DoLoop循环，可使用的语句是（D）语句。AExit B.Exit For C.End Do D.Exit Do4把数值型转换为字符串型需要使用的函数是（B）。AVal B.Str C.Asc D.Chr5关于语句行，下列说法正确的是（D）。A一行只能写一条语句 B.一条语句可以分多行书写C每行的首字符必须大写 D.长度不能超过255个字符6表达式6 + 10 Mod 4*2 + 1 的值是（A）。A9 B.11 C.1 D.37以下可以作为Visual Basic变量名的是（B）。ASIN B.CO1 C.COS(X) D.X(-1)8表达式Abs(-5) + Len (“ABCDE”)的值为（C）。A5ABCDE B.-5ABCDE C.10 D.09在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符（A），表示下一行是当前行的继续。A一个空格加一个下划字符（_） B.一个下划字符（_）C直接回车 D.一个空格加一个连字符（）10Sub过程与Function过程最根本的区别是（D）。ASub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以。BFunction过程可以有参数，Sub过程不可以。C两种过程参数的传递方式不同。DSub过程的过程名不能返回值，而Function过程能够通过过程名返回值。11“x是小于80的非负数”，用VB表达式表示正确的是（C）。A0 x 80 B.0 = x 80 C0 = x And x 80 D.0 = x Or x 80 12在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为（B）。A加号（+） B.减号（） C.星号（*） D.感叹号（！）13如果要在程序中显示一个弹出式菜单，那么要调用Visual Basic中提供的方法是（D）。APrint B.Move C.Refresh D.PopupMenu14下列可以用来存储图像供其他对象使用的控件是（C）。AToolBar B.StatursBar C.ImageList D.KeyPress15当单击工具栏上的按钮时，会触发的事件是（A）。AButtonClick B.Change C.ShowSave D.ShowColor16要利用公用对话框控件来显示“打开文件”对话框，需要调用控件的（B）方法。AShowPrinter B.ShowOpen C.ShowSave D.ShowColor17对于窗体级变量，下列说法中错误的是（C）。A所在窗体的各子程序都可以访问B其他窗体的子程序不能访问C所在窗体的子程序不能访问用Private定义的窗体级变量D一定要在所在窗体的通用区内定义18从一个字符串中的第3个字符开始，获取5个字符，应使用（B）。ALen函数 B.Mid函数 C.Left函数 D.Right函数19用下面的语句所定义的数组的元素的个数是（D）。Dim A(-3 to 5 ) as IntegerA6 B. 7 C. 8 D. 920有如下程序段：Dim str1 As String * 5 Str1= ”Visual Basic”当该程序段被执行完时，变量Str1的值是（B）。A”Visual ” B. “ Visua ” C. “ V ” D. “ Visual Basic ”二、填空题1菜单一般有 和 两种基本类型。 下拉式菜单 弹出式菜单2通用对话框控件可显示的常用对话框有 、 、 、 和 、 。打开 另存为 颜色 字体 打印（open save color font Print）3组合框具有 和 两种控件的基本功能。文本框 列表框4要使数组的默认下标从“1”开始，则应在窗体或标准模块代码的声明部分使用语句 。Option Base 15调用Sub过程时，使用 语句，该语句用于把程序控制传送到一个Visual Basic的Sub 过程。Call 6若已建立了Form1和Form2两个窗体，默认启动窗体为Form1。通过 菜单 命令的 选项卡，可将启动窗体设置为Form2。在程序中若要显示Form1窗体，则执行 语句。工程 工程属性 通用 Form1.show7列表框中项目的序号是从 开始的。08Sub过程与Function过程最根本的区别是 。Sub过程的过程名不能返回值，而Function过程返回与其过程名相关的值9VB的代码存储在模块中。在VB中提供了三种类型的模块： 、 、 。 窗体 标准 类10使用Hide方法会隐藏被调用的窗体，但是在调用Hide方法之后不会把窗体 ，被调用的窗体中的属性等已处于 。移出内存 无效状态（从内存中卸载 无效状态）11将下列数学式子写成VisualBasic表达式。（1）2cosasina/2a：2*cos(a)*sin(a)/(2*a)（2）：sqr(s*(s-a)*(s-b)*(s-c)（3）sin45o：Sin(45*3.14/180)12将下列各条件写成VisualBasic逻辑表达式：（1）1 x 12 : 1=x and x= c or (a-c)= c（3）a和b都为正整数或同为负数: a0 and b0 and b013设A=2，B=3，C=4，D=5。表达式 Not A= C Or 4*C=B2 And B A+C的值为 。false14在Visual Basic语言中有三种形式的循环结构。其中，若循环的次数可以事先确定，可使用 循环；若要求先判断循环进行的条件，可使用 循环 或 循环。For While( Do WhileLoop) Do(Do Loop Until) 15以下语句的输出结果是 。a% =3.14159Print a%3三、阅读下列程序，写出程序运行结果1Private Sub Form_Click() Static Sum As Integer For I= 1 To 100 Sum=Sum +I Next I Print Sum End Sub50502Private Sub Form_Click() A=10 : B=15 : C=20 : d=25 Print A; spc(5); b; spc(7) ; c Print A; spc(8); b; space $ (5); c Print c; spc(3); “+” ; spc(3) ; d; Print Spc(3); “=” ; spc(3); c+d10 15 2010 15 2020 + 25 = 453Private Sub Form_Click() For i %=1 To 3 For j %=1 To i Print LTrim(Str(i%) + “*” + LTrim(Str(j%) + “=” ; i% * j%; Next j% Print Next i%End Sub1*1=1 2*1=2 2*2=43*1=3 3*2=6 3*3=94Private Sub Command1_Click() Dim a, b As Integer a=3.4 b=3.4 Text1.text=a Text2.text=b End Sub3.435Private Sub Form_Click() For i=1 To 5 Print Tab(11-i); For J=1 To I *2-1 Print “*”; Next Next i End Sub * * * * * * * * * * * * * * * * * * * * * * * * *四、程序设计题1购物优惠程序。某商场为了加速促成商品流通，采用购物打折的优惠办法，每位顾客一次购物（1）在100元以上者，按九五折优惠；（2）在200元以上者，按九折优惠；（3）300元以上者，按八折优惠；（4）500元以上者按七折优惠。在窗体上添加两个文本框和一个命令按钮，要求在Text1中输入购物商品总金额，单击命令按钮，在Text2中输出优惠后的价格。程序运行结果如图4所示。 Private Sub Command1_Click() Dim x As Single, y As Single x = Val(Text1.Text) If x 100 Then y = x Else If x 200 Then y = 9.5 * x Else If x 300 Then y = 0.9 * x Else If x 200 If x Mod 3 0 Then Text1.Text = Text1.Text & Str(x) & Chr(13) & Chr(10) End If x = x + 1 LoopEnd Sub 3编写程序，打印如下的乘积表： Private Sub Form_Click()Print *;Tab(9);3,Tab(18);6;Tab(27);9;Tab(36);12PrintFor I=15 to 18Print I;For j=3 to 12 Step 3Print Tab(3*j);j*I;Next jPrint Next IEnd sub 4设计一个计算程序。该程序用户界面如图7所示。要求程序运行后，用户选中单选按钮，则程序作10和2的相应计算，并把计算结果在文本框中显示出来。如用户 选中加法单选按钮，则程序作10和2的相加，计算结果12在文本框中显示出来。按结束，则退出。Private Sub Command1_Click() Unload MeEnd SubPrivate Sub Option1_Click() Text1.Text = 10 * 2End SubPrivate Sub Option2_Click() Text1.Text = 10 / 2End SubPrivate Sub Option3_Click() Text1.Text = 10 + 2End SubPrivate Sub Option4_Click() Text1.Text = 10 - 2End Sub5编写输入一个06数字，显示汉字对照输出星期的Function过程。程序运行结果如图8所示。Private Function Day(n As Integer) Select Case n Case 0 Day = 星期日 & Chr(13) & (Sunday) Case 1 Day = 星期一 & Chr(13) & (Monday) Case 2 Day = 星期二 & Chr(13) & (Tuesday) Case 3 Day = 星期三 & Chr(13) & (Wednesday) Case 4 Day = 星期四 & Chr(13) & (Thursday) Case 5 Day = 星期五 & Chr(13) & (Friday) Case 6 Day = 星期六 & Chr(13) & (Saturday) End SelectEnd FunctionPrivate Sub Text1_KeyPress(KeyAscii As Integer) Dim n As Integer n = Val(Text1.Text) If KeyAscii = 13 Then If n = 0 And n 7 Then Label1.Caption = Day(n) Else MsgBox 请输入06之间的整数！ End If End If Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text)End Sub6编写一个程序，当鼠标移到Picture1控件上时，鼠标指针改变形状；当在Picture1控件上单击鼠标右键时，通过消息框显示“You pressed right button”，并再次改变鼠标指针的形状。新建一个工程，在默认的窗体Form1上放置一个Picture控件，然后编写如下代码。Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then MsgBox You pressed right Button Picture1.MousePointer = vbArrow End IfEnd SubPrivate Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Picture1.MousePointer = vbUpArrowEnd Sub 7列表框应用程序。要求从文本框中输入姓名，然后按“添加”按钮，把姓名添加到列表框中；当选择列表框中某一项时，按“删除”按钮，从列表框中删除；当选择列表框中某一项时，按“修改”按钮，把列表框中选取的4送往文本框且“修改”按钮变为“修改确认”。在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改后的信息送到列表框且“修改确认”按钮变为“修改”。程序运行结果如图9所示。 Private Sub Form_Load() List1.AddItem 李敏 List1.AddItem 张华 List1.AddItem 吕晓烨 List1.AddItem 赵巍 List1.AddItem 袁莉 List1.AddItem 王津 List1.AddItem 何小渴 List1.AddItem 崔宁 List1.AddItem 陈曦 List1.AddItem 刘伟楠End SubPrivate Sub Command1_Click() If Text1.Text Then List1.AddItem Text1.Text Text1.Text = Else MsgBox 请在文本框中输入信息！ End IfEnd SubPrivate Sub Command2_Click() List1.RemoveItem List1.ListIndexEnd SubPrivate Sub Command3_Click() If Command3.Caption = 修改 Then Text1.Text = List1.Text Text1.SetFocus Command1.Enabled = False Command2.Enabled = False Command3.Caption = 修改确认 Else List1.List(List1.ListIndex) = Text1.Text Command1.Enabled = True Command2.Enabled = True Text1.Text = Command3.Caption = 修改 End IfEnd SubPrivate Sub List1_Click() If List1.ListIndex -1 Then Command2.Enabled = True Command3.Enabled = True End IfEnd Sub作业三一、选择题1Visual Basic根据计算机访问文件的方式将文件分成三类，其中不包括（B）。A顺序文件 B.Unix文件 C.二进制文件 D.随机文件2随机文件进行文件读取的单位是（B）。A字节 B.记录 C.整个文件 D.字符3为了使目录路径列表框Dir1的内容符合驱动器列表框Drive1的选择，应当（B）。A在Dir1_Click事件中加入Dir1.Path=Drive1.DriveB在Drive1_Click事件中加入Dir1.Path=Drive.DriveC在Dir1_Click事件中加入Drive1.Path=Dir1.PathD在Dir1_Click事件中加入Drive1.Path=Dir1.Path4为了使drive11驱动器列表框、dir1目录路径列表框和file1文件列表框能同步协调工作，需要在（B）。Adrive1的Change事件过程中加入drive1.Drive=dir1.Path，在dir1的Change事件过程中加入dir1.Path=file1.Path代码Bdrive1的Change事件过程中加入dir1.Path=drive1.Drive，在dir1的Change事件过程中加入file1.Path=dir1.Path代码Cdir1的Change事件过程中加入dir1.Path=drive1.Drive.Drive，在file1的Click事件过程中加入file1.Path=file1.FileName代码Ddir1的Change事件过程中加入dir1.Path=drive1.Drive，在file1的Click事件过程中加入file1.Path=dir1.Path代码5下面关于顺序文件的描述正确的是（A）。A每条记录的长度必须相同B可通过编程对文件中的某条记录方便地修改C数据只能以ASCII码形式存放在文件中，所以可通过文本编辑软件显示D文件的组织结构复杂6KILL语句在VB语言中的功能是（C）。A清内存 B.清病毒 C删除磁盘上的文件 D.清屏幕7可用来改变坐标度量单位的是（D）。ADrawstyle属性 B.DrawWidth属性CScale方法 D.ScaleMode属性8以下的属性和方法中，可重定义坐标系的是（C）。ADrawstyle属性 B.DrawWidth属性CScale方法 D.ScaleMode属性9当使用Line方法画直线后，当前坐标在（C）。A（0，0） B.直线起点 C.直线终点 D.容器的中心10Line(200,200)-Step(500,500)将在窗体（C）画一直线。A（200，200）到（500，500） B.（200，200）到（300，300）C（200，200）到（700，700） D.（300，300）到（500，500）11设置对象的边框类型的属性是（B）。ADrawstyle B.Borderstyle C.DraqWidth D.ScaleMode12为了清除图片框Picture1中的图形，应采取的正确方法是（B）。A选择图片框，然后按Del键B执行语句Picture1.Picture=LoadPicture(“”)C执行语句：Picture1.Picture=”D选择图片框，在属性窗口中选择Picture属性条，然后按回车键13要绘制多种形状的图形，需要设置Shape控件的（A）属性。AShape B.Borderstyle C.Fillstyle D.Style14要绘制多种样式的直线，需要设置Line控件的（B）属性。AShape B.Borderstyle C.Fillstyle D.Style15如果准备读文件，打开顺序文件“text.dat”的正确语句是（C）。Aopen “text.dat” For wirte As #1Bopen “text.dat” For Binary As #1Copen “text.dat” For Input As #1Dopen “text.dat” For Random As #116如果准备向随机文件中写入数据，正确的语句是（C）。APrint # 1 ,rec B.Write #1 ,recCPut #1 ,rec D.Get #1,rec17下列”CommonDialog1”控件程序代码，CommonDialog1.Action=1，代表（B）。A文件另存为 B.打开文件 C.色彩 D.打印18FileFiles.Pattern= “*.bat”程序代码执行后，会显示（A）。A只包含扩展文件名为“*.bat”的文件 B.第一个bat文件C包含所有的文件 D.会显示磁盘的路径19下列数据对象模型中采用OLEDB访问数据库的是（C）。ADAO B.RDO C.ADO D.RDO和ADO20设ADOrs为Recordset对象，从“学生基本情况表”中获取所有记录的语句是（B）。AADOrs.New “Select * From 学生基本情况表”BADOrs.Open “Select * From 学生基本情况表”CADOrs.Execute “Select * From 学生基本情况表”DADOrs.Select “Select * From 学生基本情况表”21VB中将变量xl声明为Excel应用程序对象的方法是