Visual Basic程序设计

1、Visual Basic程序设计（专科）形考（一）试卷总分：100 测试时间：180单项选择题判断题一、单项选择题（共20道试题，共80分。）1.当运行程序时，系统自动启动窗体的事件过程是（ ）。 A. LoadB. ClickC. UnloadD. GotFocus2.单选按钮不具有的属性是()。 A. ValueB. CaptionTextC. TextD. Font3.为了使文本框同时具有水平和垂直滚动条，应先把multilin属性设置为true，然后再把scrollbars属性设置为（ ）。 A. 0B. 1C. 2D. 34.列表框图标的英文名称是：( )。 A. ListBoxB.

2、 ComboBoxC. FrameD. CommonDialog5.如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（ ）。 A. Text.MytextB. Mytext.textC. Mytext.（Text）D. Mytext*Text6.下列不能打开属性窗口的操作是( )。 A. 执行“视图”菜单中的“属性窗口”命令B. 按F4键C. 按Ctrl+TD. 单击工具栏上的“属性窗口”按钮7.程序运行过程中始终保持不变的是（ ）。 A. 数组B. 表达式C. 常量D. 变量8.为了把窗体上的某个控件变为活动的，应执行的操作是（ ）。 A. 单击该

3、控件的内部B. 单击窗体的边框C. 双击该控件D. 双击窗体9.VB6.0集成开发环境有三种工作状态，不属于三种工作状态之一的是（ ）。 A. 设计状态B. 编写代码状态C. 运行状态D. 中断状态10.为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为true，这个属性是（ ）。 A. ValueB. DefaultC. CancelD. Enabled11.程序执行的顺序（ ）。 A. 由VB开发系统决定B. 由事件驱动C. 由代码行的顺序决定D. 随意执行12.在VisualBasic中，默认的数据类型是（ ）。 A. IntegerB. DoubleC.

4、CurrencyD. Variant13.VB的应用程序中，决定程序流向的是（ ）。 A. 对象B. 方法C. 属性D. 事件14.如果想让文本框中的内容在运行时不能编辑，需将文本框的（ ）属性设置为True。 A. LockedB. MultiLineC. TabStopD. Visible15.表达式 10+ 5 Mod 10 9 / 3 的值等于（ ）。 A. 10B. 12C. 15D. 运算错误16.当窗体最小化时缩小为一个图标，设置这个图标的属性是（ ）。 A. MouseiconB. IconC. PictureD. Mousepointer17.DimIAsInteger，则运

5、行时变量I的初始值是（ ）。 A. 0B. 1C. -1D. 空值18.在VB的集成环境中创建应用程序时，除了工具箱窗口、窗体设计器、属性窗口外，必不可少的窗口是（ ）。 A. 立即窗口B. 代码窗口C. 窗口布局窗口D. 监视窗口19.确定一个控件在窗体上位置的属性是( )。 A. Width或HeightB. Width和HeightC. Top或LeftD. Top和Left20.控件大小不能改变的是（ ）。 A. 标签B. 框架C. 文本框D. 计时器二、判断题（共5道试题，共20分。）1.VB的代码存储在模块中。在VB中提供了三种类型的模块：窗体模块、控件模块和类模块。 A. 错误B

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

7、8/4+32的值是（ ）。 A. 64B. 31C. 49D. 423.a能被b整除的逻辑表达式是（ ）。 A. a/b=0B. ab=0C. abD. amodb=04.可以进行打开文件、选择字体、选择颜色等操作的控件是（ ）。 A. 列表框B. 文本框C. 公共对话框D. 组合框5.删除列表框中指定的项目所使用的方法为（ ）。 A. MoveB. RemoveC. ClearD. RemoveItem6.从一个字符串中的第3个字符开始，获取5个字符，应使用（ ）。 A. Left函数B. Mid函数C. Right函数D. Len函数7.实现字符的unicode编码方式与ANSI编码方式相

8、互转换的函数是（ ）。 A. StrB. StrconvC. TrimD. Mid8.要利用通用对话框控件来显示“打开文件”对话框，需要调用控件的（ ）方法。 A. ShowPrintB. ShowOpenC. LoadD. ShowColor9.对于定时器（Timer）控件，设计其定时是否开启的属性是（ ）。 A. IndexB. TagC. EnabledD. Left10.下列关于变量的说法不正确的是（ ）。 A. 局部变量是指那些在过程中用Dim语句或Static语句声明的变量B. 局部变量的作用域仅限于声明它的过程C. 静态局部变量是在过程中用Static语句声明的D. 局部变量在声

9、明它的过程执行完毕后就被释放了11.要清除列表框的所有内容，可用（ ）方法来实现。 A. RemoveTtemB. ClsC. ClearD. 以上均不可以12.字符串运算符是（ ）。 A. NotB. &C. ModD. =13.DimAbc(2,3)所定义的数组元素个数是（ ）。 A. 6B. 5C. 12D. 914.语句Print123+456执行后，显示的结果是（ ）。 A. 123456B. 579C. 123D. 78915.逻辑表达式Not53And95的值为（ ）。 A. TRUEB. FALSEC. 表达式有错D. 条件不足16.关于列表框（ListBox）不正确的阐述是（

10、 ）。 A. 列表框显示项目列表。B. 用户只可以从中选择一个项目。C. 列表框可以选择多个列表项。D. 如果项目数超过列表框可显示的数目，控件将自动出现滚动条。17.条件表达式的结果是一个（ ）数据。 A. 数值型B. 字符型C. 日期型D. 逻辑型18.在一个语句行内写多条语句时，语句之间应该用（ ）分隔。 A. 逗号B. 分号C. 顿号D. 冒号19.可获得字符的ASCII码的函数是（ ）。 A. ValB. FixC. AscD. Chr20.用DimA（-3To5）AsInteger语句所定义的数组的元素个数是（ ）。 A. 6B. 7C. 8D. 91.控件和窗体的Name属性只能

