vb界面设计 练习题(含答案)

vb界面设计  练习题(含答案)
vb界面设计  练习题(含答案)

1.在用菜单编辑器设计菜单时,必须输入的项有________。

A)标题B)快捷键C)索引D)名称

2.在下列关于菜单的说法中,错误的是________。

A)每个菜单项与其他控件一样也有自己的属性和事件

B)除了Click事件之外,菜单项还能响应其他如DblClick等事件

C)菜单项的快捷键不能任意设置

D)程序运行时,若菜单项的Enabled属性为False,则该菜单项变成灰色

3.在下列关于对话框的叙述中,错误的是________。

A)CommanDialog1.ShowFont 显示字体对话框

B)在打开对话框中,用户选择的文件名可以经FileTile属性返回

C)在打开对话框中,用户选择的文件名及路径可以经FileName属性返回

D)通用对话框中可以制作和显示帮助对话框

4.菜单的热键指使用Alt键和菜单标题中的一个字符来打开菜单,建立热键的方法是在菜单标题的某个字符前加上一个________字符。

A)% B)$ C)& D)#

5.要将通用对话框CommanDialog1设置成不同的对话框,应通过________属性来设置。A)Name B)Action C)Tag D)Left

6.关于多重窗体的叙述中,正确的是________。

A)作为启动对象的Main子过程只能放在窗体模块内

B)如果启动对象是Main子过程,则程序启动时不加载任何窗体,以后由该过程根据不同情况决定是否加载哪一个窗体

C)没有启动窗体,程序不能运行

D)以上都不对

7.在VB中,除了可以指定某个窗体作为启动对象外,还可以指定________作为启动对象。A)事件B)Main 子过程C)对象D)菜单

8.以下语句正确的是________。

A)CommonDialog1.Filter = All Files|*.*|Picture(*.bmp)|*.bmp

B)CommonDialog1.Filter="All Files"|"*.*"|"Picture(*.bmp)"|"*.bmp"

C)CommonDialog1.Filter="All Files|*.*|Picture(*.bmp)|*.bmp"

D)CommonDialog1.Filter={All Files|*.*|Picture(*.bmp)|*.bmp}

9.如果Form1是启动窗体,并且Form1的load事件过程中有Form2.Show,则程序启动后________。

A)发生一个运行错误

B)发生一个编译

C)在所有的初始化代码运行后Form1是活动窗体

D)在所有的初始化代码运行后Form2是活动窗体

10.当用户将焦点移到另一个应用程序时,当前应用程序的活动窗体将________。

A)发生DeActive事件

B)发生LostFocus事件

C)发生DeActive和LostFocus事件

D)DeActive和LostFocus事件都不发生

11.在下列关于菜单的说法中,错误的是________。

A)每个菜单项与其他控件一样也有自己的属性和事件

B)除了Click事件之外,B菜单项还能响应其他如DblClick等事件

C)菜单项的快捷键不能任意设置

D)程序运行时,若菜单项的Enabled属性为False,则该菜单项变成灰色

12.在下列关于对话框的叙述中,错误的是________。

A)CommonDialog1.ShowFont 显示字体对话框

B)在打开对话框中,用户选择的文件名可以经FileTitle属性返回

C)在打开对话框中,用户选择的文件名及路径可以经FileName属性返回

D)通用对话框中可以制作和显示帮助对话框

13. 关于多重窗体的叙述中,正确的是________。

A)作为启动对象的Main子过程只能放在窗体模块内

B)如果启动对象是Main子过程,则程序启动时不加载任何窗体,以后由该过程根据不同情况决定是否加载哪一个窗体

C)没有启动窗体,程序不能运行

D)以上都不对

14. 在Visual Basic工程中,可以作为“启动对象“的程序是______。

A)任何窗体或标准模块B)任何窗体或过程

C)Sub Main过程或其他任何模块D)Sub Main 过程或任何窗体

15. 以下叙述中错误的是______。

A)在程序运行时,通用对话框控件是不可见的

B)在同一个程序中,用不同的方法(如ShowOpen或ShowSave等)打开的通用对话框具有不同的作用

C)调用通用对话框控件的ShowOpen方法,可以直接打开在该通用对话框中指定的文件D)调用通用对话框控件的ShowColor方法,可以打开颜色对话框

16. 以下叙述中错误的是______。

