VisualBasic程序设计资料

1、Visual Basic程序设计（专科）形考（一）试卷总分： 100测试时间： 180单项选择题判断题一、单项选择题（共20道试题，共80分。）1.当运行程序时，系统自动启动窗体的事件过程是（）。LoadClickUnloadGotFocus单选按钮不具有的属性是 ( ) 。ValueCaptionTextTextFont3.为了使文本框同时具有水平和垂直滚动条，应先把再把 scrollbars属性设置为（）。multilin属性设置为true，然后0123列表框图标的英文名称是： ( ) 。ListBoxComboBoxFrameCommonDialog如果对象的名称为 Mytext ，而且

2、对象有一个属性 Text ，那么在代码中引用该属性的正确格式是（）。Text.MytextMytext.textMytext. （Text ）Mytext*Text6.下列不能打开属性窗口的操作是() 。执行“视图”菜单中的“属性窗口”命令按 F4键按 Ctrl+T单击工具栏上的“属性窗口”按钮7.程序运行过程中始终保持不变的是（）。数组表达式常量变量8.为了把窗体上的某个控件变为活动的，应执行的操作是（）。单击该控件的内部单击窗体的边框双击该控件双击窗体9.VB6.0 集成开发环境有三种工作状态，不属于三种工作状态之一的是（）。设计状态编写代码状态运行状态中断状态为了在按下 Esc 键时执行

3、某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为 true ，这个属性是（）。ValueDefaultCancelEnabled11.程序执行的顺序（）。由 VB开发系统决定由事件驱动由代码行的顺序决定随意执行12.在 VisualBasic 中，默认的数据类型是（）。IntegerDoubleCurrencyVariant13.VB 的应用程序中，决定程序流向的是（）。A.对象B.方法C.属性D.事件14.如果想让文本框中的内容在运行时不能编辑，需将文本框的（）属性设置为True 。A.LockedB.MultiLineTabStopVisible15.表达式 10+ 5 Mod 1

4、0 9 / 3的值等于（）。101215运算错误16.当窗体最小化时缩小为一个图标，设置这个图标的属性是（）。MouseiconIconPictureMousepointer17.DimIAsInteger ，则运行时变量I 的初始值是（）。01-1空值在 VB的集成环境中创建应用程序时，除了工具箱窗口、窗体设计器、属性窗口外，必不可少的窗口是（）。立即窗口代码窗口窗口布局窗口监视窗口19.确定一个控件在窗体上位置的属性是() 。A.Width 或 HeightB.Width 和 HeightTop 或 LeftTop 和 Left20.控件大小不能改变的是（）。标签框架文本框计时器二、判断题