11、通过属性窗口进行设置，不能在运行阶段通过程序设置或修改。 A. 错误B. 正确2.4AB和AB都可以作为VB的变量名。 A. 错误B. 正确3.在程序中使用语句：wb1.FontSize=小五号，就可以使名为wb1的文本框中显示的汉字呈小五号大小。 A. 错误B. 正确4.全局变量在整个应用程序中有效，其作用域是整个应用程序运行期间。 A. 错误B. 正确5.假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello!”，所使用的语句可写为： text1=Hello! A. 错误B. 正确Visual Basic程序设计（专科）形考（三）试卷总分：100 测试时间：180单项选

12、择题判断题一、单项选择题（共20道试题，共80分。）1.如果希望以模态方式显示窗体Form1，下列正确的语句是（ ）。 A. Form1.Show 0B. Form1.ShowC. Form1.Show 1D. 以下都不正确2.COM对象有两种类型接口,即用户自定义接口和（ ）。 A. 程序接口B. 标准接口C. 文件接口D. 外部接口3.要发送数据，通常使用Winsock控件的（ ）。 A. SendData方法B. Listen方法C. Accept方法D. GetData方法4.利用ADO访问数据库，首先要创建一个（ ）对象，用于建立和数据库的连接。 A. Connection对象B.

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

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

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

16、oadPicture(d：pica.jpg)C. Picture1Picture=LoadPicture(d：pica.jpg)D. Picture1Picture=Load(d：pica.jpg)13.以下4个控件中，不属于数据绑定控件的是()。 A. Text控件B. OLE控件C. OptionButton控件D. Image控件14.要绘制多种式样的直线，需要设置Line控件的（ ）属性。 A. ShapeB. BordrestyleC. FillStyleD. Style15.随机文件进行文件读写的单位是（ ）。 A. 字节B. 记录C. 整个文件D. 字符16.KILL语句在VB语

17、言中的功能是（ ）。 A. 清内存B. 清病毒C. 删除磁盘上的文件D. 清屏幕17.除框架外，能对单选按钮分组的控件是（）。 A. 窗体B. 标签C. 图片框D. 图像框18.如下数组声明语句，正确的是（ ）。 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控件的说法不

18、正确的是（ ）。 A. PictureBox控件作为控件容器，因而比Image控件占用系统资源多B. Image控件能自动调整大小以适应载入的图片C. PictureBox控件除具有Image控件的所有特征外，还能作为容器D. PictureBox控件能使图片自动调整大小以适应PictureBox控件大小二、判断题（共5道试题，共20分。）1.在多文档应用中，每次只能有一个活动的子窗体可以进行输入/编辑。 A. 错误B. 正确2.Private表示此过程只可被本工程中的其它过程调用。 A. 错误B. 正确3.在VB中所谓文件是指存放在内存中的数据和程序等。 A. 错误B. 正确4.列表框包含了

19、组合框的功能。 A. 错误B. 正确5.要将命令按钮 Command1设置为不可见，应修改该命令按钮的Value属性。 A. 错误B. 正确Visual Basic程序设计（专科）形考（四）试卷总分：100 测试时间：240应用题综合题一、应用题（共8道试题，共80分。）1.在程序中添加一个命令按钮，并编写如下程序代码： Private Sub Command1_Click() a = 1: b = 2: c = 3 a = b: b = c: c = a Print cEnd Sub程序运行后，写出单击命令按钮后的输出结果。参考答案：参考答案：2上传附件上传要求：以zip格式或RAR格式压缩

20、文档后上传。 文件操作2.在窗体中添加一个命令按钮，然后编写如下程序： Private Sub Command1_Click()Static Sum As IntegerI=1While I 3 Thena = a + 5 Else a = a + 2 End If Next iPrint i, a End Sub单击命令按钮时，窗体中的输出值依次为多少？参考答案：参考答案：7 21上传附件上传要求：以zip格式或RAR格式压缩文档后上传。 文件操作4.在窗体中添加一个命令按钮和一个文本框，然后编写如下程序： Private Sub Command1_Click()Dim A(1 To 4)

21、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单击命令按钮时，文本框中的值为多少？参考答案：参考答案：21上传附件上传要求：以zip格式或RAR格式压缩文档后上传。 文件操作5.在窗体中添加一个命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer, s As Integer n = 8 s = 0 Do s = s + n n = n

22、 - 1 Loop While n 0 Print sEnd Sub单击命令按钮，窗体的输出结果是什么？参考答案：参考答案：36上传附件上传要求：以zip格式或RAR格式压缩文档后上传。 文件操作6.在窗体中添加一个命令按钮，然后编写如下程序： Sub Change(ByVal x As Integer, ByVal y As Integer) Dim t As Integer t = x x = y y = t Print x, yEnd SubPrivate Sub Command1_Click() Dim a As Integer, b As Integer a = 3: b = 4Change a, b Print a, bEnd Sub单击命令按钮时，窗体中的输出值依次为多少？参考答案：参考答案：4 33 4上传附件上传要求：以zip格式或RAR格式压缩文档后上传。 文件操作7.在窗体中添加一个命令按钮和一个文本框，然后编写如下程序： Private Sub Command1_Click() Dim I As Integer, j As Integer Dim c As Integer c = 0 For I = 1 To 3 For j = 1 To 3 c