A)下拉式菜单和弹出式菜单都用菜单编辑器建立

B)在多窗体程序中,每个窗体都可以建立自己的菜单系统

C)除分隔线外,所有菜单项都能接收Click事件

D)如果把一个菜单项的Enable属性设置为False,则该菜单项不可见

17. 在窗体上画一个名称为CommonDialog1 的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:

Private Sub Command1_Click()

CommonDialog1.FileName = ""

CommonDialog1.Filter = "all file|*.*|(*.DoC)|*.Doc|(*.Txt)|*.Txt"

CommonDialog1.FilterIndex = 2

CommonDialog1.DialogTitle = "VBTest"

CommonDialog1.Action = 1

End Sub

对于这个程序,以下叙述中错误的是______。

A)该对话框被设置为“打开”对话框B)在该对话框中指定的默认文件名为空

C)(*.Txt)

填空:

1.在菜单编辑器中建立一个菜单,其主要菜单项的名称为mnuEdit,Visible属性为False。程序运行后,如果用鼠标右键单击窗体,则弹出与mnuEdit对应的菜单。以下是实现上述功能的程序,请填空。

Private Sub Form_ __【1】___(Button As Integer,Shift As Integer,X As Single,Y As Single)

If Button=2 Then

__【2】___ mnuEdit

End If

End Sub

2.不管是在窗口顶部的菜单条上显示菜单还是隐藏菜单,都可以用(3)方法把它们作为弹出菜单,在程序运行期间显示出来。

3.. 假定有一个通用对话框CommonDialog1,除了可以用CommonDialog1.Action=3显示颜色对话框外,还可以用(4)方法显示。

4.. 在显示字体对话框之前必须设置(5)属性,否则将发生不存在的字体错误。

5.. 在用Show方法后显示自定义的对话框时,如果Show方法之后带(6)参数,就将窗体作为模式对话框显示。

6. 如果在建立菜单时,在标题文本框中输入一个" (7)",那么菜单显示时,形成一个分割线。

2012 VB_NET练习题2(题目)

第1-2章 https://www.360docs.net/doc/422238392.html, 基础 一、题1 1..NET 的目的就是将( )作为新一代操作系统的基础,对互联网的设计思想进行扩展。 2.对象的特征称( ),对象能够执行的操作称( ),对象能够识别的操作称( )。 3.面向对象的程序设计语言的基本编程模式是( )驱动。 4.要退出应用程序的执行,不能执行下列的( )语句。 ①End ②Application.Exit ③Application.Exit() ④Stop ⑤Debug.Break 5.要使文本框中的文字不能被修改,应把( )属性设置成False 。 6.当运行程序时,系统自动执行启动窗口的( )事件过程。 7.当文本框的ScrollBars 属性设为Horizontal ,MultLine 属性设为True,却没有效果,原因是( )。 8.图片控件PictureBox 的属性SizeMode 用于调节框内显示图的大小。下面的( )枚举值能使图片自动缩放填满整个图片框。 ①Zoom ②StretchImage ③AutoSiuze ④CenterImage 二、题2 https://www.360docs.net/doc/422238392.html, 框架包括 和NET 类库。 2.项目可以视为编译后的一个可执行单元,可以是应用程序、动态链接库等,而企业级的解决方案往往需要多个可执行程序的合作,为便于管理,在Visual https://www.360docs.net/doc/422238392.html, 集成环境中引入了 。 3.要想Label 控件显示给定的文字“您好”,应在设计状态下设置它的 属性值。 4.要想在控制台程序运行时输入信息,可使用Console 对象的 方法,要输出信息应使用Console 对象的 方法。 5.在https://www.360docs.net/doc/422238392.html, 中, 过程是控制台应用程序的入口点。 6.语句:Me.BackgroundImage= ,可以清除窗体的背景图。 第3章 数据类型与表达式 一、题1 1.将算术式,e d c b a -+-?15写成https://www.360docs.net/doc/422238392.html, 表达式为( )。 2.数学式“2/3 e (x+y)”的VB .NET 表达式是( )。 3.15除以4余数的-3次方的VB .NET 表达式为( ) 4.将变量k 四舍五入保留2位小数的表达式是( )。 5.要定义固定长度字符串变量str 要使用( )。 6.表达式Chr(Int(Rnd*10+66))所产生的是( )。 7.表达式Len(“123程序设计ABC ”)的值是( )。 二、题2 1.若A=20,B=80,C=70,D=30,则表达式A+B>160 or (B*C>200 And Not D>60)的值是 。 2.表达式7Mod4*4^3/6\2的值为: 。 3.表达式Len(Str(17.35))mod 2的值为 。 https://www.360docs.net/doc/422238392.html, 的一个语句好可以分别写在多行上,行末尾加上 作为续行标志;另

