vb二级基本操作题

国家二级VB机试（上机操作）模拟试卷400(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visua，Basic应用程序(包括界面和代码)。

(1)在名称为Form1标题为“选课”的窗体上画一个复选框数组，名称为CH1，共有四个复选框，按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”，其中“语文”、“计算机”复选框处于选中状态，运行时的窗体如图3—147所示。

请画控件并设置相应属性。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。

(2)在名称为Form1的窗体上画一个名称为HS1的水平滚动条，其刻度值范围为1～100；画一个命令按钮，名称为C1，标题为“移动滚动框”。

请编写适当的事件过程，使得在运行时，每单击命令按钮一次(假定单击次数少于10次)，滚动框向右移动10个刻度。

运行时的窗体如图3—148所示。

要求程序中不得使用变量，事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

正确答案：(1)【操作步骤】步骤1：新建一个“标准EXE”工程。

步骤2：在窗体Form1中加入一个复选框，并用“复制”和“粘贴”的方法，生成包含四个元素的复选框数组。

步骤3：分别设置窗体和复选框数组中各元素的相关属性。

步骤4：按要求将文件保存至考生文件夹中。

(2)【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置相应属性。

步骤2：在代码编辑窗口，编写命令按钮的Click事件过程。

参考代码：Private Sub C1_Click( )HS1．Value＝HS1．Value＋10End Sub 步骤3：按要求将文件保存至考生文件夹中。

简单应用题2．(1)在名称为Form1的窗体上画一个名称为Text1的文本框，再建立一个名称为Format的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为M1、M2、M3。

计算机二级VB考试练习题及答案计算机二级VB考试练习题及答案为了使广阔考生在备战计算机等级考试时，更快的把握相应学问点，下面是我搜寻整理的计算机二级VB考试练习题及答案，供参考练习，预祝考生们考出自己抱负的成果!计算机二级VB考试练习题及答案1、在窗体上建立一个名称为Command1的命令按钮，一个名称为Text1的文本框，以及四个单选按钮：第一个名称为option1用来设置文本框的字体为宋体，其次个名称为option2用来设置文本框的字体为黑体，第三个名称为option3用来设置文本框的字体大小为8号，第四个名称为option4用来设置文本框的字体大小为12号。

程序如下：(程序运行刚开头时，四个单选按钮都没有选中)Private Sub Command1_Click( )Text1.FontName = Iif(Option1.Value, 宋体, 黑体)Text1.FontSize = Iif(Option3.Value, 8, 12)End Sub当程序运行时，先单击单选按钮option2，然后单击命令按钮command1，则文本框text1的变化效果是(B) (单)A.字体设置为宋体B.字体设置为黑体C.字体大小设置为8号D.字体大小设置为12号2.在窗体上建立一个名称为Command1的命令按钮，一个名称为Text1的文本框，以及四个单选按钮：第一个名称为option1用来设置文本框的字体为宋体，其次个名称为option2用来设置文本框的字体为黑体，第三个名称为option3用来设置文本框的字体大小为8号，第四个名称为option4用来设置文本框的字体大小为12号。

程序如下：(程序运行刚开头时，四个单选按钮都没有选中)Private Sub Command1_Click( )Text1.FontName = Iif(Option1.Value, 宋体, 黑体)Text1.FontSize = Iif(Option3.Value, 8, 12)End Sub当程序运行时，先单击单选按钮option3，然后单击命令按钮command1，则文本框text1的变化效果是(C) (单)B.字体设置为黑体C.字体大小设置为8号D.字体大小设置为12号3.在窗体上建立一个名称为Command1的命令按钮，一个名称为Text1的文本框，以及四个单选按钮：第一个名称为option1用来设置文本框的字体为宋体，其次个名称为option2用来设置文本框的字体为黑体，第三个名称为option3用来设置文本框的字体大小为8号，第四个名称为option4用来设置文本框的字体大小为12号。

二级VB培训内容一、基本操作题【考试要求】掌握窗体和控件的属性、事件和方法以及控件的画法。

【考试操作要点】1.窗体（1）属性①Name：窗体的名称②Caption：窗体标题栏中显示的标题③BackColor：窗体的背景颜色④BorderStyle：窗体的边框风格⑤ControlBox：决定窗体是否具有控制菜单⑥MaxButton ：决定窗体右上角是否有最大化按钮⑦WindowState：决定窗体的正常、最大、小化状态（2）事件①Click事件：鼠标单击窗体时触发的事件②DblClick事件：鼠标单击窗体时触发的事件③Load事件：在窗体被装入内存时触发的事件（3）方法①Print方法：打印或显示信息②Cls方法：清除运行时在窗体中显示的内容注：（培训题库2，11，42，46，47,48,49,50套的题目中均有操作要求）2.标签（1）属性①Caption属性：标签中显示的内容②Name属性：标签的名称③Alignment属性：指定在标签上显示的信息的位置④BorderStyle属性：指定标签有无边框⑤AutoSize属性：指定标签是否能自动调整大小以显示所有内容⑥WordWrap属性：指定标签中文字是否能自动换行（2）事件①Click事件：鼠标单击标签时触发的事件②DblClick事件：鼠标单击标签时触发的事件注：（培训题库1，7,9,10,17,19,34,36,37,38,39,40,42,47,48,49套的题目中均有操作要求）（1）属性①Name属性：文本框控件的名称②Text属性：文本框中包含的文本内容③MaxLength属性：表示最大长度④Locked属性：决定文本框是否可以被编辑修改⑤PasswordChar属性：口令属性⑥MultiLine属性：多行属性⑦ScrollBars属性：滚动条属性⑧SelStart属性：决定选定文本的开始位置⑨SelLength属性：决定选定文本的长度⑩SelText属性：设定或存放由前两个属性选定的文本内容（2）事件①KeyPress事件：当用户按下并松开键盘上某个按键时触发该事件②Change事件：当文本的内容发生变化时触发该事件③GotFocus事件：当文本框得到焦点时触发该事件④LostFocus事件：当文本框失去焦点时触发该事件（3）方法①SetFocus方法：设置焦点，可使指定的文本框成为焦点，即将光标定位在当前文本框。

福建二级vb考试试题及答案福建二级VB考试试题及答案一、选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个选项是正确的字符串连接运算符？A. +B. ||C. &D. *答案：C2. 下列哪个函数用于获取当前日期？A. Date()B. Now()C. Time()D. Day()答案：A3. Visual Basic中，哪个关键字用于声明一个变量？A. DimB. FunctionC. SubD. Const答案：A4. 在Visual Basic中，以下哪个选项是正确的循环结构？A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D5. 在Visual Basic中，如何声明一个整型变量？A. Dim a As IntegerB. Integer aC. a = IntegerD. a Integer答案：A6. Visual Basic中，哪个控件用于显示文本，但用户不能编辑？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A7. 在Visual Basic中，哪个事件用于处理按钮点击？A. ClickB. DoubleClickC. MouseDownD. KeyPress答案：A8. Visual Basic中，哪个函数用于将字符串转换为数字？A. Str()B. Val()C. CStr()D. CDbl()答案：B9. 在Visual Basic中，哪个关键字用于结束当前过程？A. EndB. ExitC. ReturnD. Stop答案：A10. Visual Basic中，哪个控件允许用户从预定义的列表中选择一个或多个项目？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个数组。

国家二级计算机vb考试试题及答案一、单项选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个选项不是基本数据类型？A. IntegerB. StringC. ObjectD. Boolean答案：C2. 如果一个变量被声明为Dim x As Integer，那么x的值可以是以下哪个？A. 123B. "Hello"C. 3.14D. True答案：A3. 在Visual Basic中，哪个关键字用于声明过程？A. FunctionB. SubC. IfD. For答案：B4. 下列哪个选项不是Visual Basic的控件？A. TextBoxB. LabelC. ButtonD. List答案：D5. 在Visual Basic中，以下哪个选项可以用于循环结构？A. ForB. IfC. Select CaseD. With答案：A6. 在Visual Basic中，哪个函数用于计算一个数的绝对值？A. AbsB. RoundC. IntD. Sgn答案：A7. 在Visual Basic中，哪个属性用于设置文本框的只读属性？A. ReadOnlyB. BackColorC. ForeColorD. Enabled答案：A8. 在Visual Basic中，哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A9. 在Visual Basic中，哪个关键字用于创建数组？A. ArrayB. ListC. CollectionD. Dim答案：D10. 在Visual Basic中，哪个函数用于将字符串转换为数字？A. StrB. ValC. CStrD. Chr答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个全局变量。

答案：Public2. 如果一个变量的值需要在多个过程中共享，应该使用________关键字进行声明。

国家二级计算机vb考试试题及答案一、单项选择题（每题1分，共10分）1. 在VB中，用于定义变量的关键字是（）。

A. DimB. SubC. FunctionD. Const答案：A2. 下列哪个选项不是VB中的控制结构？（）A. 顺序结构B. 选择结构C. 循环结构D. 函数结构答案：D3. VB中，用于声明一个子程序的关键字是（）。

A. FunctionB. SubC. DimD. Const答案：B4. 在VB中，用于表示逻辑“与”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：A5. VB中，用于表示逻辑“或”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：B6. 在VB中，用于声明一个数组的关键字是（）。

A. DimB. SubC. FunctionD. Const答案：A7. VB中，用于声明一个常量的关键字是（）。

A. DimB. SubC. FunctionD. Const答案：D8. 在VB中，用于表示逻辑“非”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：C9. VB中，用于声明一个函数的关键字是（）。

A. FunctionB. SubC. DimD. Const答案：A10. 在VB中，用于表示逻辑“异或”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：D二、填空题（每题2分，共10分）1. 在VB中，使用____关键字可以定义一个全局变量。

答案：Public2. 当需要在VB中定义一个私有变量时，应使用____关键字。

答案：Private3. 在VB中，使用____关键字可以定义一个局部变量。

答案：Dim4. VB中，使用____关键字可以定义一个过程。

答案：Sub5. VB中，使用____关键字可以定义一个函数。

答案：Function三、简答题（每题5分，共20分）1. 请简述VB中事件驱动编程的概念。

计算机二级VB上机操作练习题及答案计算机二级VB上机操作练习题及答案Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，下面店铺为为大家带来计算机二级VB上机操作练习题及答案，希望大家喜欢！一、基本操作题(1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。

组合框中的文本内容为空，表项内容有“乒乓球”、“羽毛球”和“网球”3项。

运行后的窗体如图所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp，窗体文件名为sjtl.frm。

(2)在名称为Forml、标题为“转换”的窗体上，画1个名称为Shapel、边框宽度为3的形状。

再画两个标题分别为“椭圆”和“圆”的命令按钮。

如下图所示。

要求：编写适当的事件过程，使得单击“椭圆”按钮时，Shapel 的形状变换为椭圆;单击“圆”按钮时，Shapel的形状变换为圆。

程序中不得使用变量，每个事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjr2.vbp，窗体文件名为sjr2.frm。

二、简单应用题(1)考生文件夹中有工程文件sjt3.vbv。

窗体上显示有一个列表框和一个文本框，且列表框中已有若干列表项。

程序的功能是，程序运行时，当用户在列表框中单击并选中某个列表项时，该项的内容将显示到文本框中，用户可以在文本框中对相关内容进行编辑，按回车键后，能够用编辑好的内容替换被选中的列表项，并自动清空文本框;当双击某个列表项时，则从列表框中删除该列表项;当用户直接在文本框中键入文本并按回车键后，则把该文本添加为列表框的一个新列表项，添加完成后，将文本框清空。

运行窗体如图所示。

要求：程序已经给出，但不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。

注意：考生不得修改窗体文件中已经存在的控件和程序。

最后程序按原文件名存盘。

国家二级VB机试（上机操作）-试卷85(总分6, 做题时间90分钟)2. 基本操作题1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Forml、标题为“列表框练习”的窗体上画一个名称为Listl的列表框，表项内容依次输入XXX、ddd、mmm和aaa，且以宋体14号字显示表项内容，如图3-93．(a)所示。

最后设置相应属性，使运行后列表框中的表项按字母升序方式排列，如图3．93(b)所示。

注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjtl．frm，工程文件名为sjtl．vbp。

(2)在名称为Forml的窗体上，画一个名称为Labell的标签，其标题为“计算机等级考试”，字体为宋体，字号为12号，且能根据标题内容自动调整标签的大小。

再画两个名称分别为Commandl、Command2，标题分别为“缩小”和“还原”的命令按钮(如图3．94所示)。

要求：编写适当的事件过程，使得单击“缩小”按钮，Labell中所显示的标题内容自动减小两个字号；单击“还原”按钮，Labell所显示的标题内容的大小自动恢复到12号。

注意：存盘时，将文件保存至考生文件夹下，窗体文件名为sjt2．frm，工程文件名为sjt2．vbp。

要求程序中不得使用变量，每个事件过程中只能写一条语句。

SSS_TEXT_QUSTI分值: 2答案:正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表4．52在窗体中画出控件并设置其相关属性。

步骤2：按要求将文件保存至考生文件夹中。

第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表4．53在窗c本中画出控件并设置其相关属性。

步骤2：打开代码编辑窗口，编写两个命令按钮的Click事件过程。

参考代码： Private Sub Commandl Click() Labell．FontSiZe=Labell．FontSiZe一2 End Sub Private Sub Command2 C1ick() Labell．FontSize=12 End Sub 步骤3：按要求将文件保存至考生文件夹中。

浙江省二级vb考试试题及答案一、选择题（每题2分，共20分）1. VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. LongD. All of the above答案：D2. 在VB中，以下哪个函数用于计算数组中元素的和？A. SumB. CountC. MaxD. Min答案：A3. VB中，以下哪个关键字用于声明一个过程？A. FunctionB. SubC. PropertyD. Class答案：B4. 在VB中，以下哪个事件用于响应鼠标单击？A. ClickB. DoubleClickC. MouseDownD. MouseUp5. VB中，以下哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. ListBox答案：B6. 在VB中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Name答案：A7. VB中，以下哪个选项是正确的循环结构？A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D8. 在VB中，以下哪个函数用于将字符串转换为小写？A. UCaseB. LCaseC. StrCompD. Trim答案：B9. VB中，以下哪个关键字用于声明一个类？B. ModuleC. FunctionD. Sub答案：A10. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Name答案：A二、填空题（每题2分，共20分）1. VB中，声明一个整型变量的关键字是________。

答案：Integer2. 在VB中，使用________函数可以获取当前系统时间。

答案：Now3. VB中，________关键字用于声明一个全局变量。

答案：Public4. 在VB中，________事件用于响应文本框内容的改变。

国家二级VB机试（上机操作）-试卷62(总分6,考试时间90分钟)2. 基本操作题1. 在考生文件夹下，“samp1．accdb”数据库文件中已建立了3个关联表对象(名为“职工表”、“物品表”和“销售业绩表”)和一个窗体对象(名为“fTest”)。

请按以下要求，完成表和窗体的各种操作。

(1)分析表对象“销售业绩表”的字段构成、判断并设置其主键。

(2)将表对象“物品表”中的“生产厂家”字段重命名为“生产企业”。

(3)建立表对象“职工表”、“物品表”和“销售业绩表”的表间关系，并实施参照完整性。

(4)将考生文件夹下的Excel文件Test．xlsx中的数据链接到当前数据库中，要求数据中的第一行作为字段名，链接表对象命名为“tTest”。

(5)将窗体fTest中名为“bTitle”的控件设置为“特殊效果：阴影”显示。

(6)在窗体fTest中，以命令按钮“bt1”为基准，调整命令按钮“bt2”和“bt3”的大小和水平位置。

要求：按钮“bt2”和“bt3”的大小尺寸与按钮“bt1”相同，左边界与按钮“bt1”左对齐。

3. 简单应用题1. 在学生文件夹下有一个数据库文件“samp2．accdb”，里面已经设计好了两个表对象“tNorm”和“tStock”。

请按以下要求完成设计。

(1)创建一个查询，查找产品最高储备与最低储备相差最小的数量并输出，标题显示为“m_data”，所建查询命名为“qT1”。

(2)创建一个查询，查找库存数量在合理范围([最低储备，最高储备])的产品，并显爪“产品名称”和“库存数量”。

所建查询名为“qT2”。

(3)创建一个查询，按输入的产品代码杏找其产品库存信息，并显示“产品代码”、“产品名称”和“库存数量”。

当运行该查询时，应显示提示信息：“请输入产品代码：”。

所建查询名为“qT3”。

(4)创建一个交叉表查询，统计并显示每种产品不同规格的平均单价，显示时行标题为产品名称，列标题为规格，计算字段为单价，所建查询名为“qT4”。

国家二级VB机试（上机操作）模拟试卷593(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．在名称为Forml的窗体上添加一个名称为Commandl的命令按钮(如图1所示)，然后通过属性窗口设置窗体和命令按钮的属性，实现如下功能：①窗体标题为“设置按钮属性”；②命令按钮的标题为“等级考试”；③程序运行后，命令按钮不可见；④命令按钮的标题字号、字体用三号常规黑体显示。

程序的运行情况如图2所示。

要求：不编写任何代码。

注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1．vbp，窗体文件名保存为sjt1．frm。

正确答案：【操作步骤】步骤l：新建一个窗体，按照题目要求建立命令按钮控件并设置命令按钮和窗体的相应属性，如图4．23所示。

程序中用到的属性见表4．2l。

步骤2：调试并运行程序，关闭程序后按题目要求存盘。

解析：窗体对象和命令按钮控件的标题均由其Caption属性来设置，Visible 属性用于设置窗体或控件在运行时是否可见，设计时可通过修改命令按钮的Font 属性来设置标题的字体、字号和字型。

2．在名称为Forml的窗体上添加一个名称为Labell的标签，在属性窗口中把BorderStyle属性设置为1(如图l所示)，编写适当的事件过程。

使得程序在运行后，如果单击窗体，则可使标签移到窗体的右上角(只允许在程序中修改适当属性来实现)。

要求：不得使用任何变量。

注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sja．Frm正确答案：【操作步骤】步骤1：新建一个窗体，按照题目要求建立标签控件并设置标签的相应属性，见表4．22。

步骤2：打开代码编辑窗口，在指定位置编写如下代码。

参考答案PriVate Sub Forml_Slick( ) Labell．Top=0设置Labell的初始位置Label．Left=F0m1．Width-La-bell．Width End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。

国家二级VB机试（上机操作）模拟试卷440(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为：Form1的窗体上画一个标题为“直辖市”、名称为Framel 的框架，在框架中画一个名称为Combol的组合框，其编辑域为空，有如图所示的4个列表项，外观风格也与图中相同。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。

(2)在名称为Form1的窗体上画一个名称为Command1、标题为“0”的命令按钮；再画一个名称为Timerl 的计时器，请通过属性窗口设置适当的属性，并编写适当的事件过程，使得程序运行时，单击命令按钮后，该按钮标题上的数字每2秒在原有基础上加2。

要求程序中不得使用变量，每个事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sjt2．frm。

正确答案：(1)步骤1：新建一个窗体Form1。

步骤2：向窗体上添加一个Frame控件，并按照表4．13设置控件的属性。

步骤3：向Frame控件中添加一个ComboBox控件，按照表4．14设置控件的属性，设置完成后结果如图4．11所示。

步骤4：调试并运行程序，关闭程序后按题目要求存盘。

(2)步骤1：新建一个窗体Foiml。

步骤2：向窗体中添加一个命令按钮，按照表4．15设置控件的属性。

步骤3：向窗体中添加一个计时器控件，按钮表4．16设置控件的属性，设置完成后结果如图4．12所示。

步骤4：添加按钮的Click事件过程。

参考答案Private Sub Command1_Click( ) Timer1．Enaled=True End Sub 步骤5：添加计时器的Timer事件过程参考答案Private Sub Timerl_Timer( ) Command1．Caption=Val(Command1．Caption)+2 End Sub 步骤：6：调试并运行程序，关闭程序后按题目要求存盘。

国家二级VB机试（上机操作）模拟试卷157(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1的窗体上添加一个名称为Label1的标签，标签的宽和高分别为2000、300，有边框，并利用属性窗口设置适当的属性，使其标题“等级考试”居中显示，并使标签的外观如图所示。

注意：存盘时必须存放在考生文件夹下，上程文件名保存为sjtl．vbp，窗体文件名保存为sjt1．frm。

(2)在名称为Form1的窗体上添加一个名称为Image1的图像框，有边框，并可以自动涮整装入图片的大小以适应图像框的尺寸；再添加三个命令按钮，名称分别为Commahd1、Command2、Command3，标题分别为“红桃”、“黑桃”、“清除”。

在考生文件夹下有两个图标文件，其名称分别为“Misc34．ico”和“Misc37．ico”。

程序运行时，单击“黑桃”按钮，则在图像框中显示黑桃图案(Misc37．ieo文件)；单击“红桃”按钮，则在图像框中显示红桃图案(Misc34．ico文件，如图所示)；单击“清除”按钮则清除图像框中的图案，请编写相应控件的Click事件过程，实现上述功能。

注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。

存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。

正确答案：(1)【操作步骤】步骤1：新建一个窗体，按照题目要求建立标签控件并设置其属性，如图3．32所示。

程序中用件的控件及属性见表3．47。

步骤2：调试并运行程序，关闭程序后按题目要求存盘。

(2)【操作步骤】步骤1：建立界面，添加相应的控件并设置控件的属性。

程序中涉及的控件及属性见表3．48。

步骤2：打开代码编辑窗口，在指定位置编写如下代码。

参考答案Private Sub Command1_Click( ) Image1．Picture＝LoadPicture(App．path＆”＼MiSC 34．iCO”)’加载图片End Sub Private Sub Command2_Click( ) Imagel．Picture＝LoadPicture(App．path＆”＼Misc37．ico”) End Sub Private Sub Command3_Click( ) Set Image1．Picture＝Nothing’清除Imagel中的图片End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。

国家二级VB机试（上机操作）模拟试卷144(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1的窗体上添加一个名称为L1的标签，标签上标题为“请输入密码”，添加一个名称为Text1的文本框，其宽、高分别为2000和300，设置适当的属性，使得在输入密码时，文本框中品永为“*”字符，此外再把窗体的标题设置为“密码窗口”，以上这些设置都必须在属性窗口中进行，程序运行时的窗体如图所示。

注意：存盘时必须存放在考生文件火下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjt1．frm。

(2)在名称为Form1的窗体上添加一个名称为P1的图片框，请编写适当的事件过程，使得程序在运行时，每单击一次图片框，就在图片框中输出“单击图片框”，每单击图片框外的窗体一次，就在窗体中输出“单击窗体”，运行时的窗体如图所示。

要求在程序中不得使用变量，每个事什过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。

正确答案：(1)【操作步骤】步骤1：新建一个窗体，按照要求建立控件并设置其属性，如图3．11所示。

程序中用到的控件及属性如表3．7所示。

步骤2：调试并运行程序，效果如图3．12所示。

步骤3：关闭程序后按题目要求保存T程和窗体文件。

(2)【操作步骤】步骤1：新建一个窗体，按照题日要求建立控什并设置其属性，如图3．13所示。

步骤2：打开代码编辑窗口，存指定位置编写如下代码。

参考答案Private Sub Form_CliCk( ) Form1．Print”单击窗体”End Sub Private Sub P1_Click( ) P1．Print”单击图片框”End Sub 步骤3：凋试并运行程序，关闭程序后按题目要求存盘。

简单应用题2．(1)在考生文件央下有一个工程文件sit3．vbp，窗体中柯两个图片框，名称分别为P1、P2，其中的图片内容分别是-架航天飞机和一朵云彩，一个命令按钮，名称为C1，标题为“发射”，还有一个计时器，名称为Timer1。

全国计算机二级VB操作试题及答案全国计算机二级VB操作试题及答案现如今,我们最熟悉的就是试题了,试题是考核某种技能水平的标准。

什么样的试题才能有效帮助到我们呢?下面是店铺带来的.全国计算机二级VB操作试题及答案，希望对你有帮助。

一、选择题（每小题1分，共40小题，共40分。

）1数据库系统的三级模式不包括（）。

A.概念模式B.内模式C.外模式D.数据模式2下列描述中正确的是（）。

A.VisualBasic只能通过过程调用执行通用过程B.可以在Sub过程的代码中包含另一个Sub过程的代码C.可以像通用过程一样指定事件过程的名字D.Sub过程和Function过程都有返回值3下列数据结构中，能够按照“先进后出”原则存取数据的是（）。

A.循环队列B.栈C.队列D.二叉树4在窗体上面画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下代码：SubS(XAsInteger，yAsInteger)StaticzAsIntegery=x*x+Zz=yEndSubPrivateSubCommand1Click（）DimiAsInteger．zAsIntegerm=0z=0Fori=1T03Si，Zm=m+zNextiLabel1．Caption=Str(m)程序运行后，单击命令按钮，在标签中显示的内容是（）。

A.50B.20C.14D.75下列关于文件的叙述中，错误的是（）。

A.使用Append方式打开文件时，文件指针被定位于文件尾B.当以Input打开文件时，如果文件不存在，则自动建立一个新文件C.顺序文件的各个记录的长度可以不同D.随机文件打开后．既可以进行读操作，也可以进行写操作【全国计算机二级VB操作试题及答案】。

计算机二级VB考试题及答案计算机二级VB考试题及答案「篇一」1.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "m/d/yy")Print Format(MyDate,"yyyy年m月dd日")End SubA.7/21/97 1997年7月21日B.7-21-97 1997年7月21日C.97/7/21 1997年7月21日D.7/21/97 97年7月21日2.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyTime = #9:21:30 PM#MyDate = #7/21/1997#Print Tab(2); Format(MyDate, "mmmm-yy")Print Tab(2); Format(MyTime, "hh:mm:ss A/P")End SubA.July-97 9:21:30 PB.July-97 09:21:30 PC.07-97 9:21:30 PD.July-97 9:21:303.以下程序段运行的结果为(C)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "dddd,mmmm,dd,yyyy")End SubA.21,07,1997B.21,07,21,1997C.Monday,July,21,1997D.Monday,07,21,19974.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为(B)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示5.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入数字123456之后，单击命令按钮，结果为(A)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示6.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"Gong"，则程序运行结果为(A)(单)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示7.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <>4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"gong"，则程序运行结果为(B)(单)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示8.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"123"，显示"密码错误"对话框，关于此对话框描述正确的是(A)(单)A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是”按钮D.以上说法都不正确9.在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为command1的命令按钮，编写如下代码：Private Sub Command1_ClickDim x, y, z, t!x = Text1y = Text2z = Text3If x < y Thent = xx = yy = tEnd IfIf y < z Thent = yz = tIf x< y Thent = xx = yy = tEnd IfEnd IfLabel1.Caption = x & "," & y & "," & zEnd Sub当在文本框text1、text2 和 text3 中分别输入5、3和8，则标签显示的结果为(C)(单)A.3,5,8B.5,3,8C.8,5,3D.3.8.510.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入1，则label1的标题显示结果为(A)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.511.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入2，则label1的标题显示结果为(B)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.512.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的'整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入3，则label1的标题显示结果为(C)(单) A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.513.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数")) Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入4，则label1的标题显示结果为(D)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.514.以下程序段的作用是(A)(单)Private Sub Picture1_ClickDim asci As Integer, i As Integeri = 0For asci = 32 To 126Picture1.Print Tab(7 * i + 2); Chr(asci); "="; asci;i = i + 1If i = 7 Then i = 0: Picture1.PrintNext asciA.打印ASCII码表，一行7个表达式B.打印九九乘法表，一行7个表达式C.打印ASCII码表，一行8个表达式D.以上说法都不正确15.我国现在人口有13亿，按人口增长0.8%计算，多少年后我国人口将超过26亿。