VB程序练习资料

合集下载

VB编程题练习及答案

VB编程题练习及答案

4.编写程序生成一个二维数组A(5, 5),求两条对角线元素之和Option ExplicitPrivate Sub Command1_Click()Dim a(5, 5) As IntegerDim i As IntegerDim j As IntegerDim x As IntegerDim y As IntegerFor i = 0 To 5For j = 0 To 5a(i, j) = Int(100 * Rnd) '随机产生一个0~100的整数If i = j Then x = x + a(i, j)If i + j = 5 Then y = y + a(i, j)NextNextMsgBox "两条对角线元素之和分别是" & x & "," & yEnd Sub5.编写程序将文本框Text1中的大写字母放到文本框Text2中。

Dim n As IntegerFor i = 1 To Len(Text1)n = Asc(Mid(Text1.Text, i, 1))Text2 = Text2 & IIf(n >= 65 And n <= 90, Chr(n), "")Next6.随机生成20个两位正整数存放到Text1中,找出其中的偶数并以与找出相反的顺序存放到Text2中。

Private Sub Form_Load()RandomizeDim a(20), iText1 = ""Text2 = ""For i = 1 To 20a(i) = Int(Rnd * 90 + 10)Text1 = Text1 & a(i) & " "If a(i) Mod 2 = 0 ThenText2 = " " & a(i) & Text2End IfNextEnd Sub7.编写程序将窗体上文本框Text1中的字符串中的所有大写字母找出,并按逆输出到文本框Text2中。

vb练习题及答案

vb练习题及答案

vb练习题及答案VB(Visual Basic)是一种面向对象的编程语言,被广泛应用于软件开发中。

通过练习题的形式可以巩固和提升对VB语言的理解和应用能力。

本文将提供一些VB练习题及其答案,帮助读者巩固VB编程技巧。

题目一:计算器程序设计一个简单的计算器程序,要求能够进行基本的加、减、乘、除运算。

解答:在VB中创建一个新的Windows窗体应用程序项目,命名为“Calculator”。

首先,在窗体上添加一些按钮来表示数字和运算符。

然后,添加一个用于显示运算结果的文本框控件。

接下来,为数字按钮和运算符按钮分别添加点击事件处理程序。

在点击数字按钮时,将按钮对应的数字追加到文本框中。

在点击运算符按钮时,根据按钮的内容判断并执行相应的运算。

最后,通过运用VB的计算表达式功能和控件之间的交互,实现基本的加减乘除运算。

题目二:学生成绩管理设计一个程序用于管理学生成绩,要求能够输入学生信息、查询学生成绩、计算学生平均成绩等操作。

解答:在VB中创建一个新的Windows窗体应用程序项目,命名为“StudentGrade”。

首先,设计一个学生类(Student),包括学号、姓名、各科目成绩等属性。

然后,创建一个用于存储学生信息的集合(如数组或集合类)。

接下来,在窗体上添加文本框、按钮等控件,用于输入学生信息和进行相关操作。

通过按钮点击事件处理程序,实现以下功能:1.输入学生信息:获取文本框中的学生信息,并创建一个新的学生对象,将其添加到学生信息集合中。

2.查询学生成绩:根据学生学号或姓名等关键信息,在学生信息集合中查找对应学生,并显示其成绩信息。

3.计算学生平均成绩:遍历学生信息集合,计算每个学生的平均成绩,并显示在窗体上。

通过以上步骤,可以实现一个简单的学生成绩管理系统。

题目三:数据排序设计一个程序用于对一组数字进行排序,要求能够实现升序和降序排列。

解答:在VB中创建一个新的Windows窗体应用程序项目,命名为“DataSorting”。

VB程序练习

VB程序练习

一、VB基本操作和设计1.设计窗体:输入圆的半径,求出圆的面积和周长。

r = Val(Text1.Text)Text2.Text = 3.14 * r * rText3.Text = 3.14 * r * 22.设计窗体:依次输入两个数,进行四则运算。

x = Val(Text4.Text) y = Val(Text5.Text)Text6.Text = x -+y/Text6.Text = x - yText6.Text = x * y/Text6.Text = x / y3.设计窗体:当单击窗体时,体现一个圆。

单击“同圆”时出现两个同心圆,单击“连环圆”时出现两个连环圆;单击“清屏”时窗体清屏。

(1)同圆 Form1.Circle (2000, 2000), 2000Form1.Circle (2000, 2000), 1000(2)两圆相接 Form1.Circle (3000, 1000), 1000Form1.Circle (1000, 1000), 1000(3)清屏 Cls注:()中第一个数据是X(即横坐标),括号后是圆的半径。

将form1的属性load 改为click。

4.设计窗体:单击窗体时在标签中出现为30号、红色、楷体、背景绿色的“欢迎学习VB设计”字样。

Label1.caption=”欢迎学习VB设计”.backcolor=vbgreen backcolor:背景色.fontsize=30 fontsize:字体大小.fontcolor=vbred fontcolor:字体颜色5.设计窗体:依次输入两个数,单击“最大值”时显示最大值,单击“由小到大”时按从小到大显示。

x=val(text1.text) y=val(txt2.text)①最大值:if x>y print x Else print y最小值是相同设计,即将“>”改为“<”。

由大到小是相同的设计,即将打印条件交换。

VB程序习题集(附答案)

VB程序习题集(附答案)

VB简介1、在以下有关对象属性的叙述中,不正确的是___________。