VB期末考试试题及答案

二、选择题 1、菜单控件只包括一个事件,即 C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中,不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本,应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态,应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value

7、允许在菜单项的左边设置打勾标记,下面哪种论述是正确的 D 。 A、在标题项中输入&,然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时,在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去,其实现的方法是 D 。 12、以下选项中,不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后,Visual Basic将显示的窗口是 A 。 A.代码窗口 B.工具箱 C.项目(工程)窗口 D.属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句: Strl=InputBox("输人","","练习") 从键盘上输人字符“示例”后,Strl的值是 D 。 A.“输入” B.“” C.“练习” D.“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间,需设置的属性是 C 。 A.Enabled B.Value C.Interval D.Text 19、能够改变复选框中背景颜色的属性是 C 。

大学VB考试题库

大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是()。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句:a=123& MID("123456",3,2)执行后,a变量中的值是()。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件,这两个文件分别是(B)。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是(C)。 A、https://www.360docs.net/doc/422238392.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序,应当(D) A、只装入窗体文件(.frm) B、只装入工程文件(.vbp) C、分别装入工程文件和标准模块文件(.bas) D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要(A)。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是(C)。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括(C)。

A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用,要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作,要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时,窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上,应将进行(D)设置。 A、将控件的TabIndex属性设置为0

第二部分 VB练习题与答案

VB 练习题与答案

96 第2章数据类型与表达式 一、选择题 1. 一个语句行内写多条语句时,每个语句之间用( )符号分隔。 A. , B. : C. 、 D. ; 2. 一句语句要在下一行继续写,用( )符号作为续行符。 A. + B. – C. _ D. … 3. 下面( )是合法的变量名。 A. X_yz B. 123ab C. integer D. X-Y 4. 下面( )是不合法的整数。 A. 100 B. &Ol00 C. &H100 D. %100 5. 下面( )是合法的字符常量。 A. ABC$ B. "ABC" C. 'ABC' D. ABC 6. 下面( )是合法的单精度型变量。 A. num! B. sum% C. xinte$ D. mm# 7. 下面( )是不合法的单精度常数。 A. 100! B. 100.0 C. 1E+2 D. 100.0D+2 8. 表达式16/4-2^5*8/4 MOD 5\2的值为( )。 A. 14 B. 4 C. 20 D. 2 9. 数学关系3≤x<10表示成正确的VB表达式为( )。 A. 3<=X<10 B. 3<=x AND x<10 C. x>=3 OR x<10 D. 3<=x AND<10 10. “\”、“/”、“Mod”、“*”四个算术运算符中,优先级别最低的是( )。 A. \ B. / C. Mod D. * 11. 与数学表达式ab/3cd对应的不正确V isual Basic 6.0表达式是( )。 A. a*b/(3*c*d) B. a/3*b/c/d C. a*b/3/c/d D. a*b/3*c*d 12. Rnd函数不可能为下列( )值。 A. 0 B. 1

VB上机综合测试题(十五套)

VB上机综合测试题(一) 一、如下所示,在窗体上,放置一个文本框text1(文本框中的文字为“改变字形”,居中显示)。三个复选框check1,check2和check3,如图设置属性。要求:当用户单击“加粗”、“斜体”、“下划线”这三个复选框时(即当复选框被选中时)能将文本框的字形变为“粗体、斜体、加下划线”(25分) 二、在窗体上添加一个命令按钮(名称为Cmd1,标题为"输出平均值")。程序运行后,单击命令按钮完成以下工作:①随机产生20个0到1000的整数,将其放入一个一维数组中②求出所有元素的平均值,并显示在窗体上(如下图所示)(35分) 三、请设计如下图所示窗体界面。运行程序时,先向左侧文本框中输入一个不超过10的正整数,然后选择"N的阶乘"或"(N+2)的阶乘"单选钮,即可进行计算,计算结果在右侧文本框中显示。请编写程序完成上述功能。(40分)