5、（共5道试题，共20分。）VB 的代码存储在模块中。在 VB 中提供了三种类型的模块：窗体模块、控件模块和类模块。错误正确声明变量的数据类型有二种方法，显式声明和隐式声明。错误正确方法是对象调用的、用来完成特定操作的特殊子程序。错误正确通过 VB 编译生成的文件具有“ .exe ”文件扩展名，该文件只能在 VB 环境下执行。错误正确VB 变量名中允许出现空格。错误正确Visual Basic程序设计（专科）形考（二）试卷总分： 100测试时间： 120单项选择题判断题一、单项选择题（共20道试题，共80分。）1.x+y 小于 10 且 x+y 要大于 0 的逻辑表达式是（）。x+y0B.(x+

6、y0C.x+y00 x+y102.表达式 2*32+2*8/4+32的值是（）。643149423.a 能被 b 整除的逻辑表达式是（）。a/b=0ab=0aba mod b =04.可以进行打开文件、选择字体、选择颜色等操作的控件是（）。列表框文本框公共对话框组合框删除列表框中指定的项目所使用的方法为（）。MoveRemoveClearRemoveItem6.从一个字符串中的第3 个字符开始，获取5 个字符，应使用（）。A.Left函数Mid 函数Right 函数Len 函数7.实现字符的 unicode 编码方式与ANSI 编码方式相互转换的函数是（）。StrStrconvTrimMid8

7、.要利用通用对话框控件来显示“打开文件”对话框，需要调用控件的（）方法。ShowPrintShowOpenLoadShowColor9.对于定时器（ Timer ）控件，设计其定时是否开启的属性是（）。IndexTagEnabledLeft下列关于变量的说法不正确的是（）。A.局部变量是指那些在过程中用Dim 语句或 Static语句声明的变量局部变量的作用域仅限于声明它的过程静态局部变量是在过程中用 Static 语句声明的局部变量在声明它的过程执行完毕后就被释放了11.要清除列表框的所有内容，可用（）方法来实现。RemoveTtemClsClear以上均不可以12.字符串运算符是（）。No

8、t&Mod=13.DimAbc(2,3) 所定义的数组元素个数是（）。6512914.语句 Print123+456执行后，显示的结果是（）。12345657912378915.逻辑表达式Not53And95 的值为（）。TRUEFALSE表达式有错条件不足16.关于列表框（ ListBox ）不正确的阐述是（）。列表框显示项目列表。用户只可以从中选择一个项目。列表框可以选择多个列表项。如果项目数超过列表框可显示的数目，控件将自动出现滚动条。17.条件表达式的结果是一个（）数据。数值型字符型日期型逻辑型18.在一个语句行内写多条语句时，语句之间应该用（）分隔。逗号分号顿号冒号19.可获得字符的

9、ASCII 码的函数是（）。ValFixAscChr20.用 DimA（ -3To5） AsInteger语句所定义的数组的元素个数是（）。A. 6789控件和窗体的 Name属性只能通过属性窗口进行设置，不能在运行阶段通过程序设置或修改。错误正确4AB和 AB都可以作为 VB的变量名。错误正确在程序中使用语句： wb1.FontSize= 小五号 ，就可以使名为 wb1的文本框中显示的汉字呈小五号大小。错误正确全局变量在整个应用程序中有效，其作用域是整个应用程序运行期间。错误正确假定一个文本框的 Name属性为 Text1 ，为了在该文本框中显示“ Hello! ”，所使用的语句可写为： t

10、ext1=Hello!错误正确Visual Basic程序设计（专科）形考（三）试卷总分： 100测试时间： 180单项选择题判断题一、单项选择题（共20道试题，共80分。）1.如果希望以模态方式显示窗体Form1，下列正确的语句是（）。Form1.Show 0Form1.ShowForm1.Show 1以下都不正确2.COM对象有两种类型接口, 即用户自定义接口和（）。程序接口标准接口文件接口外部接口3.要发送数据，通常使用Winsock 控件的（）。SendData 方法Listen 方法Accept 方法GetData 方法4.利用 ADO访问数据库，首先要创建一个（）对象，用于建立和数

11、据库的连接。A.Connection 对象B.Recordset 对象Command对象Object 对象5.当使用 SendData 将数据发送到主机后时，将触发Winsock 控件的（）事件。SendProgressMouseDownClickKeyPress6.引用列表框的最后一项应使用（）。List1.List(ListCount-1)List1.List(List1.ListCount)List1.List(ListCount)List1.List(List1.ListCount-1)7.在“打开” 对话框中设置Files.Pattern=*.bat程序代码执行后， 会显示（）。A.

12、只包含扩展文件名为“*.bat ”的文件第一个 bat 文件包含所有文件会显示磁盘的路径8.SQL语言的 Select语句中，用于分组的语句为（）。wheregroup byorder byhaving9.在下列选项中，不能将图像装入图片框和图像框的是（）。A.在界面设计时，通过Picture属性装入在界面设计时，手工在图像框和图片框中绘制图形在界面设计时，利用剪贴板把图像粘贴上在程序运行期间，用 LoadPicture 函数把图形文件装入10.一旦数据到达 , 将首先触发Winsock 控件的（）。A.DataArrival事件B.ConnectionRequest事件DataSend 事件

13、DataGet 事件11.Line （ 100， 100） -Step （ 400，400）将在窗体中的（）画一条直线。（ 200， 200）到（ 400，400）（ 100， 100）到（ 300，300）（ 100， 100）到（ 500，500）（ 100， 100）到（ 400，400）为了在运行时把 d：pic 文件夹下的图形文件 a.jpg 装入图片框 Picture1 中，所使用的语句为（）。A. Picture1 Text=LoadPicture(d ： pica.jpg)B. Picture1 Picture=LoadPicture(d： pica.jpg)C. Pictur

14、e1 Picture=LoadPicture(d：pica.jpg)D. Picture1 Picture=Load(d ： pica.jpg)13.以下 4 个控件中，不属于数据绑定控件的是 () 。Text 控件OLE控件OptionButton 控件Image 控件14.要绘制多种式样的直线，需要设置Line 控件的（）属性。ShapeBordrestyleFillStyleStyle随机文件进行文件读写的单位是（）。字节记录整个文件字符16.KILL 语句在 VB语言中的功能是（）。清内存清病毒删除磁盘上的文件清屏幕17.除框架外，能对单选按钮分组的控件是（）。窗体标签图片框图像框18

15、.如下数组声明语句，正确的是（）。A. Dima3 ，4AsIntegerB. Dima(3 ，4)AsIntegerC. Dima(n ，n)AsIntegerD. Dima(34)AsInteger19.如果准备向随机文件中写入数据，常用的语句是（）。A. Print#1,recB. Write#1,recC.Put#1,recD.Get#1,rec20.下列关于PictureBox控件与Image 控件的说法不正确的是（）。A.PictureBox控件作为控件容器，因而比Image 控件占用系统资源多Image 控件能自动调整大小以适应载入的图片PictureBox 控件除具有 Imag

16、e 控件的所有特征外，还能作为容器PictureBox 控件能使图片自动调整大小以适应PictureBox 控件大小二、判断题（共5道试题，共20分。）1.在多文档应用中，每次只能有一个活动的子窗体可以进行输入/ 编辑。错误正确Private 表示此过程只可被本工程中的其它过程调用。错误正确在 VB中所谓文件是指存放在内存中的数据和程序等。错误正确列表框包含了组合框的功能。错误正确要将命令按钮 Command1设置为不可见，应修改该命令按钮的 Value 属性。错误正确Visual Basic程序设计（专科）形考（四）试卷总分： 100测试时间： 240应用题综合题一、应用题（共8道试题，共8

17、0分。）在程序中添加一个命令按钮，并编写如下程序代码：Private Sub Command1_Click()a = 1: b = 2: c = 3a = b: b = c: c = aPrint cEnd Sub程序运行后，写出单击命令按钮后的输出结果。参考答案：参考答案：2上传附件上传要求：以zip格式或 RAR格式压缩文档后上传。文件操作在窗体中添加一个命令按钮，然后编写如下程序：Private Sub Command1_Click()Static Sum As IntegerI=1While I 3 Thena = a + 5Elsea = a + 2End IfNext iPrint

18、 i, aEnd Sub单击命令按钮时，窗体中的输出值依次为多少？参考答案：参考答案：721上传附件上传要求：以zip格式或 RAR格式压缩文档后上传。文件操作在窗体中添加一个命令按钮和一个文本框，然后编写如下程序：Private Sub Command1_Click()Dim A(1 To 4) As StringDim c As IntegerDim j As IntegerA(1) = 5For j = 1 To 4A(j) = 5 * jc = 1c = c + Val(A(j)NextText1.Text = cEnd Sub单击命令按钮时，文本框中的值为多少？参考答案：参考答案：2

19、1上传附件上传要求：以zip格式或 RAR格式压缩文档后上传。文件操作在窗体中添加一个命令按钮，然后编写如下程序：Private Sub Command1_Click()Dim a As Integer, s As Integern = 8s = 0Dos = s + nn = n - 1Loop While n 0Print sEnd Sub单击命令按钮，窗体的输出结果是什么？参考答案：参考答案：36上传附件上传要求：以zip格式或 RAR格式压缩文档后上传。文件操作在窗体中添加一个命令按钮，然后编写如下程序：Sub Change(ByVal x As Integer, ByVal y As

20、 Integer)Dim t As Integert = xx = yy = tPrint x, yEnd SubPrivate Sub Command1_Click()Dim a As Integer, b As Integera = 3: b = 4Change a, bPrint a, bEnd Sub单击命令按钮时，窗体中的输出值依次为多少？参考答案：参考答案：4334上传附件上传要求：以zip格式或 RAR格式压缩文档后上传。文件操作在窗体中添加一个命令按钮和一个文本框，然后编写如下程序：Private Sub Command1_Click()Dim I As Integer, j As IntegerDim c As Integerc = 0For I = 1 To 3For j = 1 To 3c = c + 1Next jNext IText1.Text = cEnd Sub单击命令按钮，文本框中的值为多少？参考答案：参考答案：9上传附件上传要