2022年电大_Visual_Basic程序设计形成性考核册_参考答案.docx

精品学习资源Visual Basic程序设计形成性考核册作业及答案2021 年Visual Basic程序设计形成性考核册作业及答案作业 1一、挑选题1、在设计应用程序时，可以查看到应用程序工程全部组成部分的窗口是（D）；A 、窗体设计B 、代码C 、属性D 、工程资源治理器窗口2、窗体的 load 大事的触发时机是（B）；A、用户单击窗体时B 、窗体被加载时C 、窗体显示之后D 、窗体卸载时3、与传统的程序设计语言相比，Visual Basic最突出的特点是（C）；A 、结构化程序设计B 、程序开发环境C、大事驱动编程机制D 、程序调试技术4、VB6.0 集成开发环境的主窗口中不包括（C）； A 、标题栏B 、菜单栏C 、状态栏D 、工具栏5、假如对象的名称为Mytext , 而且对象有一个属性Text ，那么在代码中引用该属性的正确格式是（ B）；A 、 text.MytextB、Mytext.TextC、Mytext.Text D、Mytext*Text 6、以下可以激活属性窗口的操作是（D）；A 、用鼠标双击窗体的任何部位B 、执行 “工程 “菜单中的 ”属性窗口 “命令C 、按 Ctrl+F4D、按 F47、假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是（A）；A 、单击窗体上没有控件的地方B 、单击任一个控件C 、不执行任何操作D 、双击窗体的标题栏8、假如要在文本框键入字符时，只显示某个字符，假如（* ），应设置文本框的（B）属性；A 、CaptionB、PasswordCharC、TextD、Char9、假如想要在文本框中的内容在运行时不能编辑，需要文本框的（A）属性设置为 True. A LockedB、MultiLineC、 TabStop DVisible10 对于定时器（Tiner ）掌握，设置其定时是否开启的属性是（C）A、IndexB、TagC、Enabled D 、 Left11 、要在窗口体 Fornl 内显示 “ myfrm使”用的语句是（C）A、Form.caption=“ myfrm、 F”oBrnl.caption=“ myfrm ”C、forml.print“ myf、rmfor”mD.print“ myfrm ”12 、对象的性质和状态特点称为（C）A、大事B、方法C、属性D 、类13 、以下正确的赋值语句是（B）A、x+y=20B、y=x+20C、3x=yD、s=14 、当使用上下文相关的帮忙时，挑选要帮忙的内容，然后按（D）键，就可显现MSDN 窗口直接显示所需的帮忙信息；A 、HelpB 、F10C 、EseD 、F115 、将调试通过的工程经“文件 ”菜单的 “生成 .exe 文件 “编绎成名 .exe 后，将该可执行文件放到其它机器上不能运行的主要缘由是（D）；A、运行的机器上无VB 系统B 、缺少 .frm窗体文件C 、该执行文件有病毒D 、以上缘由都不对二、填空题1、当进入 VB 集成开发环境后，发觉没有显示“工具箱 ”窗口；应挑选 视图 菜单的工具箱 选项，使 “工具箱 ”窗口显示；2、在 VB 中，大事过程名由对象名 和 大事名 构成；3、工程文件的扩展名是vbp，窗体文件扩展名是frm；欢迎下载精品学习资源4、对象时代码和数据的集合，例如，Visual Basic中的窗体 、 按钮 、文本框等都是对象；5、对象的方法用于实施某种操作功能；当方法不需要任何参数并且也没有返回值，调用对象的方法的格式为对象名 .方法名；例如对窗体 Forml 使用 Show 方法，应写成 form1.show；6、要使文本框显示滚动条，需要将其ScrollBars属性设置为3；7、欲设置定时的时间间隔为4 秒，就属性 Interval的值为 4000；8、要使标签框的大小随Caption 属性做自动调整，应将AutoSize属性设置为True；9、通过 窗体布局窗口可以在设计时直观地调整窗体在屏幕的位置；10 、要想在代码中给名为txtshow的文框给予文本： GOOD WORK ！时，应当编写的语句是 txtshow.text=” GOOD WORK！ ” ；11 、如命令按钮的名称为Cmdopen ，程序要求单击以上命令按钮，打开一个窗口frml, 请对以下大事过程填空；Private Sub Cmdopenclick Frm1.showEnd Sud12 、大事就是对象上所发生的事情，Visual Basic 中的大事如 单击、 装入、 鼠标移动等；一个对象响应的大事可以有多 个，用户不能建立新的大事；大事过程是指 响应某个大事后所执行的代码；假设某一大事过程如下：Private Sub cmd1_ClickFo rm1.Caption=”示V例B ”End Sub就响应过程的对象名是cmd1，大事名是Click；13 、对象的方法用于在对象上实施某种操作功能；当方法不需要任何参数并且也没有返回 值，调用对象的方法格式为对象名 .方法名 ，例如，对窗体Form1 使用 Show 方法，应写成 Form1 .Show；14 、为了在编写代码时能自动语法检查，必需执行工具菜单中的选项 命令，打开选项 对话框，然后挑选 “编辑器 ”选项卡中的 自动语法检测 ；15 、定时器（ Timer ）控件可识别的大事是Timer，了生该大事的时间间隔定时由定时器的 Interval属性设置，其单位为毫秒 ；三、问答题1、什么是可视化编程和大事驱动？答：可视化编程是指无须编程，仅通过直观的操作方式即可完成界面的设计工作的这种编程方式；当 VB 的应用程序运行后，系统处于等待状态，当某个大事发生后，程序就去执行此大事的大事过程，当这个大事过程执行完后，系统又处于等待另一个大事发生的状态，这就是大事驱 动程序方式；2、对象、属性、大事和文件之间的关系如何？答：对象是代码和数据的封装体；对象的操作通过与该对象有关的属性、大事、方法来描述；属性是一个对象的基本特性，每个对象都有它自己的属性；方法是对象要执行的动作；大事是在对象上所发生的事情；3、简述大事驱动机制与传统编程方式的不同；答：传统的面对过程的应用程序中，应用程序自身掌握了执行那一部分代码按何种次序执行代码，程序从第一行代码开头执行并按应用程序中预定的路径执行，用户无法转变程序的执行流程；而大事驱动机制就由用户来打算执行的路线；这就是两者的不同；4、简述大事驱动的工作过程；答：大事驱动的工作过程如下：（1）启动应用程序，装载和显示窗体；（2）窗体或窗体上的控件等待大事的发生；（3）当某个大事发生后，执行其对应的大事过程代码；（4）重复执行（ 2）和（ 3），直到遇到 END 语句或单击 “终止 ”按钮停止程序的运行；四、程序设计题1、在窗体上添加一个文本框和两个命令按钮，并把两个命令按钮的标题分别设置为“隐匿文欢迎下载精品学习资源本框 ”和“显示文本框 ”；当单击第一个命令按钮时，文本框消逝；而当单击其次个命令按钮时，文本框重新显现，并在文本框中显示“VB程序设计 ”（字体大小为 16 ）；程序运行界面如下列图；图 1解： “隐匿文本框 ”按钮中的代码为： Text1.Visible=False“显示文本框 ”按钮中的代码为： Text1.Visible=TrueText1.Text=”程V序B设计 ”Text1.FontSize=” 16 ”2、设计一个运算程序；该程序用户界面如图2 所示，由四个文本框：文本框1（ text1 ）、文本框 2（ text2 ）、文本框3（ text3 ）、文本框 4（ text4 ），和三个按钮：命令按钮1（command1 ）、命令按钮 2（ command2 ）、命令按钮 3（ command3 ）组成；程序运行后，用户按清除按钮，就清除文本框中显示的内容，按运算按钮，就运算三科平均成果；单击退出按钮就退出；解： command1中的代码为： text1= ”： text2= ”： text3= ”： text4= ”command2中的代码为： text4=valText1+ valText2+ valText3/3 command2中的代码为： End3、编写一收款运算程序；要求用户输入商品的“单价 ”、 “数量 ”和“折扣 ”后，单击 “运算 ”按钮显示“应对款 ”，单击 “清除 ”按钮，清除文本框中全部的数据；程序运行界面如图3 所示；答： “运算 ”按钮的代码： text4=valText1* valText2* valText3/100“清除 ”按钮的代码： text1=”：”text2=”：”text3=”：”text4=”作业 2一、挑选题1. 依据变量的作用域可将变量划分为（B）；A、公有、私有、系统B、全局变量、模块级变量、过程变量C、动态、常数、静态D、Public 、Private 、Protected2. 可获得字符的 ASCII 码的函数是（C）；、 Val、 Fix、 Asc、 Chr3、要退出Do .Loop 循环，可使用的语句的（D）语句；A、ExitB、Exit ForC、End DoD 、Exit Do4. 把数值型转换为字符串型需要使用的函数是（B）；A、ValB 、StrC 、AscD 、Chr5. 关于语句行，以下说法正确选项（B）； 一行只能写一条语句一条语句可以分多行书写每行的首字符必需大写长度不能超过255 个字符表达式6+10 Mod 4*2+1的值是（A） 11CD.37. 以下可以作为 isual Basic变量名的是（ B） SINB.CO1C.COSX D.X-18. 表达式 bs- 5+Len“ ABCDE的”值为（ C） 5ABCDE . 5ABCDEC.10D.09. 在代码编辑器中，假如一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符（A），表示下一行是当前行的连续一个空格加一个下划字符（）一个下划字符（） 直接回车一个空格加一个字符（）10. Sub 过程与 Function过程最根本的区分是（D） Sub 过程可以使用 all 语句或直接使用过程名调用，而Function 过程不行以 Function过程可以有参数， Sub 过程不行以两种过程参数的传递方式不同 Sub 过程的过程名不能返回值，而Function 过程能够通过过程名返回值11. 是小于 80 的非负数，用VB 表达式表示正确选项（C） . A.0 X<80B.0<=X<80C.0<=x and x<80D.0<=x Orx<8012. 在设计菜单时 ,假如要在菜单中加入一个菜单分隔条,就菜单分隔条的标题必需设置为B 欢迎下载精品学习资源A.加号 +B.减号 -C.星号 *D.感叹号 .13. 假如要在程序中显示一个弹出式菜单,那么要调用 Visual Basic 中供应的方法是D. A.PrintB.MoveC.RefreshD.PopupMenu14. 以下可以用来储备图像供其他对象使用的控件是C .A. ToolBarB.StatursBarC.ImageListD.TreeView15. 当单击工具拦上的按扭时,会触发的大事是A . A.ButtonClickB.ChangeC.LoadD.KeyPress16. 要利用公用对话框控件来显示”打开文件 ”对话框 ,需要调用控件的B 方法 . A.ShowPrinterB.ShowOpenC.ShowSaveD.ShowColor17. 对于窗体级变量 ,以下说法中错误选项C .A.所在窗体的各子程序都可以拜访B.其他窗体的子程序不能拜访C.所在窗体发子程序不能拜访用Private 定义的窗体级变量D.肯定要在所在窗体的通用区内定义18. 从一个字符串中的第3 个字符开头 ,猎取 5 个字符 ,应使用 B A.Len 函数 B.Mid函数 C.Left函数D.Right函数19. 用下面的语句所定义的数组的元素的个数是D .DimA-3 To 5As IntegerA.6B.7C.8D.920. 有如下程序段 :Dim strl As String*5Strl=” Visual Basic”当该段程序被执行完时,变量 strl 的值为 B .欢迎下载精品学习资源A. ” Visual二、填空题B”. ” VisuaC”. ” V”D. ” VisualBasic”欢迎下载精品学习资源1. 菜单一般有 _下拉式 _和_弹出式 两种基本类型；2. 通用对话框控件可显示的常用对话框有打开 _、_储存 _ 、 颜色 _、 字体 _、 打印_；3. 组合框具有 文本框 _和 列表框 _两种控件的基本功能；欢迎下载精品学习资源4. 要使数组的默认下标从“1开头，就应在窗体或标准模块代码的声明部分使用语句Base 1_ ； Option欢迎下载精品学习资源5. 调用 Sub 过程时，使用 call语句 ,语句用于把程序掌握传送到一个Visual Basic 的 Sub过程；6. 如已建立了 Form1 和 Form2 两个窗体，默认启动窗体为Form1 ；通过 _工程 _菜单 属性 _命令的 _通用 _选项卡，可将启动窗体设置为Form2 ；在程序中如要显示Form1 窗体，就执行_Form1.show_语句；7. 列表框中工程的序号是从_0_ 开头的；8. Sub 过程与 Function过程最根本的区分是_Sub 过程名无返回值， Function过程名有返回值 ；9. VB 的代码储备在模块中；在VB 中供应了三种类型的模块：_类模块 _、_窗体模块 和_标准模块 _；10. 使用 Hide 方法会隐匿被调用的窗体，但是在调用Hide 方法之后不会把窗体卸载 _，被调用的窗体中的属性等已处于_内存中 _；11. 将以下数学式子写成VisualBasic 表达式； 答： 2*cosa*sina/2*a答： sqrs*s-a*s-b*s-c sin45° :sin45*2*3.1415/360_12. 将以下数学式子各条件写成VisualBasic 规律表达式； 1 x<12: 1<=x and x<12 A+BC或 a- c c: A+B>=C OR a-c<=c a 和 b 都为正整数或同为负数: a>=0 and b>=0 or a<=0 and b<=013. 设 A=2 ， B=3 ， C=4 ， D=5 ；表达式 Not A<=C Or4*B2 And B< >A+C的值为_False_ ；欢迎下载精品学习资源14. 在 Visual Basic 语言中有三种形式的循环结构；其中，如循环的次数可以事先确定，可使用_Fornext循环；如要求先判定循环进行的条件，可使用_Do while loop_ 循环或 _while Wend循_ 环；欢迎下载精品学习资源15. 以下语句的输出结果是 a%=3.14159Print a% 3_ ；欢迎下载精品学习资源三、阅读以下程序，写出程序运行结果；1、Private Sub Form_Click Static Sum As Integer For I= 1 to 100 Sum=Sum+INext I Print Sum End Sub程序运行结果为： 1+2+ .+99+100=50502、private Sub Form_Click A=10: b=15:c=20:d=25Print A ；Spc5 ；b ；Spc7 ；cPrint A ；Spc8 ；b ；Space$5 ；c Print c ；Spc3 ；” +；”Spc3 ；c+d End Sub105 个空格 157 个空格 20108 个空格 155 个空格 2020 三个空格 + 三个空格 45 3、Private Sub Form_click For i% =1 to3Forj% = 1 to iPrint L TrimStri%+“ * ” +L TrimStrj%+ Next j%Print Next i% End Sub 1*1= 12*1= 2 2*2= 43*1= 3 3*2= 6 3*3= 94、Private Sub Command1_Click Dim a,b As IntegerA=3.4 B=3.4Text1.Text=aText2.Text=b End SubText1 显示 3 、4Text2 显示 35、Private Sub Form_Click For I =1 to 5Print Tab 11I For J =1 To I * 21Print“； * ”；i% * “j% =”；欢迎下载精品学习资源Next Next iEnd Sub*欢迎下载精品学习资源*四、程序设计题1、购物优惠程序；某商场为了加速促成商品流通，采纳购物打折的优惠方法，每位顾客一次购物（ 1）在 100 元以上者，按九五折优惠；（2）在 200 元以上者，按九折优惠；（3） 300元以上者，按八折优惠；（4） 500 元以上者按七折优惠；在窗体上添加两个文本框和一个命令按钮，要求在Text1 中输入购物商品总金额，单击命令按钮，在Text2 中输入优惠后的价格；程序运行结果如图解所示；If Valtext1>=500 then text2=Valtext1*0.7Else if Valtext1>=300 then text2=Valtext1*0.85 Else if Valtext1>=200 then text2=valtext1*0.9 Else if valtext1>=100 then text2=valtext1*0.95 End if2、输出 100200之间不能被3 整除的的数，要求用Do 语句的一种形式来实现，程序运行结果如图 5 所示；窗体的装入大事中加入如下代码：Dim a as integer A=100Do while a <=200If a mod 3<> 0 then List1.additen stra End ifA=a+1loop3、编写程序，打印如下的乘积表： Dim I ,j as integerPrint” * ” :space5:For i=3 to 12 step 3Print stri；space5 ；Next i PrintFor I = 15 to18Print stri；space3 ；For j=3 to 12 step3Print stri*j；space4 ；Next j Print Next j4、设计一个运算程序；该程序用户界面如图7 所示；要求程序运行后，用户选中单击选按钮，就程序作 10 和 2 的相应运算，并把运算结果在文本框中显示出来；如用户选中加法单项按钮，就程序作10 和 2 的相加，运算结果12 在文本框中显示出来；按终止，就退出；乘法单项按钮的单击大事中添加如下代码：Text1=10*2除法单项按钮中添加如下代码：Text1=10/2加法单项按钮中添加如下代码：Text1=10+2减法单项按钮中添加如下代码：text1=10-2终止按钮中代码: end或 unload me5、编写输入一个 06数字，显示汉字对比输出星期的Function过程；程序运行结果如图8欢迎下载精品学习资源所示；文本框的 change 大事中代码如下 :Select case valtext1 Case 0Label1.caption=星期”天” +chr13+” Sunday”Case 1Label1.caption=星期”一” +chr13+” monday”Case2Label1.caption=星期”二” +chr13+” Tuesday”Case 3Label1.caption=星期”三” +chr13+” wednesday”Case 4Label1.caption=星期”四” +chr13+” thursday”Case 5Label1.caption=星期”五” +chr13+” firday”Case 6Label1.caption=End select星期”六” +chr13+” saturday”6、编写一个程序，当鼠标移到Picturel 控件时，鼠标指针转变外形；当在Picturel控件上单欢迎下载精品学习资源击鼠标右键时，通过消息框显示“You pressed right button Picture1_mouseupIf button=2 then I=1Msgbox ” you pressed right button”End if End sub，”并再次转变鼠标指针的外形；欢迎下载精品学习资源7、列表框应用程序；要求从文本框中输入姓名，然后按“添加 ”按钮，把姓名添加到列表框中；当挑选列表框中某一项时，按“删除 ”按钮，从列表框中删除；当列表框中某一项时，按“修改 ”按钮，把列表框中选取的项送往文本框且“修改 ”按钮变为 “修改确认 ”；在文本框的内容修改好后，按 “修改确认 ”按钮，再把文本框中修改后的信息送到列表框且“修改确认 ”按钮变为“修改 ”；程序运行结果如图9 所示；添加按钮代码：list1.additem text1.textText1.text=”删除: if list1.text<>” then List1.removeitem =list1.listindex End if修改:欢迎下载精品学习资源If command3.caption= Text1.text=list1.text Command3.caption= ElseIfcommand3.caption=修改“ ” then修”改确认 ”修”改确认 ” then欢迎下载精品学习资源List1.list=list1.listindex>=text1.text欢迎下载精品学习资源Command3.caption= End ifEnd if作业 3一、挑选题修”改 ”欢迎下载精品学习资源1、Visible 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=Drive1.DriveC. 在 Dir1_Click大事中加入 Drive1.Path= Dir1.Drive D在 Dir1_Click大事中加入 Drive1.Path= Dir1.Drive4、为了使 drive1 驱动器列表框、 dir1 目录路径列表框和file1 文件列表框能同步和谐工作，需要在（ B）A. drive1 的 Change 大事过程中加入drive1.Drive=dir1.Path，在 dir1 的 Change 大事过程中加入 dir1.Path=file1.Path代码；B. drive1 的 Change 大事过程中加入dir1.Path = drive1.Drive，在 dir1 的 Change 大事过程中加入 file1.Path =dir1.Path代码；C. dir1 的 Change 大事过程中加入dir1.Path = drive1.Drive，在 file1 的 Click 大事过程中加入 file1.Path =file1.fileName代码；D. dir1 的 Change 大事过程中加入dir1.Path = drive1.Drive，在 file1 的 Click 大事过程中加入 file1.Path =dir1.Path代码；5、下面关于次序文件的描述正确选项（A）A. 每条记录的长度必需相同B. 可通过编程对文件中的某条记录便利地修改C. 数据只能以 ASCII 码形式存放在文件中，所以可通过文本编辑软件显示D. 文件的组织结构复杂6、KILL 语句在 VB 语言中的功能是（ C）；A清内存B ；清病毒C ；删除磁盘上的文件D ；清屏幕7、可用来转变坐标度量单位的是（D）A. Drawstyle属性B. DrawWidth属性C. Scale方法 D. ScaleMode属性8、以下的属性和方法中，可重定义坐标系的是（C）ADrawstyle属性 B.DrawWidth属性C. ScaleD. ScaleMode属性9、当用 Line 方法画直线后，当前坐标在（C） A.0,0B.直线起点C. 直线终点D.容器的中心10 、Line 200, 200-Step 500, 500将在窗体（ C）画始终线；A（ 200, 200 ）到 500, 500B.（ 200, 200 ）到 300, 300C. （ 200, 200 ）到 700, 700D.（ 300, 300 ）到 500, 50011 、设置对象的边框类型的属性是（B）；A. DrawstyleB. BorderstyleC. DrawWidthD. ScaleMode12 、为了清除图片框Picture1 中的图形，应实行的正确方法是（B）A. 挑选图片框，然后按Del 键B. 执行语句 Picture1.picture=LoadPicture“”C. 执行语句 Picture1.picture=“” D挑选图片框，在属性窗口中挑选Picture 属性条，然后按回车键13 、绘制多种外形的图形，需要设置Shape 控件的（ A）属性；A ShapeB.BorderstyleC. FillStyle D. Style14 、绘制多种外形的直线，需要设置Line 控件的（ B）属性；A ShapeB.BorderstyleC. FillStyle D. Style15 、假如预备读文件，打开次序文件“ text.dat 的正确”语句是（ C）A.open“ text.dat”for write As #1B.open“ text.dat”for BAisna#r1yC.open“ text.dat”forAInsp#u1tD.open“ text.dat”for RaAnsdo#m116 、假如预备向随机文件中写入数据，正确的语句是（C）A. Print #1, recB. Write #1, rec C. Put #1, recD. Get #1, rec17 、以下 “ CommandDialog1 控件”程序代码，CommandDialog1.Action=1，代表（ B）A文件另存为B.打开文件 C. 颜色 D.打印欢迎下载精品学习资源18 、FileFilter.Pattern=程”序*.代ba码t执”行后，会显示（A）；欢迎下载精品学习资源A 只包含扩展文件名为” *.bat的文”件B ； 第一个 bat 文件C 包含全部的文件D ； 会显示磁盘的路径欢迎下载精品学习资源19 、以下数据对象模型中采纳OLE DB 拜访数据库的是（ C）；A DAOB. RDOC. ADOD. RDO和 ADO20. 设 ADOrs 为 Recordset对象，从“同学基本情形表”中猎取全部记录的语句是（B）A. ADOrs.New“ Select * From 同学基本情形表 ”B. ADOrs.Open“ Select * From同学基本情形表”C. ADOrs.Execute“ Select * Fro学m生基本情形表 ”D. ADOrs. Select“ Select * F学ro生m基本情形表 ”21 、VB 中将变量 xl 声明为 Excel 应用程序对象的方法是（A）A Dim xl As Excel.Application B. Dim xl As Excel.WorkbookC. Dim xl As Excel.WorksheetD. Dim xl As Excel.Worksheets二、填空题1、假如要新建一个次序文件，用Open 语句时，操作方式关键词是output；2. 在 Visual Basic程序中实现复制文件“C： ”到 D: 盘根目录下的语句为 filecopy“c:”, ”d:”；3. 在 Visual Basic 程序中实现删除文件” Dt:em.tmp”的语句为 kill”temd.:tmp”；4. 按文件号为 1 打开次序文件 SEQNEW.DAT, 用于写入数据 ,语句为 open ”SEQNEW.D”ATfor output as# 1；5. 按文件号为 2 打开次序文件 SEQOLD.DAT, 用于从该文件读出数据,语句为 open” SEQOLD.DAT ” for input as #；26. 如窗体的左上角坐标为-200,250,右下角坐标为 300,-150,就 X 轴的正向向 右 ， Y 轴的正向向 上_；7. Stretch属性设置为 _false_ 时,图像框可自动转变大小以适应其中的图形.8. 在图片框 Picture1 中画一个左上角在 500,500,边长为 500 的红色实心正方形的语句为_picture1.line 500,500-step500,500, vbred , BF；9. 设 CurrentX=50,CurrentY=100,执行指令 ” line100,20- Step300,500” 后,Current=_400,520_.10. 使用 ADO 模型时 ,可通过 _ActiveConnect_属性建立 Recordset和 Connection对象的连接 . 11.VB 中将数据库分为本地数据库、远程数据库和 外部数据库 _三种类型 .欢迎下载精品学习资源12. 采纳 ADO 模型时 ,当使用 Open 方法打开一个记录集后, 与 ADOrs.Fields是_ADOrs“符号 ”_.学号“”等效的语句欢迎下载精品学习资源13. ADO 模型中一般可通过Connection对象的 Execute 方法执行 增加 _、 删除 _ 、 修改 等三类不返回结果集的SQL 语句.14. 设 StrSQL 、Str1 为字符串变量 ,其中 Str1 的值为 ” 001 那”么,执行赋值语句StrSQL=” Select * from Tabel1 Where学号 =” +Str1+后”,StrS”QL 的值等于 _” select. * from tabel1 where学号= 001 ” _.15. 在 VB 中, 将 Foxpro 称为外部数据库,Access 称为 本地数据库 _ ， SQL Server 称为 远程数据库 .三、程序设计题1、在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框；要求程序运行后，驱动器列表框 Drive1 的默认驱动器设置为C 盘，挑选 File1 中所列的确图片文件（*.Bmp和*.jpg ），就相应的图片显示在图片框Picture1 中；程序运行结果如图