答案: 一、 界面设计------10分 Private Sub Check1_Click() = ------5分 End Sub Private Sub Check2_Click() = 分 End Sub Private Sub Check3_Click() = ------5分 End Sub 二、 界面设计------10分 Private Sub Cmd1_Click()------2分Dim a%(19), i%, sum!, aver! ------4分Randomize ------3分 For i = 0 To 19------3分 a(i) = Int(Rnd * 1001) ------3分 sum = sum + a(i) ------3分 Next i ------2分 aver = sum / 20 ------3分 Print aver ------2分 End Sub 三、 界面设计------10分 Dim? n%------2分 Private Sub Form_Load() End Sub

2016年计算机二级《VB》基础练习题及答案(2)

2016年计算机二级《VB》基础练习题及答案(2) 1[简答题]在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性,满足如下要求: ①Text2可以显示多行文本,并且有垂直和水平两个滚动条; ②程序运行时在Textl中显示输入的字符为“*”。 程序运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjtl.vbp,窗体文件名保存为sjtl.frm。 参考解析: 【考点分析】本题考点有:窗体的Caption属性,文本框的Name、Width、Hei【ght、PasswordChar、Text、MuhiLine、ScrollBars属性。 【解题思路】文本框控件的MuhiLine属性用于设置文本框是否显示多行文本,值为Tr ue表示是,值为False则表示否。ScrollBars属性设置文本框是否有水平或垂直滚动条,它有0、l、2和3这4个值,0表示没有滚动条(默认值),1表示只有水平滚动条,2表示只有垂直滚动条,3表示有水平和垂直滚动条。文本框的PasswordChar属性常用于设置用某字符(如“*”)屏蔽用户在文本框中键入的内容,常用于口令输入。 【操作步骤】 步骤1:新建一个窗体,按照题目要求建立文本框控件并设置其属性,程序中涉及的控件及属性见表3.8和表3.9。

步骤2:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】由于ScrollBars属性的设置值较多,易混乱,请考生牢记4个值分别设置的文本框滚动条属性。 2[单选题]在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。 A.外模式 B.内模式 C.概念模式 D.逻辑模式 参考答案:B 参考解析:数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述,是全体用户公共数据视图。外模式也称子模式或用户模式,它是用户的数据视图,给出了每个用户的局部数据描述。内模式又称物理模式,它给出了数据库物理存储结构与物理存取方法,所以选择B。 3[单选题]以下关系表达式中,其值为True的是()。 A.1f.XYZ”>”XYz” B.”VisualBasic”<>”visualbasic” C.P the-.=’’there·t D.”Integer”<”Int” 参考答案:B 参考解析:用关系运算符比较两个操作敷时,如果两个操作数是字符型的,按字符的A SCIl码从左到右一一比较,即先比较第1个,若相同再比较第2个,依次比较,直到比较

VB上机程序调试题_题目及参考答案