A、一个对象的属性可分为外观、行为若干类B、不同属性可能具有不同的数据类型C、一个对象的所有属性都可在属性窗口的列表中进行设置D、属性窗口中的属性列表既可按字母排序也可按类别排序2、Visual Basic中最基本的对象是___________,它是应用程序的基石,也是其他控件的容器。

A、文本框B、命令按钮C、窗体D、标签3、有程序代码“Text1.Text="Visual Basic"”,其中的Text1、Text和“Visual Basic”分别代表___________。

A、对象、值、属性B、对象、方法、属性C、对象、属性、值D、属性、对象、值4、用窗体的___________属性来设置窗体的标题。

A、CaptionB、StyleC、TextD、Name5、窗体上有一个文本框控件Text1,假设已存在三个整型变量a、b、c,且变量a的值为5,变量b的值为7,变量c的值为12。

以下的___________语句可以使文本框内显示的内容为:5+7=12。

A、Text1.Text = a + b + cB、Text1.Text = "a+b=c"C、Text1 = a & "+" & b & "=" & cD、Text1 = "a" & "+" & "b" & "=" & "c"6、如果在窗体上有命令按钮OK,在代码编辑窗口有与之对应的Cmd_Click()事件,则命令按钮的名称属性和Caption属性分别为_________。

A、OK、CmdB、Cmd、OKC、CmdOK、OKD、OK、CmdOK7、窗体Form1的名称属性是frm,它的Load事件过程名为___________。

vb程序习题答案

vb程序习题答案

vb程序习题答案VB程序习题答案在学习Visual Basic(VB)编程的过程中,做习题是非常重要的一部分。

通过做习题,我们可以巩固所学的知识,提高编程能力。

下面是一些常见的VB程序习题及其答案。

1. 编写一个程序,计算1到100的所有偶数的和。

答案:```vbDim sum As Integersum = 0For i = 1 To 100If i Mod 2 = 0 Thensum = sum + iEnd IfNextMsgBox("1到100的所有偶数的和为:" & sum)```2. 编写一个程序,找出一个数组中的最大值和最小值。

答案:```vbDim arr() As Integer = {5, 8, 3, 9, 2}Dim max As Integer = arr(0)Dim min As Integer = arr(0)For Each num In arrIf num > max Thenmax = numEnd IfIf num < min Thenmin = numEnd IfNextMsgBox("数组中的最大值为:" & max & ",最小值为:" & min)```3. 编写一个程序,将一个字符串反转。

答案:```vbDim str As String = "Hello, World!"Dim reversedStr As String = ""For i = str.Length - 1 To 0 Step -1reversedStr = reversedStr & str(i)NextMsgBox("反转后的字符串为:" & reversedStr)```通过做这些习题,我们可以加深对VB编程语言的理解,提高编程能力。

vb程序设计试题及答案

vb程序设计试题及答案

vb程序设计试题及答案一、选择题(每题2分,共20分)1. 在VB中,下列哪个选项是正确的数据类型?A. IntegerB. DoubleC. StringD. All of the above答案:D2. VB中用于声明变量的关键字是?A. DimB. DeclareC. SetD. All of the above答案:A3. 在VB中,下列哪个选项是正确的循环语句?A. ForB. DoC. WhileD. All of the above答案:D4. VB中用于打开文件的函数是?A. OpenB. CloseC. WriteD. Read答案:A5. 在VB中,下列哪个选项是正确的条件语句?A. If...ThenB. Select CaseC. Do WhileD. All of the above答案:A6. VB中用于创建新窗体的语句是?A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案:A7. VB中用于声明常量的关键字是?A. ConstB. DimC. StaticD. Option答案:A8. 在VB中,下列哪个选项是正确的数组声明?A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案:A9. VB中用于结束程序的语句是?A. EndB. ExitC. CloseD. All of the above答案:B10. VB中用于捕获异常的语句是?A. Try...CatchB. On ErrorC. CatchD. All of the above答案:B二、填空题(每题2分,共20分)1. 在VB中,声明一个名为myVar的变量,其类型为字符串,应该使用语句________。

答案:Dim myVar As String2. VB中,用于定义一个名为myFunction的函数,返回值为整数,应该使用语句________。

vb练习题及答案

vb练习题及答案

vb练习题及答案VB练习题及答案VB(Visual Basic)是一种广泛应用于Windows操作系统的编程语言,它以其简单易学的特点受到了许多初学者和专业开发者的青睐。

为了帮助大家更好地掌握VB编程,下面将提供一些VB练习题及其答案,希望能对大家有所帮助。

练习题一:计算器程序编写一个VB程序,实现一个简单的计算器功能。

要求用户输入两个数字和一个操作符(+、-、*、/),然后根据操作符进行相应的计算,并输出结果。

解答:```vbPrivate Sub btnCalculate_Click(sender As Object, e As EventArgs) Handles btnCalculate.ClickDim num1 As Double = CDbl(txtNum1.Text)Dim num2 As Double = CDbl(txtNum2.Text)Dim operator As String = cmbOperator.SelectedItem.ToString()Dim result As DoubleSelect Case operatorCase "+"result = num1 + num2Case "-"result = num1 - num2Case "*"result = num1 * num2Case "/"result = num1 / num2End SelectlblResult.Text = "Result: " & result.ToString()End Sub```练习题二:学生成绩管理系统编写一个VB程序,实现一个简单的学生成绩管理系统。

