vb模拟题第九套
【HNCE网上考试系统 v10.0】本套软件使用权属于：全国大学生计算机等级考试(河南考区) 考试课程:大学生计算机等级考试（河南考区）考试时间:110分钟考场:000考试日期:2011.05.03考号：003000008姓名：剩余时间：106:45 保存交卷退出帮助
A B
C D
A B
C D
A B
C D
A B
C D
A B
C D
A B
C D
A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B
C D
A B
C D
A B
C D
A B
C D
A B
C D
A
B
各种类型的文件
C
大量数据
D
数据库系统可以
A B C D A B
C D A B C D A B C D A B C D A B C D A B C D A B C D
A
Label1.BackStyle=1 : Label1.Borderstyle=1
B
Label1.BackStyle=0 : Label1.Borderstyle=0
C D
A B C D A B C D
考号：003000008姓名：剩余时间：106:45 保存交卷退出帮助强烈建议您使用IE5.0以上，屏幕分辨率800X600以上，真彩，小字体浏览
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模拟试题四
一、单选题（30分，每题1分） 1．计算机中采用二进制，是因为__(1) ____。 (A)可降低硬件成本 (B)两个状态的系统具有稳定性 (C)二进制的运算法则简单 (D)上述三个原因 2．我们通常说的U盘属于计算机部件中的___(2) ___。 (A) 输出设备 (B) 输入设备 (C) 存储设备 (D) 打印设备 3.下列表示存储容量的数据中，____(3) ____是最小的。 (A)20480 KB (B) 1.44 MB (C) 1 GB (D)4865723 Byte 4. 一个完整计算机系统应包括___(4) ____。 (A) 主机和显示器 (B)硬件系统和软件系统 (C)系统软件和应用软件 (D) 内存和外存 5.下列执行速度最快的程序语言是___(5) ____。 (A)数据库语言 (B)高级语言 (C)机器语言 (D)汇编语言 6.一只白色的足球被踢进球门，则白色、足球、踢、进球门是___(6) ___。 (A)属性、对象、方法、事件 (B) 属性、对象、事件、方法 (C) 对象、属性、方法、事件 (D) 对象、属性、事件、方法 7. 以下叙述中正确的是____(7) ____。 (A)窗体的Name属性指定窗体的名称，用来标识一个窗体 (B)窗体的Name属性的值是显示在窗体标题栏中的文本 (C)可以在运行期间改变对象的Name属性的值 (D)对象的Name属性值可以为空 8. 在VB中，保存一个工程至少应保存两个文件，这两个文件分别是___(8) ____。 (A)文本文件和工程文件 (B)窗体文件和工程文件 (C)窗体文件和标准模块文件 (D)类模块文件和工程文件 9. 在下列说法中，正确的是___(9) ___ (A)通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上 (B)在列表框中不能进行多项选择 (C) VB系统不能在列表框中自动实现将项目按字母顺序从大到小排列 (D)复选框的Value属性值为布尔型 10.当一个复选框被选中时，它的Value属性的值是___(10) ___ (A) 3 ( B) 2 (C) 1 (D) 0 11.计算结果为0的表达式是___(11) ____ (A)Int(2.4)+Int(-2.8) (B)Cint(2.4)+Cint(-2.8) (C)Fix(2.4)+Int(-2.8) (D)Fix(2.4)+Fix(-2.8) 12.可以惟一标识控件数组中的每一个控件属性的是___(12) ____ (A)Name (B)Caption (C)Index (D)Enabled 13. 下列变量名中，合法的变量名是___(13) ____。 (A)m24 (B)mn-k (C)24m (D)m+n 14. 若有语句”Dim Flag As Boolean”，则下面赋值语句正确的是___(14) _____。 (A) Flag ="True" (B) Flag='True' (C)Flag=Ture (D)Flag=True 15. 下列叙述不正确的是___(15) _____。 (A)InputBox函数返回值为字符型 (B)MsgBox函数返回值为所单击按钮的键值 (C) MsgBox语句没有返回值 (D) MsgBox语句返回值为所单击按钮的键值 16. 若要在Text1的光标(焦点)移动到其它控件时进行合法性判断，则可使用__(16) __事件来实 现。 (A) Refresh (B) SetFocus (C) LostFocus (D) GotFocus 17.一般情况下，控件的大小是由___(17) ___属性确定的 (A) Width和Height (B) Top和Left (C) Width和Left (D) Top和Width 18．以下能判断是否到达文件尾的函数是__(18) ____ (A)BOF (B) LOC (C)LOF (D)EOF
二级VB模拟试题1-1
二级VB模拟试题(1-1) 一、填空题（每空１分，共20分） １、ＶＢ是一种面向_____的可视化程序设计语言，采取了_____的编程机制。 ２、ＶＢ的对象主要分为_____和_____两大类。 ３、若要将窗体Form1隐藏起来，可使用方法_____；若要将窗体Form1显示出来，可使用方法_____来实现。 ４、在ＶＢ集成开发环境中，运行应用程序的方法有三种：一是_____；二是_____；三是_____。 ５、在ＶＢ中若要让某对对象获取焦点，则可通过_____方法来实现。 ６、ＶＢ提供的_____属性，用来控制对象是否可用，当属性值为_____时，表示对象可用，当属性值为_____时，表示对象不可用。 ７、ＶＢ提供的_____属性，用来控制对象是否可见，当属性值为_____时，表示对象可见，当属性值为_____时，表示对象不可见。 ８、在ＶＢ中，用来描述对象外部特征的量称之为对象的_____。 ９、为使某窗口中的命令按钮“取消(C)”具有如下特性：按“Alt＋C”键或按“ESC”键，均可代替用鼠标单击该按钮的操作，应设置该按钮的Caption属性值为_____，并且设置其_____属性值为_____。 二、选择题（每题２分，共40分） １、用于从字符串左边截取字符的函数是（） Ａ、Ltrim( )Ｂ、Trim( )Ｃ、Left( )Ｄ、Instr( ) ２、可获得当前系统日期的函数是（） Ａ、Date( )Ｂ、Time( )Ｃ、IsDate( )Ｄ、Year( ) ３、退出For循环可使用的语句为（） Ａ、Exit ForＢ、Exit DoＣ、End ForＤ、End Do ４、窗体的标题栏显示内容由窗体对象的（）属性决定。 Ａ、BackColorＢ、BackStyleＣ、TextＤ、Caption ５、程序运行时，若要通过回车键调用某命令按钮的Click事件过程，则可设置该命令按钮的（）属性值为True来实现。 Ａ、valueＢ、EnabledＣ、DefaultＤ、Cancel ６、标签框所显示的内容，由（）属性值决定。 Ａ、TextＢ、(名称)Ｃ、CaptionＤ、Alignment ７、文本框的（）属性用于设置或返回文本框中的文本内容。 Ａ、TextＢ、(名称)Ｃ、CaptionＤ、Name ８、计时器控件的（）属性用于设置Timer事件发生的时间间隔。 Ａ、StretchＢ、IntervalＣ、valueＤ、Length ９、滚动条的（）属性用于返回或设置滚动条的当前值。 Ａ、ＶalueＢ、MaxＣ、MinＤ、Data 10、若要向列表框添加列表项，可使用的方法是（） Ａ、AddＢ、RemoveＣ、ClearＤ、AddItem 11、图像框或图片框中显示的图形文件，由它们的（）性性值决定。 Ａ、DownPictureＢ、PictureＣ、ImageＤ、Icon 12、以下不属于键盘事件的是（） Ａ、KeyDownＢ、KeyUpＣ、UnloadＤ、KeyPress
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上机实验题
(截止目前所有上机实验及代码。不用画窗体界面，只写题目和代码。填写实验报告也是复习的过程，请务必认真！ ．．．．．．) 实验一：第二章 ⒈在名称为Form1的窗体上画一个标签，其名称为Label1，标题为“等级考试”，BorderStyle属性值为1，可以根据标题自动调整大小；然后再画一个命令按钮，其名称和标题均为Command1，编写适当的事件过程。程序运行后，界面如图所示，此时如果单击命令按钮，则标签消失，同时用标签的标题作为命令按钮的标题。 Private sub command1_click() Label1.visible=false Command1.caption=label1.caption End sub ⒉在名称为Form1的窗体上画一个标签，其名称为Label1，标题为“输入信息”、一个文本框， 名称为Text1，Text属性为空白、一个命令按钮，名称为Command1，标题为“显示”。然后编写命令按钮的Click事件过程。程序运行后，在文本框输入“计算机等级考试”，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框的内容。要求程序中不得使用任何变量。 上机代码：Private sub command1_click() Label1.visible=false Text1.visible=false Print text1.text End sub ⒊在名称为Form1的窗体上画两个文本框，名称分别为Text1和Text2，再画两个命令按钮，名 称分别为Command1和Command2，标题分别为“复制”和“删除”。程序运行时，在Text1中输入一串字符，并用鼠标拖曳的方法选择几个字符，然后分别单击“复制”按钮，则被选中的字符被复制到Text2中；若单击“删除”按钮，则被选中的字符从Text1中被删除。请编写两个命令按钮的Click过程完成上述功能。
VB期末考试模拟题1讲解
【HNCE网上考试系统 v9.6】本套软件使用权属于：郑州大学 考试课程: 考试时间:100分钟考场:第一考场考试日期:2013.05.24 考号：姓名：剩余时间：99:42 保存交卷退出帮助 A B C D A B C D A B C D A B C D A B C D A B C D
A B C D A 命令 B 命令 C 命令 D 命令 A B C D A B C D A B C D A B C D A B
C D A B C D A B C D A 模块文件 B 件的属性 C 源文件 D 包含多个工程文件及属于该工程的其他文件 A 该窗体文件并没有被删除 B 窗体文件被删除 C 程仍然包含这个窗体 D A B C D A B C D
A B C D A B C D A可以实现交换两个变量值，而S2不能 B 个变量值，而S1不能 C 现交换两个变量值 D 现交换两个变量值 A B C D A B C D A 过程调用后均不保存值 B 有变量都是Static型的变量 C 所有变量都是Private型的变量 D 所有变量都是非全局Public A 用Dim语句或Static语句声明的变量 B 明它的过程
C Static语句声明的 D 程执行完毕后就被释放了 A B C D A B C D A B C D A B C D 声明段 A B C D A B C D A B
C D A B C D A B C D A B C D A 同 B Sub过程不可以 C 值，而Function过程能通过过程名返回值 D 或直接使用过程名调用，而 A工程中可以有多个窗体，但最多只能有一个窗体作为启动窗体 B 声明Public类型的变量来传递数据 C 大化、最小化或正常（保持设计时大小）等三种状态 D A 菜单 B 过程代码都放在窗体文件中 C 名必须相同 D 是设计阶段时显示的位置
VB模拟试题1
一、单选题（30分，每小题1分） ◆一个完整计算机系统应包括___(1)____。 (A)主机、键盘、和显示器(B)硬件系统和软件系统 (C)主机和其他外部设备(D) 系统软件和应用软件 ◆打印机属于计算机部件中的___(2)___。 (A) 输出设备 (B) 输入设备 (C) 存储设备 (D) 缓冲设备 ◆下列表示存储容量的数据中，____(3)____是最大的。 (A)20480 KB (B) 1.44 MB (C) 1 GB (D) Byte ◆在计算机内部能够直接执行的程序语言是___(4)____。 (A)数据库语言 (B)高级语言(C)机器语言(D)汇编语言 ◆下列叙述正确的是___(5)____。 (A)程序设计就是编制程序 (B)程序的测试必须由程序员自己去完成 (C)程序经调试改错后还应进行再测试 (D) 程序经调试改错后不必进行再测试 ◆以下叙述中错误的是___(6)___。 (A)Visual Basic 是事件驱动型可视化编程工具 (B)Visual Basic应用程序不具有明显的开始和结束语句 (X) (C)Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性 (D)Visual Basic中控件的某些属性只能在运行时设置 ◆以下不属于VB工作模式的是___(7)___模式。 (A) 编译 (B) 设计 (C) 运行 (D) 中断 ◆以下语句的输出结果是___(8)___ 。 Print Format $(32548.5,“000,000.00”) (A) 32548.5 (B) 32,548.5 (C) 032,548.50 (D) 32,548.50 ◆若要使某可见控件获得焦点，则可使用___(9)_____方法来实现。 (A) Refresh (B) SetFocus(获得焦点) (C) Value (D) GotFocus（已经获得焦点） ◆在下列说法中，正确的是___(10)___。 (A)通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上 (B)在列表框中不能进行多项选择 (C)VB系统不能在列表框中自动实现将项目按字母顺序从大到小排列 (D)复选框的Value属性值为布尔型（0或1形） ◆执行以下程序段,输出的结果为___(11)___。 a$="abbacddcba" For i=6 To 2 Step -2 x=Mid(a,i,i): y=Left(a,i)
(完整版)VB上机练习题
1.新建工程，界面如下图，将窗体名称改为f1，标题属性为“我的第一个工程”， Text2允许多行，三个命令按钮名称分别为C1、C2、C3，单击C1按钮将Text1的字体改为黑体，Text2的字体改为隶书。 单击C2按钮将Text1的文字颜色改为红色，Text2的背景颜色改为蓝色。单击C3按钮结束程序运行。 Private Sub Command1_Click() Text1.Font = 黑体 End Sub Private Sub Command2_Click() Text1.ForeColor = vbRed Text2.ForeColor = vbBlue End Sub Private Sub Command3_Click() End End Sub 2.新建工程，界面如上图，运行时，鼠标在“改变窗体颜色”按钮上按下时使窗体背景色变为红色，鼠标抬起时使窗体背景色变为绿色。鼠标在窗体空白地方按下时使Text1的内容为“在窗体上按下了鼠标”，鼠标抬起时使Text1的内容为“在窗体上抬起了鼠标”。 Private Sub Command1_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) Form1.BackColor = vbRed End Sub Private Sub Command1_MouseUp (Button As Integer, Shift As Integer, X As Single, Y As Single) Form1.BackColor = vbGreen End Sub Private Sub Form _MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) Text1.Text = "在窗体上按下了鼠标" End Sub Private Sub Form _MouseUp (Button As Integer, Shift As Integer, X As Single, Y As Single) Text1.Text = "在窗体上抬起了鼠标" End Sub 3.新建工程，界面如下图，运行时，在文本框Text1中输入内容的同时，在文本框Text2、Text3中显示相同的内容，但字体不同（字体自定）。 Private Sub Command1_Click() Text1.Text = "" Text2 Text1
VB模拟试题
VB模拟试题 一、选择题（15分，每题1分） 1、VB集成开发环境共有三种模式，以下 __________ 三种模式是正确？ (A) 设计、运行、退出 (B)运行、中断、退出 (C) 设计、运行、中断 (D)运行、中断、结束 2、以下叙述中错误的是__________ (A) 事件过程是响应特定事件的一段程序 (B) 不同的对象可以具有相同名称的方法 (C) 对象的方法是执行指定操作的过程 (D) 对象事件的名称可以由编程者指定 3、如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是 __________ (A) 如果工程中含有Sub Main过程，则程序一定首先执行该过程 (B) 不能把含有Sub Main过程的标准模块设置为启动模块 (C) 用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体 (D) 任何时刻最多只有一个窗体是活动窗体 4、下列说法哪种正确？每次调用过程时，__________ (A) Dim声明的变量可保持原值；Static声明的变量会重新初始化。 (B) Static声明的变量可保持原值；Dim声明的变量会重新初始化。 (C) Dim、Static声明的变量都可以保持原来的值。 (D) Dim、Static声明的变量都会重新初始化。 5、表达式 5 Mod 3+3\5*2的值是__________ (A) 0 (B) 2 (C) 4 (D) 6 6、从字符串N的第5个字符开始，获取4个字符，应使用 _________。 (A) Len(N,5,4) (B) Mid(N,5,4) (C) Right(N,5,4) (D) Rtrim(N,5,4) 7、InputBox函数返回值的类型为 _________。 (A) 数值 (B) 字符串 (C) 变体 (D) 数值或字符串（视输入的数据而定） 8、语句Dim A(3, -2 to 2, 5)声明的数组A包含_________个数组元素。 (A) 120 (B) 75 (C) 60 (D) 13
VB上机题汇总
以题号保存，如第1题取名：1.Frm 、1.Vbp 。 1、 编制事件过程Command1_Click ，执行该过程时调用InputBox 函数输入x ，按下式计算y 并以标签 控件Label1显示y 值。 ?????>+-<=<=-+?-<-+=5 log 5552 sin 51 23102x x x x x x x x x y x 2、 编程运行时单击命令按钮，输入行数n(n<10)然后在窗体上输出n 层数字金字塔。 3、 编程求f=1-1/(2*3)+1/(3*4)-1/(4*5)+……+1/(19*20)。在窗体上输出结果，运行效果如下图所示。。 4、 计算下式的和，变量x 与n 的数值用输入对话框输入。在窗体上输出结果，运行效果如下图所示。 )! 1(...!4!3!23 2 +++++=n x x x x s n 5、 建立一个5行5列二维数组，要求对角线为1，其余元素为0。运行结果如图所示。 6、 建立一个5行5列二维数组，要求右上三角元素（含对角线）为1，其余元素为0。 7、 编制程序，用随机函数产生20个两位数的整数，存于4行5列的二维数组中，将数组按矩阵形式输 出到窗体，并求出其最大元素及最大元素的行、列坐标。 8、 编制通用函数过程(Sum )，计算1+2+……+N 的值。在窗体的Click 事件中调用该函数。
9、编制通用函数过程(Fact)，计算N！的值。在窗体的Click事件中调用该函数。 10、编制通用函数过程(Prime)，用于判断1个整数是否为素数，若是则显示true，若不是则显示 false。在窗体的Click事件中调用该函数。 11、编制通用函数过程(Odd)。用于判断一个整数的奇偶性。在窗体的Click事件中调用该函数。 12、编制通用函数过程（Average），计算Double类型一维数组所有元素的平均值。在窗体的Click 事件中调用该函数。 13、编制通用Sub过程(Sort)，用选择法对一维数组按从大到小进行排序。在窗体的Click事件中 调用该函数。 14、编制函数过程(Sum)，用于计算1个整数的各位数字之和（如引用Sum(132)的结果是6，引用 Sum(-23)的结果是5，等等）。在窗体的Click事件中调用该函数。
VB模拟试题2
一、单选题（30分，每小题1分） 1、（C ）字节称为一个MB。 （A）1024 （B）1000K （C）1024*1024 （D）10000K 2、计算机硬件系统的五大部件是（A ）。 （A）CPU、内存储器、输入设备、输出设备、外存储器 （B）运算器、控制器、存储器、输出设备、输入设备 （C）CPU、总线、存储器、外设、主板 （D）主机箱、显示器、音箱、鼠标、键盘 3、常用的输入设备有（A ）。 （A）键盘、鼠标、扫描仪（B）显示器、键盘、鼠标 （C）打印机、扫描仪、键盘（D）触摸屏、打印机、鼠标 4、计算机网络的主要作用是( D )。 (A) 数据处理(B) 信息传输与数据处理 (C) 文献查询(D) 资源共享与信息传输 5、二进制数1010等于十六进制数( C )。 (A) 10 (B) 11 (C) A (D) B 6、在VB中要强制显式声明变量，可在窗体模块或标准模块的声明段中加入语句( B )。 (A) Option Base 0 (B) Option Explicit (C) Option Base 1 (D) Option Compare 7、下列程序段的执行结果为( D )。 J1 = 10 J2 = 30 If J1 < J2 Then Print J2; Print J1 (A)10 (B)30 (C)10 30 (D)30 10 8、假设变量x1是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是（C ） (A) x1="False" (B) x1='False' (C) x1=False (D) x1=#False# 9、在运行阶段，要在文本框Text1获得焦点时选中文本框中所有内容，对应的事件过程是（B ）。 (A) Private Sub Text1_LostFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.text) End Sub (B) Private Sub Text1_GotFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.text) End Sub (C) Private Sub Text1_SetFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub (D) Private Sub Text1_Change() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub
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
(完整word版)vb期末模拟题(答案)
《https://www.360docs.net/doc/d511885375.html,程序设计课程》模拟题(A卷答案) 一、选择题 1.下列叙述中正确的是_____________。 A.数组是用户自定义的数据类型 B.数组元素在内存中的存放形式是连续的 C.数组在使用时可以采用隐式声明 D.数组的下界可以任意 答案 B 2.复选框的CheckState属性为__________时，表示复选框内有灰色的勾即不可选。 A.Unchecked B.Indeterminate C.Checked D.None 答案 B 3.删除列表框中第2项的项目，所使用的方法为______ 。 A.Items.RemoveAt B.Move C.Items.Clear D.Items.Remove 答案 A 4.要想从子过程调用后返回两个结果，下面子过程语句说明合法的是 __________。 A.Sub f1(ByVal n%,ByVal m%) B.Sub f1( ByRef n%,ByVal m%) C.Sub f1( ByRef n%, ByRef m%) D.Sub f1(ByVal n%, ByRef m%) 答案 C 5.下列各赋值语句，语法不正确的是（） A.iNumber = 15 B.sLength = x + y C.x+y = 5 https://www.360docs.net/doc/d511885375.html,bel1.Text = TimeOfDay 答案 C 6.在用通用对话框控件建立打开文件对话框时，在文件列表框只允许显示文本文件类型的文件，则Filter属性的正确设置是_________。 A.Text(.txt)||*.txt B.Text(.txt)(*.txt) C.文本文件|(.txt) D.Text(.txt)|*.txt 答案 D 7.以下程序输出的结果是___________ 。 Dim a() As Integer={1, 2, 3, 4, 5, 6, 7} For i =0 To Ubound (a) a(i) = a(i) * a(i) Next i MsgBox(a(i)) A.49 B.0 C.不确定 D.程序出错 答案 D 8.下列_____________方式声明的变量在每次调用该过程时其值不能保留。 A.在过程体中用Dim语句声明的变量 B.在标准模块中声明的变量 C.在过程外声明的变量 D.在过程体中用Static语句声明的变量 答案 A 9.在下列关于定时器的说法中，正确的是( )。 A.当Enabled属性为False时，不产生Tick事件 B.在程序运行时不可见的，这是因为Visible属性为False C.当Interval属性为0，则Tick事件不会发生
计算机一级VB上机理解练习知识题
2007—2008(2) VB上机练习题 1．设计一个数字钟表程序，界面如图所示。运行时单击窗体，显示当前的年月日星期及时间。 2．设计一个数学函数程序，界面如图所示。程序运行时，在文本框中输入任意数值，单击相应按钮标签中显示结果。文本框始终处于选中状态。 3．设计口令检测界面，口令自定，运行初始如第一幅图，若口令错，则如第二幅图；否则，将显示另一欢迎窗口，如第三幅图所示。在连续三次输入错误口令后，给出警告并结束运行。 4．设计一个程序，用户界面如下图所示。程序运行后，单击“计算”，求出应付款额；单击“清除”，清除所有文本框内容。
5．输入一个学生的学号和考试成绩，然后按如图格式在图片框中输出学号、考试成绩及评语，评语：90~100优秀；80~89良好；70~79中等；60~69及格；0~59不及格。 6．设计一个程序，用户界面如下图所示。程序运行后，单击Command1按钮，求出最大最小数。 7．设计一个100（随机函数产生）之内的四则运算题，界面如下。
8．设计一个窗体Forml，界面如右图所示。编写适当的 事件过程，程序运行后在第一个文本框中输入圆的半径， 单击“计算”按钮，分别在第二个和第三个文本框中显示 圆的面积和周长。 9．界面如下图所示。编写适当的事件过程，程序运行后在三个文本框中分别输入三角形的边长值，单击“判断并计算”按钮，判断它们是否能组成三角形，如果可以在Text4中显示三角形的面积，否则在Text4中显示“FALSE”。
10．某工程运行时，图片框中图可以任意。单击“隐藏图像”按钮（command2）界面如右图，单击“显示图像”按钮（command1）界面如左图，编写适当的事件过程。 11．在文本框T1中打印100~999之间的所有水仙花数。 （该数为各位数字的立方和。例如：153=1 3+5 3+3 3） 12．有一数列，它的头2个数为0、1，以后的每个数都是其前2个数之和。编程在文本框T1中输出所有这些数列，直到第30个数或最后一项等于1000为止，同时在另一文本框中输出它们的和。 13. 在窗体上画两个命令按钮分别求12+22+32+42+……+1002和1-3+5-7+…+(-1)n+1(2n-1)的累加和。并将结果输出到Label1和Label2中。 14．在窗体上画两个文本框，其名为Text1和Text2，内容为空白，再画一个命令按钮，名为C1，
VB模拟试题.doc
、单选题 ( 30分，每小题 1分) (A) 输出设备 (B) 输入设备 (C) 存储设备 (D) 缓冲设备 列表示存储容量的数据中， ____ (3) ___ 是最大的 是事件驱动型可视化编程工具 应用程序不具有明显的开始和结束语句 工具箱中的所有控件都具有宽度(Width )和高度(Height )属性 中控件的某些属性只能在运行时设置 (7)___ 模式。 运行 (D) 中断 (A) 32548.5 (B) 32,548.5 (C) 032,548.50 (D) 32,548.50 若要使某可见控件获得焦点，则可使用 ___(9) _____ 方法来实现。 (A) Refresh (B) SetFocus (C) Value (D) GotFocus 在下列说法中，正确的是 ___(10)___ 。 (A) 通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上 (B) 在列表框中不能进行多项选择 (C) VB 系统不能在列表框中自动实现将项目按字母顺序从大到小排列 (D) 复选框的 Value 属性值为布尔型 执行以下程序段 ,输出的结果为 ___(11)___。 a$="abbacddcba" 一个完整计算机系统应包括 (A) 主机、键盘、和显示器 (C) 主机和其他外部设备 打印机属于计算机部件中的 (1) ___ 。 (B) 硬件系统和软件系统 (D) 系统软件和应用软件 (2)___ 。 (A) 20480 KB (B) 1.44 MB 在计算机内部能够直接执行的程序语言是 (A) 数据库语言 (B) 高级语言 下列叙述正确的是 ___(5)_ (A) 程序设计就是编制程序 完成 (C) 程序经调试改错后还应进行再测试 以下叙述中错误的是 ___(6) (C) 1 GB (D)4865723 Byte ___(4) ___ 。 (C) 机器语言 (B) (D) 汇编语言 程序的测试必须由程序员自己去 (D) 程序经调试改错后不必进行再测试 (A)Visual Basic (B)Visual Basic (C)Visual Basic (D)Visual Basic 以下不属于VB 工作模式的是 (A) 编译 (B) 设计 (C) 以下语 句的输出结果是 Print Format $(32548.5, (8)___ 。 “000,000.00 ”)
VB实验--------所有实验题目
实验题目 总体要求：本学期的所有的实验题目，希望同学们按如下步骤认真做， （1）先画出处理界面（窗体）； （2）再给出处理步骤， （3）写出程序代码： 可参考下面的例题： 例如：设计程序，求1+2+3+...+N 的和值。 其处理过程是： （一）设计界面（在纸上画出界面，并注明各控件的名称）： （二）处理步骤： 单击命令按钮，按以下步骤处理 （1）定义3个变量：N ，s ，x ，分别用于存放：输入的数值，和值，控制循环 （2）将文本框1的值，提供给变量N ； （3）s=0（累加前，将变量s 初始化为0）； （4）X=1（设置循环的开始值） （5） 当X<=N 时 重复执行 S=s+x X=X+1 （5）在文本框2中显示和值S （三）编写有关的代码： Private Sub Command1_Click() Dim n%，s%，x% N=val(text1.text) S=0 X=1 Do while x<=n S=s+x X=x+1 Loop Text2=s End Sub 文本框1：TEXT1 文本框2：TEXT2 1：Command1 标签1：Label1 标签2：
实验一：用语言或流程图描述处理步骤(1次) 1.判定一个数X是否是偶数的处理步骤; 2.写出求5的阶乘的计算步骤; 3.写出求1+2+3+...... +100的计算过程; 4.写出计算1!+2！+3！+4！+......+20!的计算步骤; 5.写出求一元二次方程解的处理步骤; 6.给出将三个整数A,B,C按从小到大的顺序排列的处理步骤; 实验二：表达式及其运算的实现(1次) 1.设计一个程序，完成利用文本框输入任意两个数的乘法运算，并显示计算结果。 2.进一步完善程序，完成利用文本框输入任意两个数的加法、减法、乘法、除法运 算，并显示计算结果， 3.再进一步，改进，完成，利用随机函数，产生任意两个100到200之间的整数， 并完成两个数的加法、减法、乘法、除法运算，并显示计算结果。 4．求方程AX+B=0的解。 5．表达式： 2 3z y x x e x+ + + + 当输入x,y,z值求该表达式的值. 6．思考: 求方程AX2+BX+C=0 的解. 7．对于第4题,当提供A,B的值后,输出该式子 例如,当A=3,B=4, 输出:3X+4=0 实验三顺序程序设计(1次) 1．利用InputBox函数输入一个正实数，用Print方法在窗体上打印出其平方值、平方根、立方值,结果保留2位有效数字。 2．编写一个华氏温度与摄氏温度之间的转换程序，运行界面如图2-3-5所示。转换公式为：F＝9/5×C＋32及C＝5/9（F－32）；其中，F：华氏温度；C：摄氏温度。 3求方程AX+B=0的解。当提供A,B的值后,输出该式子 例如,当A=3,B=4, 输出:3X+4=0，并输出方程的解。
VB模拟试题三
模拟试题三 一、单选题 1. Visual Basic是一种面向对象的可视化程序设计语言，采取了 A 的编程机制。 (A) 事件驱动 (B) 按过程顺序执行 (C) 从主程序开始执行 (D) 按模块顺序执行 2. 若要使标签控件显示时不覆盖其背景内容，要对 D 属性进行设置。 (A) Backcolor (B) BorderStyle (C) Forecolor (D) Backstyle 3. 在Visual Basic中最基本的对象是 C ，它是应用程序的基石，是其他控件的容器。 (A) 文本框 (B) 命令按钮 (C) 窗体 (D) 标签 4. 要判断在文本框是否按下Enter键，应在文本框的 B 事件中判断。 (A) Change (B)KeyDown (C) Click (D)KeyPress 5. 数学表达式3≤x
VB期末考试上机题编程答案
VB期末考试上机题编程答案 1.新建一个工程，编写一个找出所有四位荣幸数显示在列表框中，并将荣幸数的个数显示在文本框中。所谓荣幸数是指凡前两位数字之和等于后两位数字之和的四位数。将原窗体文件和工程文件分别另存为为和，保存在D盘的VBTest文件夹中。如不按要求保存，造成文件无法上传，后果自负！ 详尽要求： 1、程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见； 2、单击“查找“按钮，则开始查找并在列表框中显示结果，并在文本框中显示荣幸数的个数； 3、单击“清除”按钮，则将列表框和文本框清空； 4、单击“退出”按钮，结束程序运行； 5、程序中应包含一个过程，用于判断一个数是否是荣幸数。 解：Private Sub Command1_Click() Dim i As Integer, a As Integer For i = 1000 To 9999 If k(i) Then i: a = a + 1 Next i = a End Sub Private Sub Command2_Click() = ““ End Sub Private Sub Command3_Click()
End End Sub Private Function k(n As Integer) As Integer Dim i As Integer, a As Integer, s1 As Integer, s2 As Integer Dim s As String s = CStr(n) For i = 1 To Len(s) / 2 s1 = s1 + Mid(s, i, 1) s2 = s2 + Mid(s, Len(s) + 1 - i, 1) Next i If s1 = s2 Then k = True End Function 2.新建一个工程，编写求某一自然数因子和的程序。要求通过文本框获取输入的自然数，计算后将所计算得到的因子和显示在另一文本框中。将原窗体文件和工程文件分别另存为为和，保存在D盘的VBTest文件夹中。如不按要求保存，造成文件无法上传，后果自负！ 详尽要求： 1、程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见； 2、单击“求和“按钮，则在文本框中显示计算得到的因子和； 3、单击“清除”按钮，则将文本框清空，焦点设置在第一个文本框； 4、单击“退出”按钮，结束程序运行；