第二部分VB上机考试模拟试题 一、程序调试题(改错或填空) (二)程序调试题 [题1] Modify.bas模块中的getanswer过程是用于计算一元二次方程的根,并将结果输出来。 Option Explicit Public Sub getanswer() '该过程是用于计算一元二次方程的根,并将结果输出来。 Dim dalt!, a#, b#, c# a = InputBox("输入系数a") b = InputBox("输入系数b") c = InputBox("输入系数c") dalt = b * b - 4 * a * c If ----1---- dalt >0 then dalt = Sqr(dalt) MsgBox Format((-b + dalt) / 2 / a), "0.00" + Chr(13) + Chr(10) + Format((-b - dalt) / 2 / a, "0.00") Elseif ---2---- dalt =0 then MsgBox Format(-b / 2 / a, "0.00") + Chr(13) + Chr(10) + Format(-b / 2 / a, "0.00") Else dalt= ---3---- Sqr(-dalt) MsgBox Format((-b + dalt) / 2 / a, "0.00") + "+i" + Chr(13) + Chr(10) + Format((-b - dalt) / 2 / a, "0.00") + "-i" End If End Sub [题2] 打印输出一菱形图案。 Public Sub prt() '打印由#组成的菱形图案 ' # ' ### ' ##### ' ####### ' ######### ' ####### ' ##### ' ### Dim start As String '每行起始空格数 Dim count As Integer '每行#个数 For i = 1 To 9 If i <= 5 Then '------1------ start=space(21-i) count = 2 * i - 1 Else start = Space(11 + i) '-------2------ count=19-2*i End If '------3------ form1.print start; For j = 1 To count Form1.Print "#"; Next j '------4------ form1.print Next i [题3] 过程pyramid用以打印一个数字金字塔,请在横线上填入必要的内容(将横线删除掉后填入正确的内容),使其完整。 Option Explicit Public Sub pyramid() '打印数字金字塔 ' 1 ' 222 ' 33333 ' 4444444 ' 555555555 ' 6666666 ' 77777 ' 888 ' 9 Dim i As Integer Dim j As Integer Dim start As String '每行起始空格数 Dim num As Integer '每行数字个数 For i = 1 To 9 If i <= 5 Then start = Space(20 - i) num = 2 * i - 1 Else start= '------1------ Space(10 + i) num= '------2------ 2 * (10-i) - 1 End If Form1.Print start; For j = 1 To num '------3------ form1.print trim(str(i)); Next j '------4------ form1.print Next i End Sub [题4] 改错。 Option Explicit Public Sub prt() '打印由数字组成的如下所示金字塔图案 ' 9 ' 888 ' 77777 ' 6666666 ' 555555555 ' 44444444444 ' 3333333333333 ' 222222222222222 ' 11111111111111111 Dim i As Integer, j As Integer '****** 错误1 ****** For i = 9 To 1 step -1 Form1.Print Space(i); '****** 错误2 ****** For j = 1 To 2 *(10- i) - 1 '****** 错误3 ****** Form1.Print trim(str(i)); Next j

VB练习题(上机)含答案

第一部分 1 在窗体上添加一个命令按钮(名称为Cmd1,标题为"输出平均值")。程序运行后,单击命令按钮完成以下工作: ①随机产生20个0到1000的整数,将其放入一个一维数组中 ②求出所有元素的平均值,并显示在窗体上(如下图所示) Private Sub Cmd1_Click() Dim a%(19), i%, sum!, aver! Randomize For i = 0 To 19 a(i) = Int(Rnd * 1001) sum = sum + a(i) Next i aver = sum / 20 Print aver End Sub 2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮,如下图所示。在程序运行时,单击"转换"按钮,可以把Text1中的小写字母转换为大写,把大写字母转换为小写,其他字符不变。 Private Sub C1_Click() Dim ch As String, ch1 As String, i% ch = Text1 For i = 1 To Len(ch) If Asc(Mid(ch, i, 1)) >= 65 And Asc(Mid(ch, i, 1)) <= 90 Then ch1 = ch1 + LCase(Mid(ch, i, 1)) Else

ch1 = ch1 + UCase(Mid(ch, i, 1)) End If Next i Text1 = Text1 + vbCrLf Text1 = Text1 + ch1 End Sub 3 在窗体上添加一个命令按钮(名称为MyCmd1,标题为"输出最大值")。程序运行后,单击命令按钮完成以下工作: ①随机产生30个0~1000的整数,将其放入一个一维数组中 ②求出其中的最大值,并显示在窗体上。 Private Sub MyCmd1_Click() Dim a%(29), i%, max% Randomize For i = 0 To 29 a(i) = Int(Rnd * 1001) Next i max = a(0) For i = 1 To 29 If a(i) > max Then max = a(i) Next i Print max End Sub 4 请设计如下图所示窗体界面。程序运行时,在选中一个或两个复选框和一个单选按钮时,单击命令按钮,则对文本框中的文本内容做相应的设置。请编写适当的事件过程,完成上述功能。

VB考试题及答案