要求用户输入学生的姓名和成绩,然后将其保存到数组中。

用户可以通过输入姓名来查询学生的成绩。

解答:```vbPrivate Structure StudentPublic Name As StringPublic Score As DoubleEnd StructurePrivate students() As StudentPrivate Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.ClickDim newStudent As Student = txtName.TextnewStudent.Score = CDbl(txtScore.Text)ReDim Preserve students(students.Length)students(students.Length - 1) = newStudenttxtName.Text = ""txtScore.Text = ""End SubPrivate Sub btnSearch_Click(sender As Object, e As EventArgs) Handles btnSearch.ClickDim searchName As String = txtSearchName.TextDim found As Boolean = FalseFor Each student As Student In studentsIf = searchName ThenlblSearchResult.Text = "Score: " & student.Score.ToString()found = TrueExit ForEnd IfNextIf Not found ThenlblSearchResult.Text = "Student not found."End IfEnd Sub```练习题三:简单的文本编辑器编写一个VB程序,实现一个简单的文本编辑器功能。

VB程序设计习题集

VB程序设计习题集

VB程序设计习题集VB程序设计习题集目录1·简介1·1 什么是 VB 程序设计1·2 学习 VB 程序设计的重要性2·VB 程序设计基础2·1 VB 的开发环境2·2 VB 的基本语法2·3 变量与数据类型2·4 运算符2·5 控制流程2·5·1 条件语句2·5·2 循环语句3·VB 程序设计进阶3·1 函数与过程3·2 数组与集合3·3 字符串处理3·4 文件操作3·5 错误处理与调试4·VB 程序设计实践4·1 用户界面设计4·2 数据库操作4·3 网络通信4·4 图形处理4·5 多媒体应用5·附录5·1 示例代码5·2 常用工具5·3 参考资料1·简介1·1 什么是 VB 程序设计VB(Visual Basic)是一种基于事件驱动的编程语言,它可以轻松创建 Windows 应用程序和图形用户界面。

VB 程序设计是利用VB 语言进行软件开发的过程,它广泛应用于商业软件、数据库应用、游戏开发等领域。

1·2 学习 VB 程序设计的重要性学习 VB 程序设计能够帮助您掌握快速开发 Windows 应用程序的技能。

VB 是一种易学易用的编程语言,适合初学者入门,并具有良好的图形用户界面设计能力。

掌握 VB 程序设计不仅可以提高开发效率,还能够加强对计算机科学基础的理解。

2·VB 程序设计基础2·1 VB 的开发环境VB 有多个版本,建议使用最新的 Visual Studio 等集成开发环境进行开发。

Visual Studio 提供了丰富的工具和功能,使得 VB 程序的开发更加便捷和高效。

VB程序设计复习资料

VB程序设计复习资料

VB程序设计复习资料一、判断题(每题 1 分,共10 分)()1.由Visual Basic语言编写的应用程序有解释和编译两种执行方式。

()2.文本框控件的MaxLength属性值为0时,在文本框内不可以输入任何字符。

()3. 要使输入文本框的字符始终显示“#”,则应修改其PasswordChar属性为“#”。

()4.在一个窗体中不能使用Unload来卸载本窗体,即一个窗体只能由其它窗体卸载。

()5. VB 的Double类型数据,可以精确表示其数值范围内的所有实数。

()6.在图片框中添加的控件,其Top和Left属性值是相对图片框而言的,与窗体无关。

()7. 命令按钮不但能响应单击事件,而且还能响应双击事件。

()8. 在自定义函数过程中,函数名必须被赋值。

()9. 文本框控件只能响应KeyPress、KeyDown、KeyUp、Change 事件。

()10.如果一个菜单项的Visible属性为False,则它的子菜单也会显示。

二、单选题(每题 2 分,共20 分)()11. 要改变控件的高度,应修改控件的___ 属性。

A、TopB、LeftC、HeightD、Width ()12. VB 算术运算符乘或除、整除、求余的优先级,从高到低依次为。

A、乘或除、求余、整除C、整除、求余、乘或除B、乘或除、整除、求余D、整除、乘或除、求余C、LeftD、NameD、m\\n*n=m()13.下列哪个属性用来表示标签(Label)的内容和窗体(Form)的标题。

A、Caption B、Text()14.判断整型变量m能否被n整除的VB表达式为。

A、n Mod m=0B、m/n*n=mC、m Mod n()15.选中复选框控件时,Value属性的值为。

A、TrueB、FalseC、0D、1()16.在窗体Forml的一个事件过程中,使用来清除窗体上所绘制的图形的方法是不正确的。

A、Form1.Cls B、Form.Cls C、Me.CLS D、Cls ( )17. 设计动画时通常用时钟控件____________ 属性来控制动画速度。

vb练习题(有答案)(打印)

vb练习题(有答案)(打印)

《大学Visaul Basic程序设计》复习题第一章Visual Basic程序设计概述第一题:是非题(共10分,每项1分)1. VB6.0只能运行在Windows 2000下,不能运行在Windows 98下。

13A.对B.错√2. 用户控件和系统控件都可以加载到工具箱上,并且永久保留。

4A.对B.错√第二题、单选题(共45分,每项1.5分)1. VB中的工具栏可以从______菜单上的“工具栏”命令中移进或移出。

15A.工具B.编辑C.视图√D.调试2. 在VB的集成环境中创建VB应用程序时,除了工具箱窗口、窗体设计窗口、属性窗口外,必不可少的窗口是______。

