南京工程学院vb题库5套
南京工程学院vb题库。。。。
试卷编号：8951
所属语言：Visual Basic
试卷方案：09-10-2《程序设计基础—VB》模拟
试卷总分：100分
共有题型：6种
一、判断共5题（共计10分）
第1题（2.0分）
Visual Basic提供的单选按钮的Value属性True表示选中,False表示未选中答案：Y
第2题（2.0分）
在命令按钮的Click事件过程中,exit与end等效.
答案：N
第3题（2.0分）
事件过程与Sub过程,它们相同点都是事件驱动,而不同的只是
事件过程由控件属性决定,而Sub过程是由户自定义.
答案：Y
第4题（2.0分）
VB通过窗体管理构成应用程序的各类文件的集合.
答案：N
第5题（2.0分）
如果一个列表框一共有5个选项,而当选中第三项时,这时列表
框的ListIndex属性为2.
答案：Y
二、单项选择共20题（共计40分）
第1题（2.0分）
数学关系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
答案：B
第2题（2.0分）
VB6.0是一种面向()的编程环境.
A:机器
B:对象
C:过程
D:应用
答案：B
第3题（2.0分）
从功能上讲,Visual Basic 6.0有3种版本,下列不属于这3种版本的是().
A:学习版
B:标准版
C:专业版
D:企业版
答案：B
第4题（2.0分）
下列运算符中()的优先级最高.
A:/
B:\
C:Mod
D:'+
答案：A
第5题（2.0分）
要使窗体在运行时不可改变窗体的大小并没有最大化和最小化按钮,通过设置可达到此要求的属性是().
A:MaxButton
B:BorderStyle
C:Width
D:MinButton
答案：B
第6题（2.0分）
下列可以把当前目录下的图形文件"p1.jpg"装入图片框picture1中,正确的语句是: A:Picture1="p1.jpg"
B:Picture1.Picture="p1.jpg"
C:Picture1.Picture=LoadPicture("p1.jpg")
D:Picture= LoadPicture ("p1.jpg")
答案：C
第7题（2.0分）
为使文本框显示滚动条,必须首先设置的属性是().
A:Mulitiline
B:Autosize
C:Alignment
D:Scrollbars
答案：A
第8题（2.0分）
"对象"是计算机系统运行的().
A:程序单位
B:逻辑单位
C:物理实体
D:基本实体
答案：D
第9题（2.0分）
当运行程序时,系统自动执行启动窗体的()事件过程.
A:Load
B:Click
C:UnLoad
D:GotFocus
答案：A
第10题（2.0分）
按文件的组织方式分有
A:顺序文件和随机文件
B:ASCII文件和二进制文件
C:程序文件和数据文件
D:磁盘文件和打印文件
答案：A
第11题（2.0分）
如果要在命令按钮上显示图形文件,应设置命令按钮的().
A:Style属性和Graphics属性
B:Style属性和Picture属性
C:Picture属性
D:Graphics属性
答案：B
第12题（2.0分）
激活主菜单的按键是().
A:F1或Ctrl键
B:Ctrl键或Atl键
C:F10或Ctrl键
D:F10或Atl键
答案：B
第13题（2.0分）
Sub过程与Function过程最根本的区别是
A:Sub过程可以有参数,Function过程不可以
B:Function过程可以有参数,Sub过程不可以
C:两种过程参数的传递方式不同
D:Sub过程的过程名不能返回值,而Function过程能通过过程名返回值答案：D
第14题（2.0分）
在下列关于菜单的说法中,错误的是().
A:每个菜单项是一个控件,与其他控件一样也有自己的属性和事件
B:除了Click事件之外,菜单项还能响应其他的事件,如DblClick事件
C:在程序执行时,如果菜单项的Visible属性为False,则该菜单项不可见
D:在程序执行时,如果菜单项的Enabled属性为False,则该菜单项变成灰色,不能被用户选择答案：B
第15题（2.0分）
记录长度最大可取的值是______字节.
A:32767
B:32768
C:65535
D:65536
答案：A
第16题（2.0分）
若有一菜单项(名为MenuItem),为了在运行时使该菜单项失效(变灰),应使
用的语句是
A:MenuItem.Enabled = True
B:MenuItem.Visible = False
C:MenuItem.Checked = True
D:MenuItem.Enabled = False
答案：D
第17题（2.0分）
在VB中，（）被称为对象.
A:窗体
B:控件
C:窗体和控件
D:窗体、控件、属性
答案：C
第18题（2.0分）
执行了下面的程序：
Sub Form_Click()
For i=1 To 6
List1.AddItem i
Next
For i=1 To 3
List1.RemoveItem i
Next
End Sub
列表框中的数据项为
A:1,5,6
B:2,4,6
C:4,5,6
D:1,3,5
答案：D
第19题（2.0分）
以下关于过程及过程参数的描述,错误的是:
A:过程的参数可以是控件的名称
B:用数组作为过程的参数时,
使用的传地址的方式
C:只有函数过程能够将过程中
矗立的信息传回到调用的程序中
D:窗体可以作为过程的参数
答案：C
第20题（2.0分）
函数Ucase(Mid("visualbasic",8,8))的值为().
A:visual
B:basic
C:VISUAL
D:BASIC
答案：D
三、程序填空共1题（共计10分）
第1题（10.0分）
'------------------------------------------------------- '【程序填空】
'------------------------------------------------------- '功能：完成程序，使程序输出值为 15
'-------------------------------------------------------
Private Sub Command1_Click()
'**********SPACE**********
Dim i, j, x,【?】 As Integer
For i = 1 To 4
x = 4
For j = 1 To 3
x = 3
'**********SPACE**********
For 【?】 = 1 To 2
'**********SPACE**********
x = x + 【?】
Next k
Next j
Next i
Print x
End Sub
答案：
=======(答案1)=======
k
=======(答案2)=======
k
=======(答案3)=======
6
四、程序改错共1题（共计10分）
第1题（10.0分）
'------------------------------------------------
'【程序改错】
'------------------------------------------------
'题目：已知C的公式表示如下:
' n!
' C=------------------
' (n-m)!*m!
'函数过程fac( )求k！函数,在Fomr_Click事件中完成运算，'请修正程序中错误。
'------------------------------------------------ Option Explicit
Private Function fac(k As Integer) As Single
Dim x As Single, j As Integer
'**********FOUND**********
x = 0
For j = 1 To k
'**********FOUND**********
x = x ^ j
Next j
fac = x
End Function
Private Sub Form_Click()
Dim C As Single
Dim m As Integer, n As Integer
m = Val(InputBox("请输入一个整数(m)："))
n = Val(InputBox("请输入一个整数(n)："))
'**********FOUND**********
C = fac(n) / fac(n - m) * fac(m)
Print "C="; C
End Sub
答案：
=======(答案1)=======
x=1
=======(答案2)=======
x=x*j
=========或=========
x=j*x
=======(答案3)=======
C = fac(n) / fac(n - m) / fac(m)
=========或=========
C = fac(n) / (fac(n - m) * fac(m))
=========或=========
C = fac(n) / ( fac(n - m) * fac(m) )
五、程序设计共1题（共计20分）
第1题（20.0分）
'-------------------------------------------------
'【程序设计】
'-------------------------------------------------
'题目：编写函数fun其功能是能计算如图1所示的表达式
' 的结果值，m由键盘输入，使用do while...loop
' 语句完成
'-------------------------------------------------
答案：----------------------
Dim i As Integer
Dim sum As Single
i = 1
Do While i <= m
sum = sum + 1 / (2 * i * (-1) ^ (i - 1))
i = i + 1
Loop
fun = sum
----------------------
六、VB窗体设计共1题（共计10分）
第1题（10.0分）
------------------------------------------------
【窗体设计】
------------------------------------------------
题目：用复选框实现在文本框中显示是否“加下划线”
或“斜体显示”。在窗体上放置一个文本框，两
个复选框，程序运行界面如图所示
各控件属性设置如下表：
对象名称 Name属性 Caption属性 text属性
窗体默认默认
文本框 Display 人民警察为人民
复选框 Check1 斜体显示
Check2 加下划线
------------------------------------------------
VB程序设计期末考试复习题
VB复习题 一．选择题 1．使用声明语句建立一个数值型的变量后，VB自动将该变量初始化为（B）。 A．空值 B．0 C．1 D．Null 2．使用声明语句建立一个字符型的变量后，VB自动将该变量初始化为（ A ）。 A．空值 B．0 C．1 D．Null 3．使用声明语句建立一个布尔型的变量后，VB自动将该变量初始化为（A ）。 A．False B．0 C．1 D．True 4．关于 VB 中的运算符，以下说法正确的是（）。 A．“×”是算术运算符，含义是“乘法运算” B．“≠”是关系运算符，含义是“不等于” C．“!”是逻辑运算符，含义是“非” D．“And”是逻辑运算符，含义是“与” 5．对象的三要素是（）。 A．属性、事件、程序 B．属性、事件、方法 C．窗体、事件、程序 D．语句、函数、程序 6．VB中，表达式10<2 Or Not 5>2+6的值为（）。 A．TRUE B．FALSE C．0 D．出错 7．VB中，表达式Mid$("南京工程学院",3,4)的结果是（）。A．"工程学院" B．"京工程学" C．"程学院" D．"工程" 8．在VB中，应用程序被称为（）。 A．工程 B．窗体 C．属性 D．对象 9．VB中，事件Click由（）引发。 A．移动鼠标 B．左键单击鼠标 C．双击鼠标 D．右键单击鼠标 10．VB中，隐藏窗体的方法是（）。 A．Unload B．Stop C．Hide D．Show 11．在Visual Basic中最基本的对象是（），它是应用程序的基石，也是其它控件的容器。 A．文本框 B．命令按钮 C．窗体 D．标签 12．VB窗体文件的扩展名为（）。 A．VBP B．FRM C．BAS D．EXE
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/c911572785.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
南京工程学院数控技术期末考试题库及答案
工程学院数控技术期末考试题库及答案 一、单项选择题120题（每题1分） 1. 用逐点比较法对第一象限的圆弧进行顺圆插补时，若偏差值是+2，那么 刀具的下一步的进给方向为（D） A. +x B. +y C. -x D. -y 2. 程序停止，程序复位到起始位置的指令（ D） A. M00 B. M01 C. M02 D. M30 3. 目前常用的数控加工程序段格式为（A） A. 字地址程序段格式 B. 固定顺序程序段格式 C. 带分隔符的固定顺序程序段格式 D. 表格顺序程序段格式 4. 下面各项功能中，不属于CNC装置的基本功能（ D） A．插补功能 B. 进给功能 C. 主轴功能 D. 通信功能 5. 柔性制造系统的英文简称为（C） A．CIMS B. AC C. FMS D. DNC 6. CNC存储器中的数据丢失，出现的原因是（B） A．CNC系统断电 B. CNC系统电池无电 C. 机床断电 D. 数据保存不当 7. 以下提法错误的是（ A） A．G92是模态指令 B. G04 X3.0表示暂停3S C. G33 Z F 中的F表示螺纹导程 D. G41是刀具左补偿 8．数控机床主轴以800转/分转速正转时，其指令应是（A）A．M03 S800 B．M04 S800 C. M05 S800 D. M06 S800 9. 数控车削螺纹时，为保证车出合格的螺纹，应（A） A．需要增加刀具引入距离/引出距离 B.不需要刀具引入/引出距离 C.增加螺纹长度 D.只增加刀具引入距离 10. 混合编程的程序段是（ D ） A．G01 X100 Z200 F300 B. G01 X-10 Z-20 F30 C. G02 U-10 W-5 R30 D. G03 X5 W-10 R30
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
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期末考试试题
VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5）
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语言课程设计 院(系、部、中心) 专业 班级 学生姓名 学号 设计地点图书馆基础教学机房 指导教师 设计起止时间：201x年x月x日至201x年x月x日 目录
一、设计任务 (3) 二、方法原理 (3) 三、总体设计思路 (3) 四、程序调试和解决问题 (4) 五、完善及存在的问题 (4) 六、收获体会 (4) 七、意见建议 (4) 八、示例截图 (5) 九、附录1（代码） (6) 十、附录2（主要参考资料） (10) 一、设计任务 1.题目介绍
在计算机及其他数码产品日益普及的今天，人们使用键盘应像用笔写字一样熟练。进行打字练习时熟悉键盘并提高打字速度的好方法。本体要求编制一个打字练习游戏程序，使用户在游戏过程中进行打字练习。 2.功能要求 （1）启动界面如图1 （2）选择难度和速度后，单击“开始”按钮，界面如图1。若选择简单，则落下字母；若选择复杂，单击开始后出现对话框，如图 2.单击确定，开始练习，落下单词。 （2）若用户在字符落到屏幕底部之前敲击了相应的键盘键，则该字符被“击中”然后消失。根据程序速度和难度的设置自动进行积分，实时分数时间正确率掉落个数显示在窗体的上部。 积分规则：正确击中一个字母或一个单词，加一分；反之，不得分，亦不扣分。（4）当游戏者单击“暂停”按钮时，程序停止运行，在单击“开始”按钮，程序继续运行；当单击“退出”按钮时，则弹出对话框（如截图示例3），单击“取消”按钮，程序继续运行，单击“确定”按钮，则弹出对话框（如截图4），此时对话框显示分数，单击“确定”按钮，退出程序。 （5）为了增加视觉效果，每个掉落的字符的颜色随机产生。 二、方法原理 根据题目要求，使用控件数组，用标签标题表示字符，键盘事件的处理判断打字正确与否，随机值的产生方法随机产生字符，用Timer控件属性反映时间、控制字符下落速度。 三、总体设计思路 首先在窗体上画出三个按钮标题分别为开始、暂停、退出。画六个标签分别表示已落字母个数、已花时间、得分与正确率。 画出一个含有五个元素的标签控制数组用以显示字符。 画出两个时间控件，一个用来返回已用时间，一个控制字符下落。 最后编写相关代码
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. 标签框的边框，由属性的设置值决定。
大学物理题库第一章(二)南京工程学院
1有一质点沿x方向作直线运动,质点的运动学方程 决定,其中x的单位是米,t的单位是秒。则质点的速度为().?A、 ?B、 ?C、 ?D、 正确答案： A 2一质点沿轴运动，其速度与时间的关系为：，当时，质点位于处，则质点的运动方程为() ?A、 ? ?B、 ? ?C、
? ?D、 ? 正确答案： A 3位移和路程都与坐标原点的选取有关。() 正确答案：× 答案解析：位移无关 4速度是一个矢量,速率也是一个矢量。() 正确答案：× 答案解析：瞬时速度大小即速率 5在直线运动中,质点的加速度和速度的方向相同。() 正确答案：× 6一质点沿轴作直线运动,它在t时刻的坐标是，式中以米计，t以秒计，试求 （1）和时刻的瞬时速度； （2）第二秒内所通过的路程； （3）第二秒内的平均加速度以及和时刻的瞬时加速度。 正确答案：
7 正确答案：
8 正确答案： 9质点的运动学方程为,则质点的速度为()。?A、 ?B、 ?C、 ?D、 正确答案：B 10以下五种运动形式中,保持不变的运动是( ) ?A、单摆的运动 ?B、匀速率圆周运动
?C、行星的椭圆轨道运动 ?D、抛体运动 ?E、圆锥摆运动 正确答案：D 11位置矢量在直角坐标系和平面极坐标系中的表示方式是一样的。() 正确答案：× 对于沿曲线运动的物体,法向加速度必不为零(拐点处除外)。() 正确答案：√ 13 若物体的加速度为恒矢量,它一定做匀变速率圆周运动。() 正确答案：× 14 正确答案：
15 正确答案： 16在相对地面静止的坐标系内,A、B二船都以速率匀速行驶,A 船沿x轴正向,B船沿y轴正向。今在A船上设置与静止坐标系方向相同的坐标系(x、y方向单位矢用、表示),那么在A船上的坐标系中,B船的速度(以m/s为单位)为( ) ?A、2+2
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 期末考试试题A 卷 一、填空题 1、VB 程序设计的主要特点是可视化设计和事件编程。 2、在VB 中，最主要的两种对象是窗体（form ）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB 提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作___ 。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value 属性指示复选框处于 _____ 选中___或禁止状态（暗淡的）中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width ）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox 函数中，如果缺省title 参数，则使用工程1 作为消息框的标题。 12、设x = 34.58，语句Print Format（x, “ 000.0”）的输出结果是34.6。 13、在VB 中，数值型变量的初值为0 ，Varant 型变量的初值为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP 图片框中的图片应使用语句cls 。 二、选择题 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"
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题库3套
南京工程学院vb题库。。。。 试卷编号：8949 所属语言：Visual Basic 试卷方案：09-10-2《程序设计基础—VB》模拟 试卷总分：100分 共有题型：6种 一、判断共5题（共计10分） 第1题（2.0分） 用For循环写的程序不能用While循环来写. 答案：N 第2题（2.0分） 对象的可见性用enabled属性设置,可用性用visible属性设置. 答案：N 第3题（2.0分） 数组作为过程参数时,使用的是地址传送方式. 答案：Y 第4题（2.0分） 控件是对象,而窗体不是对象,它只是控件对象的窗口. 答案：N 第5题（2.0分） 在窗体模块的声明部分中用Private声明的变量的有效范围是其所在的工程. 答案：N 二、单项选择共20题（共计40分） 第1题（2.0分） 若有数组说明语句为:Dim a(10),则数组a包含元素的个数是(). A:10 B:22
C:8 D:12 答案：B 第2题（2.0分） 若要清除列表框的所有内容,可用什么方法实现 A:RemoveItem B:Cls C:Clear D:以上均不可以 答案：C 第3题（2.0分） 在一个语句内写多条语句时,用来分隔每条语句的符号是(). A:, B:: C:、 D:; 答案：B 第4题（2.0分） Cls方法可清除窗体或图片框中的信息是 . A:Picture属性设置的背景图案 B:在设计时放置的控件 C:程序设计时产生的图形和文字 D:以上方法都对 答案：C 第5题（2.0分） VB窗体文件的扩展名是(). A:VBW B:VBP C:FRM D:BAS
答案：C 第6题（2.0分） 下面关于随机文件的描述正确的是 A:文件中的内容是通过随机数产生的B:文件中的记录号通过随机数 产生 C:可对文件中的记录根据记录号 随机地读写 D:文件的每条记录的长度是随 机的 答案：C 第7题（2.0分） 下列数据类型中,占用内存最大的是(). A:Boolean B:Byte C:Integer D:Single 答案：D 第8题（2.0分） 下面是()合法的字符常数. A:ABC$ B:"ABC" C:'ABC' D:ABC 答案：B 第9题（2.0分） 能够改变窗体边框线类型的属性是(). A:FontStyle B:BorderStyle C:BackStyle D:Border 答案：B
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