VB程序设计期末考试题 一、选择题 1 下列常量中,是Integer类型常量的是( C )。 A、123& B、-38844 C、123% D、32768 2 下面选项中()是字符连接运算符. A A、& B、And C、% D、Mod 3 下面关于VB的集成开发环境(IDE)的叙述中,不正确的是( B )。 A、IDE是设计、调试、运行VB程序的工具。 B、用户不能随意关闭IDE中的窗口。 C、"窗体设计" 窗口是用来设计应用程序界面(窗体)的。 D、打开 / 关闭各窗口的命令主要在IDE的"视图"菜单中。 4 len(“vb程序设计”)=( C ) 。 A、 5 B、2 C、 6 D、10 5 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 D A、7 B、0 C、2 D、4 6 赋值语句A=123 + Mid$( “123456”,3,2) 执行后,A=(A)。 A、157 B、12334 C、123 D、"12334" 7 在一个语句内写多条语句时,用来分隔每条语句的符号是(C). A、, B、; C、: D、、 8 将逻辑型数据转换成整型数据时,转换规则是( D )。 A、将True转换为 1 ,将False转换为 0 B、将True转换为 1 ,将False转换为 -1 C、将True转换为 0 ,将False转换为 -1 D、将True转换为 -1 ,将False转换为 0 9 表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(D).

A、SIN B、4^5 C、3*4 D、x+1 10 如果x=2,则表达式x+1>2 Or sin(x)>0.9 And 3>x+3的值( B )。 A、不能计算 B、 True C、5 D、False 11 随机产生[10,50] 之间整数的正确表达式是( D )。 A、Round( Rnd*50) B、 Int(Rnd*40+10) C、Round( Rnd*51) D、 10+Int(Rnd*41) 12 每建立一个窗体,工程管理器窗口中就会增加一个(C). A、类模块文件 B、工程文件 C、窗体文件 D、程序模块文件 13 INT(100*RND(1))产生的随机整数的闭区间是(B). A、[1,100] B、[0,99] C、[0,100] D、[1,99] 14 下列数据类型中,占用内存最小的是(D). A、Integer B、Single C、Boolean D、Byte 15 VisualBasic是一种()程序设计语言.B A、过程式 B、非过程式 C、机器 D、低级 16 函数Int(10*Rnd)是在(A)范围内的整数. A、[0,9] B、[0,1] C、[1,9] D、[1,10] 17 以下合法的一组Visual Basic用户标识符是 C A、Sum 和 8abc B、a#x 和 Pi C、ForLoop 和 Total D、Const 和 DoWhile

vb试题及答案

VB试卷 一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能,则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项,不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小,则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计,以下4个选项,不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮,可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见,可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时,系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数,可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点,可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件,可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时,若要调用某命令按钮的Click事件过程,可设置该命令按钮对象的 属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框,由属性的设置值决定。

vb课后练习答案习题解答 (5)

第5章数组与记录 5.1 填空题 1.若要定义一个包含10个字符串元素,且下界为1的一维数组s,则数组说明语句为()。 答案:Dim s(1 To 10) As String 2.若要定义一个元素为整型数据的二维数组a,且第一维的下标从0到5,第二维下标从-3到6,则数组说明语句为()。 答案:Dim a(0 To 5,-3 To 6) As Integer 3.如果数组元素的下标值为实数,则VB系统会按()进行处理。 答案:四舍五入原则 4.数组元素个数可以改变的数组称为();数组元素可以存放不同类型数据的数组称为()。 答案:可调数组、可变类型数组 5.数组刷新语句用于()。若被刷新的数组是数值数组,则把所有元素置();若被刷新的数组为字符串数组,则把所有元素置()。 答案:清除指定数组内容、0、空字符串 10.控件数组是由一组类型和()相同的控件组成,共享()。 答案:名字、同一个事件过程 11.控件数组中的每一个控件都有唯一的下标,下标值由()属性指定。 答案:Index 12.建立控件数组有两种方法:()和()。 答案:在设计阶段通过相同Name属性值来建立、在程序代码中使用Load方法 5.2 选择题 1.下列一维数组说明语句错误的是()。 a) Dim b(100) AS Double b) Dim b(-5 To 0) AS Byte c) Dim b(-10 To –20) AS Integer d) Dim b(5 To 5) AS String 答案:c 2.若有数组说明语句为:Dim a(-3 To 8),则数组a包含元素的个数是()。 a) 5 b) 8 c) 11 d) 12 答案:d 3.设有数组说明语句:Dim c(1 To 10),则下面表示数组c的元素选项中()是错误的。 a) c(i-1) b) c(5+0.5) c) c(0) d) c(10) 答案:c 4.下列数组说明语句中正确的是()。 a) Dim a(-1 To 5,8)AS String b) Dim a(n,n)AS Integer c) Dim a(0 To 8,5 To –1)AS Single d) Dim a(10,-10)AS Double