2A.窗体布局窗口B.立即窗口C.代码窗口√D.监视窗口第二章VB的编程机制第一题:是非题(共10分,每项1分)1. 在事件驱动的应用程序中,代码是按照预定的路径执行的。

15A.对B.错√2. 标签控件即可以用来显示用户不能编辑和修改的文本,也可以用来编辑和修改文本。

9A.对B.错√3. 每一个控件实质上都是一个微型程序。

2A.对√B.错4. 窗体上的控件同样可以借助于剪贴板进行剪切、复制和粘贴。

A.对√B.错第二题、单选题(共45分,每项1.5分)1. 文本框没有_____属性。

21A.EnabledB.VisibleC.BackColorD.Caption√2. 文本框(Text1)中有选定的文本,执行Text1.SelText=”Hello”的结果是___。

9A.“Hello”将替换掉原来选定的文本√B.“Hello”将插入到原来选定的文本之前C.Text1.SelLength为5D.文本框中只有“Hello”3. 要判断“命令按钮”是否被鼠标单击,应在“命令按钮”的______事件中判断。

3A.ChangB.KeyDownC.Click√D.KeyPress4. 如果文本框的Enabled属性设为False,则___。

6A.文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上B.文本框的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容√C.文本框的文本将变成灰色,用户仍然能改变文本框中的内容D.文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容第三题、简单程序(共15分,每项1.5分)1. 以下程序的输出结果是______。

VB程序设计题库(全)

VB程序设计题库(全)

程序设计第一题、题目:(事件)单击窗体(响应)求50以内所有偶数的和,并在窗体上输出来。

将结果存入变量S中。

代码:Dim I As IntegerFor i = 2 To 50If (i Mod 2)=0 ThenS=s+iEnd IfNextPrint (CStr(s))第二题题目:(事件)双击窗体(响应)求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中代码:Dim i,j As IntegerDim k As Longk=1s=0For i =1To 10For j=1 To ik=k*jNexts=s+kk=1NextPrint(CStr(s))第三题题目:(事件)单击窗体(响应)求100以内偶数的和,并将结果输出在窗体上。

将结果存入变量SUM中代码:Dim i As IntegerFor i =1 To 100If i Mod 2 =0 ThenSum=sum+iEnd IfNextPrint sum第四题题目:(事件)单击窗体(响应)编写程序求10*11*12+11*12*13+….+15*16*17的结果并将结果输出到窗体上。

将结果存入变量M中。

代码:Dim i,j As IntegerDim s As LongFor i =10 To 15s=1For j = i To i +2s=s*jNextm=m+sNextPrint (CStr(m))第五题题目:(事件)双击窗体(响应)求100以内奇数的和,并将结果输出在窗体上。

将结果存入变量SUM中。

代码:Dim i As IntegerFor i=1 To 100If i Mod 2 = 1 Thensum = sum + iEnd IfNextPrint sum第六题题目:(事件)单击窗体(响应)已知S=1+1/4+1/9+1/16+1/25+…+1/100,结果输出在窗体上代码:Dim s As SingleFor i=1 To 10a=i*iSum =1/a + SumNextPrint Sum第七题题目:(事件)双击窗体(响应)求1+1*2+1*2*3+....+1*2*3*. (10)并将结果存到变量S中代码:Dim s As Longj=1For i = 1 To 10j= j*iSum = Sum + jNextPrint Sum第八题题目:(事件)单击窗体(响应)求1—1/2+1/3—1/4+….+1/99—1/100的值。

vb练习题及答案

vb练习题及答案

vb练习题及答案VB练习题及答案一、选择题1. 在VB中,以下哪个是正确的数据类型?A. IntegerB. IntC. Both A and BD. None of the above答案:C2. VB中,哪个关键字用于声明变量?A. DimB. DeclareC. DefineD. Set答案:A3. 在VB中,以下哪个是正确的循环结构?A. ForB. WhileC. RepeatD. All of the above答案:D4. VB中,以下哪个是正确的条件语句?A. IfB. SwitchC. CaseD. A and B only答案:A5. 在VB中,以下哪个是正确的数组声明方式?A. Dim myArray(5) As IntegerB. Dim myArray As Integer(5)C. Both A and BD. None of the above答案:A二、填空题1. 在VB中,使用________关键字可以定义一个类。

答案:Class2. VB中,使用________方法可以为控件添加事件处理程序。

答案:AddHandler3. 在VB中,________方法用于结束程序的执行。

答案:End4. VB中,________属性用于获取或设置一个控件的文本。

答案:Text5. 在VB中,________方法用于打开一个文件。

答案:Open三、简答题1. 请简述VB中的事件和事件处理程序的概念。

答案:在VB中,事件是用户或程序触发的特定动作,如按钮点击或键盘敲击。

事件处理程序是一个过程,当特定的事件发生时,会被自动调用以响应该事件。

2. 描述VB中如何使用For循环。

答案:在VB中,For循环用于重复执行一段代码直到满足特定条件。

基本语法是:```For counter = start To end [Step increment]' 循环体Next [counter]```3. 解释VB中什么是继承,并给出一个简单的示例。

《VB程序设计》综合复习资料习题

《VB程序设计》综合复习资料习题

《VB程序设计》综合复习资料第一章Visual Basic程序设计概述一、填空题1、Visual Basic是一种面向___对象_______的可视化程序设计语言,采取了____事件驱动______的编程机制。

2、在VB中工程文件的扩展名是___vbp_________,窗体文件的扩展名是_____frm_______,标准模块文件的扩展名是_____bas_______。

3、执行“工程”菜单下的____部件______命令,可选择并添加ActiveX控件。

控件。

4、Visual Basic 6.0用于开发___windows______环境下的应用程序。

环境下的应用程序。

二、选择题1、下面不是VB工作模式的是(C )A.设计模式.汇编模式 D.中断模式.中断模式.运行模式 C.汇编模式.设计模式 B.运行模式2、可视化编程的最大优点是(C )A.具有标准工具箱.具有标准工具箱B.一个工程文件由若干个窗体文件组成.一个工程文件由若干个窗体文件组成C.不需要编写大量代码来描述图形对象.不需要编写大量代码来描述图形对象D.所见即所得.所见即所得3、下列不能打开属性窗口的操作是(C )A.执行“视图”菜单中的“属性窗口”命令.执行“视图”菜单中的“属性窗口”命令B.按F4键C.按Ctrl+T D.单击工具栏上的“属性窗口”按钮.单击工具栏上的“属性窗口”按钮4、下列可以打开立即窗口的操作是(D )A.Ctrl+D B.Ctrl+E C.Ctrl+F D.Ctrl+G 5、Visual Basic的编程机制是(D )A.可视化.面向图形 D.事件驱动.事件驱动.面向对象 C.面向图形.可视化 B.面向对象三、简答题1、代码窗口主要包括哪几部分?2、在工程资源管理器窗口中,主要列出了哪三类文件?3、窗体布局窗口的主要用途是什么?4、VB的基本特点是什么?5、怎样理解可视化设计?6、怎要理解事件驱动编程?、怎要理解事件驱动编程?第二章简单的VB程序设计一、填空题1、设置是否可以用Tab键来选取命令按钮,应该用___tabstop___________属性。

VB程序设计练习题及参考答案

VB程序设计练习题及参考答案

VB程序设计练习题及参考答案visualbasic程序设计练习题一、填空1.当进入vb集成环境,发现没有显示“工具箱”窗口时,应选择菜单的选项,使“工具箱”窗口显示。

2.在BMP图形文件之后加载命令按钮的图片属性时,所需的图形不会显示在选项按钮上,因为该属性未设置为1(图形)。

3.在文本框中,通过属性能获得当前插入点所在的位置。

4.要编辑文本框中的现有内容,请按键盘上的键,但该键不起作用,因为该属性已设置为true。

6.在vb中,1234、123456&、1.2346e+5、1.2346d+5四个常数分别表示、、、。

7.整数变量x存储两位数。

要交换两个数字的位置,例如,13变为31,表达式为。

8.表示x是5的倍数或是9的倍数的逻辑表达式为。

9.如果a=3.5、B=5.0、C=2.5和d=true,则表达式a>=0anda+C>B+3ornotd的值为。

10.int(-3.5)、int(3.5)值分别是、。