vb经典题目及答案

1、在考生文件夹下有工程文件wy7、vbp及窗体文件wy7、frm,该程序就是不完整的,请在有?号的地方填入正确的程序代码,然后删除?及所有注释符号(即 '号),但不能修改其它部分。修改后的程序文件都保存,存盘时不得修改文件夹与文件名。 本题描述如下: 在窗体上有一个名为Text1的文本框,有三个命令按钮,名称分别就是C1、C2与C3,标题分别就是"读入"、"加密"与"存盘"。要求程序运行后,点击"读入"按钮,将文本文件in7、txt(该文件在考生文件夹下)中的文本信息读入文本框Text1中;点击"加密"按钮将Text1中的英文字母加密转换,并将转换后的结果显示到Text1中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母就是"a",则转换后的就是"c",转换前就是"E",转换后就是"G";点击"存盘"按钮, 则将转换后的文本框中的文本保存到out7、txt 文件中(该文件保存到考生文件夹下)。 Private Sub C1_Click() Dim strinfo As String Open "in7、txt" For Input As 1 Input #1, strinfo Close #1 Text1、Text = strinfo End Sub Private Sub C2_Click() Dim strchange As String Dim i As Integer For i = 1 To Len(Text1、Text) strchange = strchange + Chr(Asc(Mid(Text1、Text, i, 1)) + 2) Next Text1、Text = strchange End Sub Private Sub C3_Click() Open "out7、txt" For Output As 1 Print #1, Text1、Text Close #1 End Sub 2、(1)在考生文件夹下有工程文件wy5、vbp及窗体文件wy5、frm,该程序就是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即'号),但不能修改其它部分。存盘时不得改变文件名与文件夹。本题描述如下: 在窗口中有一个RichText文本框控件(名称为rtx1)与一个文本框控件(名称为Text1),两个命令按钮,名称 分别为Command1与Command2,标题分别为"加入WY01、TXT"、"统计字符个数"。要求程序运行后,单击command1将考生文件夹下的wy01、txt的内容显示到rtx1中;单击"统计字符个数"按钮统计Text1中有多少个字符,将结果显示在Text1中。

vb题库及答案

| 最新VB题库及答案 一、选择题 第1部分 1、在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change() = "计算机等级考试" End Sub ] B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() = "计算机等级考试" End Sub D、Private Sub Command1_Click() = "计算机等级考试" { End Sub 2、在一行内写多条语句时,每个语句之间用()符号分隔。 A、 , B、: C、. D、; 3、下面()是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y ] 4、下面()是合法的字符常量。 A、 ABC$ B、“ABC” C、‘ABC’ D、 ABC 5、表达式16/4 - 2^5*8 MOD 5\2的值为()。 A、14 B、 4 C、20 D、2 6、设a=”MicrosoftVisualBasic”,则以下使变量的b值为”VisualBasic”的语句是 A、b=Left(a,10) B、b=Mid(a,10) — C、b=Right(a,10) D、b=Mid(a,11,10) 7、设a="a",b="b",c="c",d="d",执行语句x = IIf((a < b) Or (c > d), "A",

vb练习题及答案.doc

vb 练习题及答案 【篇一:vb 习题(含答案)】 lass=txt>1 、vb 程序中,通常不会产生错误提示的是( )。(1 分) a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段,双击窗体上任一空白处,打开的窗口是( )。(1 分) a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中,正确的说法是( )。(1 分) a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能,可以通过按下功能 键( )得到帮助。( 1 分) a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。( 1 分) a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。( 1 分) a、0 b 、1 c、2 d 、5 7、文本框没有( )属性(1 分) a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。( 1 分) a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中,定义x 为变体型变量的是( )。(1 分) a、dim x as double b 、dim x c、dim x! d 、x%=23

25、设有如下变量声明:dim testdate as date ,为变量testdate 正确赋值的表达方式是( )。(1 分) a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句,a=beijing :b=shanghai :print a,b 对其输出结果的描述中,正确的是( )。(1 分) a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a :a=b: b=t 执行后( )。(1 分) a、a 值为3,b 值为3 b 、a 值为3,b 值为5 c、a 值为5,b 值为5 d 、a 值为5,b 值为3 28、下列语句中,正确的是( )。(1 分) a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后, y 结果是( )。(1 分) a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) , 将显示一个输入对话框,在对话框的输入区中显示的信息是( )。(1 分) a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮,先后在两个输 入对话框中输入123 和321 ,窗体显示的内容是( )。(1 分) a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后,所产生的消息框的标题是 ( )。(1 分) a、aaa b 、bbb