11.表达式ucase(mid(\的值是。

12.要将以下语句循环20次,循环变量的初始值应为:fork=to-5step-213.下面程序段显示个“*”。

fori=1到5 Forj=1打印\nextjnexti14.复选框属性设置为2-grayed时,变成灰色,禁止用户选择。

15.属性设置为1,单选按钮和复选框的标题显示在左边。

16.属性设置为1,单选按钮和复选框以图形方式显示。

17.程序运行时,如果框架属性设置为false,框架标题为灰色,表示框架内的所有对象均被屏蔽,不允许用户对其进行操作。

18.列表框中项目的序号是从开始的。

19.指示列表框中最后一项的序列号。

20.方法可以清除列表框中的所有内容。

21.组合框是组合了文本框和列表框的特性而形成的一种控件。

风格的组合框不允许用户输入列表框中没有的项。

22.VB程序存储在模块中,模块分为______________三种类型。

123.如果希望每15秒生成一次计时器事件,interval属性应设置为。

VB程序设计练习题及参考答案

VB程序设计练习题及参考答案

Visual Basic程序设计练习题1.Visual Basic是一种面向对象的可视化程序设计语言,采取了A的编程机制。

A.事件驱动B.按过程顺序执行C.从主程序开始执行D.按模块顺序执行2.在Visual Basic中最基本的对象是C,它是应用程序的基石,是其他控件的容器。

A.文本框B.命令按钮C.窗体D.标签3.多窗体程序是由多个窗体组成。

在缺省情况下,VB在应用程序执行时,总是把B 指定为启动窗体。

A.不包含任何控件的窗体B.设计时的第一个窗体C.包含控件最多的D.命名为Frm1的窗体4.若有程序代码如下:text1.text="Visual Basic"则:text1,text和"Visual Basic" 分别代表C。

A.对象,值,属性B.对象,方法,属性C.对象,属性,值D.属性,对象,值5.Visual Basic是一种面向对象的程序设计语言,A不是面向对象系统所包含的三要素。

A.变量B.事件C.属性D.方法6.在VB集成环境创建VB应用程序时,除了工具箱窗口、窗体中的窗口、属性窗口外,必不可少的窗口是C。

A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口7.保存新建的工程时,默认存放的位置是B。

A.My Documents B.VB98 C.\ D.Windows 8.若要使标签控件显示时不覆盖其背景内容,要对D属性进行设置。

A.BackColor B.BorderStyle C.ForeColor D.BackStyle 9.若要使命令按钮不可操作,要对A属性设置。

A.Enabled B.Visible C.BackColor D.Caption 10.文本框没有D属性。

A.Enabled B.Visible C.BackColor D.Caption 11.不论何控件,共同具有的是B属性。

A.Text B.Name C.ForeColor D.Caption 12.要使Form1窗体的标题栏显示“欢迎使用VB”,以下D语句是正确的。

vb程序设计考试题库及答案

vb程序设计考试题库及答案

vb程序设计考试题库及答案一、单项选择题(每题2分,共40分)1. 在VB中,以下哪个选项是正确的数据类型?A. IntegerB. IntC. RealD. All of above答案:D2. VB中,哪个函数用于计算两个数的最大值?A. MinB. MaxC. AbsD. Sgn答案:B3. 在VB中,以下哪个是合法的变量名?A. 2variableB. variable2C. _variableD. All of above答案:D4. VB中,以下哪个是正确的循环结构?A. For EachB. For AllC. Do WhileD. All of above答案:D5. 在VB中,以下哪个是正确的条件语句?A. If...Then...ElseB. Switch...CaseC. Select...CaseD. All of above答案:D6. VB中,哪个函数用于计算一个数的绝对值?A. AbsB. RoundC. SqrD. Int答案:A7. 在VB中,以下哪个是合法的数组声明?A. Dim arr(10) As IntegerB. Dim arr() As Integer = New Integer(10)C. Both A and BD. None of the above答案:C8. VB中,哪个函数用于将字符串转换为大写?B. UCaseC. StrCompD. StrConv答案:B9. 在VB中,以下哪个是正确的事件处理程序的声明方式?A. Private Sub Form_Click()B. Public Sub Form_Click()C. Both A and BD. None of the above答案:A10. VB中,哪个函数用于计算一个数的平方根?A. SqrB. PowC. ExpD. Log11. 在VB中,以下哪个是正确的文件打开模式?A. Open For InputB. Open For AppendC. Open For RandomD. All of above答案:D12. VB中,哪个函数用于计算一个数的指数?A. SqrB. PowC. ExpD. Log答案:B13. 在VB中,以下哪个是正确的窗体属性?A. CaptionC. Both A and BD. None of the above答案:C14. VB中,哪个函数用于计算一个数的自然对数?A. SqrB. PowC. ExpD. Log答案:D15. 在VB中,以下哪个是正确的控件事件?A. ClickB. DoubleClickC. Both A and BD. None of the above答案:C16. VB中,哪个函数用于计算一个数的四舍五入?A. RoundB. IntC. FixD. Sgn答案:A17. 在VB中,以下哪个是正确的控件属性?A. NameB. CaptionC. Both A and BD. None of the above答案:C18. VB中,哪个函数用于计算一个数的符号?A. AbsB. SgnC. RoundD. Int答案:B19. 在VB中,以下哪个是正确的控件事件?A. KeyPressB. KeyDownC. Both A and BD. None of the above答案:C20. VB中,哪个函数用于计算一个数的固定整数部分?A. RoundB. IntC. FixD. Sgn答案:C二、填空题(每题2分,共20分)21. VB中,使用________函数可以将一个字符串转换为小写。

VB程序设计入门练习及答案

VB程序设计入门练习及答案

习题2(程序设计入门)一、选择题1.如果把一个人当作对象,那么血型相当于这个对象的:A(A) 属性(B) 方法(C) 事件(D) 特征2.下列哪一种方法不能改变窗体的大小:A(A) 设计时在窗体布局窗口中进行调整(B) 设计时在属性窗口中设置相应的属性(C) 运行时设置相应属性的值(D) 运行时调用窗体的Move方法3.一个对象可以执行的动作和可被对象识别的动作分别称为:B(A) 事件、方法(B) 方法、事件(C) 属性、方法(D) 过程、事件4.在窗体Form1的Click事件过程中有以下语句:Label1.Caption = "Visual Basic"若本语句执行之前,标签控件Label1的Caption属性为默认值,则标签控件的Name 属性和Caption属性在执行本语句之前的值分别为:A(A) "Label"、"Label" (B) "Label"、"Caption"(C) "Label1"、"Label1" (D) "Caption"、"Label"5.见上题。

该语句执行后,标签控件的Name属性和Caption属性的值分别为:B(A) "Label"、"VisualBasic" (B) "Label1"、"Visual Basic"(C) "Label1"、"Caption" (D) "Label"、"Label1"6.下面哪种对象没有Caption属性:B(A) Form (B) TextBox (C) CommandButton (D) Label7.文本框对象的默认属性是:B(A) Name (B) Text (C) Visible (D) Enabled8.Visual Basic源程序的续行符是:D(A) 单引号(B) 双引号(C) 冒号(D)空格与下划线9.下面的动作中,不能引发按钮Click事件的是:B(A) 在按钮上单击鼠标左键(B) 在按钮上单击鼠标右键(C) 把焦点移至按钮上,然后按回车键(D) 如果按钮有快捷字母,按“Alt+该字母”二、判断题1.标签控件是专门用来显示信息的,所以不能响应鼠标的单击事件。

VB程序设计练习册参考答案

VB程序设计练习册参考答案

参考答案第1章Visual Basic 简介一、选择题1、B2、C3、A4、D5、C6、A7、D8、C9、D 10、B11、C 12、B二、填空题1 过程对象事件驱动2 学习版专业版企业版企业版3 Alt+F4 Alt+Q4 设计运行中断5 设置在应用程序运行时,各窗体在屏幕上的显示位置6 内部(标准)7 资源管理器8 编译方式解释方式9 选择“视图/工具箱”命令10 print 或?“大家都来学用Visual Basic”11按字母序按分类序12编辑代码三、思考题略第2章Visual Basic程序设计概述一、选择题1、A2、A3、D4、D5、D6、C7、A 8、C 9、A 10、C 11、B 12、D13、C 14、C 15、B 16、B 17、D 18、B三、编程题1、(1)建立应用程序用户界面。

选择”新建”工程,进入窗体设汁器,在窗体中增加一个标签控件Labe11和两个命令按钮 Commandl 、 Comlnand2。

(2)设置对象属性,见表。

(可自由设置)3编写代码private sub command1_clicklabel1.visible=false1 窗体 控件2 Left Top Width Height3 Ctrl 或shift4 Scrollbars Multiline True Passwordchar5 事件过程6 在属性窗口设置 在代码窗口设置7 对象名 下划线 事件名8 Form_Click9 Form1.Hide10 界面设计 属性设置 代码编写 保存运行11 窗体文件 工程文件12 部件13 窗体文件 模块文件 类模块文件private sub command2_clicklabel1.visible=trueend sub2、Private Sub Command1_ClickIf Text1.Text<>””And Text2.Text<>””Then ′组合条件判断文本框是否为空Form1.Caption=Text1.Text & ″,″& Label2.Caption & ″″& Text2.Text End IfEnd Sub第3章Visual Basic程序设计基础一选择题1.B2.C3.D4.B5.B6.B7.D8.D9.C10.C11.D 12.C 13.D 14.D 15.A 16.D 17.D 18.D 19.C 20.C21.A22.D23.B24.A 25.B 26.A二、填空题1 our name is2 13 True4 字母数字下划线2555 56 07 Logx/log10/0.5+x^2或者Logx/log10/0.5+x*x8 0,1,2,3,49 x>=0 and x<10010 511 false12 6三、编程题1.提示:Ucase、Lcase的使用2.提示:属性设置中,“计算”按钮的default属性设为True.“清除”按钮的Cancel属性设为True.第4章数据输入输出一、选择题1、D2、A3、A4、B5、D6、B7、C 8、C 9、D 10、D二、填空题1. 1+1= 22+2=42. 500.00%3.将当前字体放大两倍4. 20-11-025. 11 1三、编程题1.提示:(1)流程图。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

如下二维数组声明语句,________B____正确。

A、Dim a(n,n) As IntegerB、Dim a(3,4) As IntegerC、Dim a(34) As IntegerD、Dim a[3,4] As Integer下列语句可以用来正确地声明一个动态数组的是___B__。

A、Private A(n) As IntegerB、Dim A() As IntegerC、Dim A(1 to n)D、Dim A(,) As Integer如下二维数组声明语句,______C__正确。

A、Dim a(34) As IntegerB、Dim a(n,n) As IntegerC、Dim a(3,4) As IntegerD、Dim a[3,4] As Integer下列语句中的语句可以用来正确地声明一个动态数组。

AA、Dim A() As IntegerB、Private A(n) As IntegerC、Dim A(,) As IntegerD、Dim A(1 to n)下面关于动态数组的叙述中,不正确的是__B________。

A、用ReDim语句重新定义动态数组时,不能改变数组的数据类型,除非是Variant变量所包含的数组B、用ReDim Preserve重新定义的动态数组,当前存储在数组中的值全部丢失,重新定义的数组被赋予该类型变量的初始值C、用数组说明语句定义一个不指明大小的数组,VB就将它视为一个动态数组D、在重新定义动态数组时,变量不可以出现在维界表达式中若希望在离开某过程后,还能保存该过程中局部变量的值,则应使用__D______关键字在该过程中定义局部变量。

A、DimB、PrivateC、PublicD、Static在调用Sub或Function过程时,采用___A___传送相应过程的变量名、数组名、常数或表达式。

A、实际参数B、形式参数C、对象参数D、数组参数给出下列程序代码,在单击命令按钮时的输出结果是___B_____。

Private Sub Command1_Click ( )Dim x As Integer, y As Integerx=1:y=1For n=1 TO 3z=FirstFunc (x, y)Print n, z ,Next nEnd SubPrivate Function FirstFunc (x As Integer, y As Integer) As IntegerDim n As IntegerDo While n <= 4x=x+yn=n+1LoopFirstFunc=xEnd FunctionA、1 2 3 4 5 6B、1 6 2 11 3 16C、2 1 3 1 3 3D、2 6 1 3 11 16要想在过程调用后返回两个结果,下面的过程定义语句合法的是___D____。

A、Sub Procl ( ByVal n , ByVal m)B、Sub Procl ( ByVal n , m)C、Sub Procl ( n , ByVal m)D、Sub Procl ( n , m)窗体上画一个按钮,然后编写如下的事件代码。

在按钮上单击,输出为_____B_____。

Private Sub fun( )Static a As Integera=a+2Print a;End SubPrivate Sub Command1_Click( )Dim m As IntegerFor m=1 To 3Call funNext mEnd SubA、0 0 0B、2 4 6C、2 2 2D、2 4 8下列程序Private Sub Command1_Click( )a=InputBox("请输入")b=InputBox("请输入")Print a+bEnd Sub运行时输入3和4输出的结果是 __D___ 。

A、7B、3+4C、出错D、34在窗体Form1上,有一个列表框控件List1,在窗体的Click事件中有如下代码: Private Sub Form_Click()Dim k As IntegerDim entry As String, item As Stringentry = "EDCBA"For k = Len(entry) To 1 Step -1item = LCase(Mid(entry, k, 1)) & kList1.AddItem itemNext kEnd Sub运行此程序,单击窗体,列表框第4行为__A___。

A、d2B、b2C、b4D、d3执行以下语句后,a的值为__A___。

Dim a As Integera=1Do Until a=100a=a+2LoopA、溢出B、100C、99D、101计算机算法可以分为两大类:一类是___D__算法,另一类是_____算法。

A、计算机辅助设计、财务B、排序、查找C、步骤管理、通信D、数值计算、非数值计算下列程序段的执行结果为_C____。

x = Int((69 - 60) * Rnd + 60)Select Case xCase Is >= 90Print "优秀"Case 80 To 89Print "良好"Case 60 To 79Print "合格"Case ElsePrint "不合格"End SelectA、优秀B、良好C、合格D、不合格表达式Len("123程序设计ABC")的值是____A________。

A、10B、20C、17D、14下列说法正确的是__A______。

A、a$="Visual",b$="Basic",则a$ & b$ 和a$ + b$结果都是"VisualBasic"B、(7-3<=4) Xor (1>-1) Or (7=5)的结果是TrueC、设i=1,x=2,y=2,则x<2 Or Not y>0 And (x-y)/i<>0的结果是TrueD、(Not True Or True) And (True Or False) 的结果是False表达式16/4-2^5*8/4 MOD 5/2的值为_______D_____。

A、2B、14C、20D、4数学关系3<=x<10表示成正确的VB表达式为_____C_______。

A、x>=3 OR x<10B、3<=x AND <10C、3<=x AND x<10D、3<=x<0下列没有类型说明符的变量是_____B____。

A、货币型B、日期型C、字符串型D、长整型要使文本框能显示多行文字,则需设定它的_C____属性为True。

A、PasswordCharB、SeletedC、MultiLineD、Caption决定控件上文字的字体、字型、大小、效果的属性是_B____。

A、NameB、FontC、TextD、Caption以下不属于标签属性的是___B__。

A、IndexC 、CaptionD 、Font在设计列表框时,若实现输入多行文字的目的,应使用__C___键实现文本的换行。

A 、Alt+EnterB 、EnterC 、Ctrl+EnterD 、Ctrl+Shift+Enter要使一个标签透明且具有边框,则应___B__。

A 、将其BackStyle 属性设置为1,BorderStyle 属性设置为1B 、将其BackStyle 属性设置为0,BorderStyle 属性设置为1C 、将其BackStyle 属性设置为0,BorderStyle 属性设置为0D 、将其BackStyle 属性设置为1,BorderStyle 属性设置为0一只白色的足球踢进球门,则白色、足球、踢、进球门是___D_____。

A 、对象、属性、方法、事件B 、属性、对象、方法、事件C 、对象、属性、事件、方法D 、属性、对象、事件、方法以下关于事件的说法,正确的是_B____。

A 、用户可以根据需要建立新的事件B 、事件是由系统预先定义好的,能够被对象识别的动作C 、不同类型的对象所能识别的事件一定不相同D 、事件的名称是可以改变的,由用户预先定义VisualBasic 集成的主窗口中包括__D___。

A 、标题栏B 、工具栏C 、菜单栏D 、以上三者均有能被对象所识别的动作与可执行的活动分别称为对象的__C___。

A 、方法、事件B 、过程、方法C 、事件、方法D 、事件、属性VisualBasic 是用于开发__B___环境下的应用程序的工具。

A 、UNIXB 、WindowsC 、DOSD 、DOS 和Windows[题目] 计算公式1217151311-+++++=n S Λ的和,当第n 项的值<10-5时结束。

【参考代码】sum = 0x = 1Do While x >= 0.0001sum = sum + xn = n + 1x = 1 / (2 * n - 1)LoopText1.Text = sum===============【考生代码】sum = 0n = 1x = 1Do While x >= 0.0001sum = sum + xn = n + 1x = 1 / (2 * n - 1)LoopText1.Text = sum[题目]编写程序,求出给定正整数的所有质因子,并将质因子全部输出。

如:342有质因子2,3,3,19。

【编程要求】【参考代码】DoIf x Mod i = 0 Thenn = n + 1ReDim Preserve a(n)a(n) = ix = x \ ii = 2Elsei = i + 1End IfLoop Until x = 1===============【考生代码】DoIf x Mod i = 0 Thenn = n + 1ReDim Preserve a(n)a(n) = ix = x \ ii = 2Elsei = i + 1End IfLoop Until x = 1[题目]顺序查找:给定一个数,在一个两位随机数数组中查找与此数相同的元素(该数组大小为10个元素)。

如果找到与给定数值相同的元素后输出该元素在数组中的位置;找不到则输出相应的提示信息。

[编程要求]【参考代码】Dim i As IntegerL = UBound(b)For i = 1 To LIf b(i) = n Thensearch = iExit FunctionEnd IfNext isearch = -1===============【考生代码】Dim i As IntegerL = UBound(b)For i = 1 To LIf b(i) = n Thensearch = iExit FunctionEnd IfNext isearch = -1。

相关文档
最新文档