VB上机考试习题以及答案

VB上机考试 1、利用随机函数产生25个100到999之间的整数,构成5 5的矩阵,输出该矩阵。Dim a(1 To 5, 1 To 5) Private Sub Form_Click() Ran domize For i = 1 To 5 Forj = 1 To 5 a(i, j) = Int(Rnd * (999 - 100 + 1) + 100) Print a(i, j); Next j Print Next i End Sub 2、利用随机函数产生25个10到99之间的整数,求其平均值(要求保留3位小数,第4 位四舍五入)。Private Sub Form_Click() For i = 1 To 25 a = In t(R nd * (99 - 10 + 1) + 10) Print a; s = s + a Next i Print Avg = s / 25 Print Avg End Sub 3、在窗体上按下鼠标的右键,记录其坐标。 Private Sub Form_Load() Label1.BorderStyle = 1 Label1.Alig nment = 2 End Sub Private Sub Form_MouseDow n(Button As In teger, Shift As In teger, X As Si ngle, Y As Si ngle) If Butt on = 2 The n Label1.C apti on = X & "," & Y End If End Sub 4、利用随机函数产生25个10到99之间的整数,按从小到大的顺序显示。Dim a(1

VB练习题2

1.项目文件的扩展名是() A..vb B..sln C..exe D..vbproj 2.集成开发环境有两类窗口:浮动和固定,下面的()窗口不是浮动窗口。 A.工具箱B.属性 C.即时D.窗体 3.要使窗体的标题为“演示实例”,应修改窗体的()属性。 A.Caption B.Tip C.Item D.Text 4.在https://www.360docs.net/doc/422238392.html,中,下面属于方法的是()。 A.Focus B.SelectedText C.LostFocus D.Keypress 5.一条语句要在下一行继续写,可用()符号作为续行符。 A.+ B.- C.空格和_ D.... 6.若要使命令按钮不可操作,要对()属性进行设置。 A.Enabled B.Visible C.BackColor D.Text 7.在https://www.360docs.net/doc/422238392.html,集成环境中创建https://www.360docs.net/doc/422238392.html,应用程序时,除了工具箱窗口、窗体窗口和属性窗口 外,必不可少的窗口是() A.窗体布局窗口B.立即窗口 C.代码窗口D.监视窗口 8.当运行程序时,系统自动执行启动窗体的()事件过程 A.Load B.Click C.Unload D.GotFocus 9.当文本框的ScrollBars属性设置了非None值,却没有效果,原因是() A.文本框没有内容B.文本框的MultiLine属性为False C.文本框的MultiLine属性为True D.文本框的Locked属性为True 10.若要使标签控件显示时不要覆盖窗体的背景图案,要对()属性进行设置 A.BackColor B.BorderStyle C.ForeColor D.BackStyle 11.数据类型为Long的类型标识符为()。 A.%B.&C.!D.# 12.下面()是日期型常量。 A.“5/17/12”B.5/17/12 C.#5/17/12#D.(5/17/12) 13.下面的()是合法的单精度型变量。 A.num! B.sum% C.char! D.mm# 14.下面的()是合法变量名。 A.X_yz B.123abc C.Integer D.X-Y 15.Rnd函数不可能为下列的()值。 A.0 B.1 C.0.1234 D.0.0005 16.图片框控件(PictureBox)是专门用于显示图片的控件,主要属性image用于设置显示 在控件上的图片,使用()语句可以在程序中消除已装入的图片。 A.PictureBox控件名.image=”” B.PictureBox控件名.image=Nothing C.PictureBox控件名.image=Image.FromFile(“”) D.PictureBox控件名.image=Image.FromFile(Nothing) 17.表达式16/4-2^5*8/4Mod5\2的值为() A.14 B.4 C.20 D.2 18.表达式Len(“123程序设计ABC”)的值是() A.10 B.14 C.20 D.17 19.为了给x,y,z三个整型变量赋初值1,正确的赋值语句是()。 A.x=1:y=1:z=1 B.x=1,y=1,z=1

相关文档
最新文档