vb简单应用练习题

格式：doc
大小：311.25 KB
文档页数：9

下载文档原格式

/ 9

vb练习题及答案

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

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

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

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

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

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

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

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

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

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

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

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

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

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

然后，创建一个用于存储学生信息的集合（如数组或集合类）。

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

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

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

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

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

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

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

visualbasic的练习题

visualbasic的练习题Visual Basic（VB）是一种广泛使用的编程语言，它易于学习和使用。

为了帮助读者熟悉VB并通过实践提高编程能力，本文将提供一些VB练习题。

练习题1：计算器应用程序编写一个简单的计算器应用程序，要求用户输入两个数字和操作符（加号、减号、乘号或除号），然后计算并显示结果。

练习题2：学生信息管理系统创建一个学生信息管理系统，要求能够添加、删除和修改学生信息，并能够显示学生列表和单个学生详细信息。

练习题3：文本编辑器设计一个简单的文本编辑器，具备基本的文本编辑功能，如打开、保存、剪切、复制和粘贴。

练习题4：图书管理系统构建一个图书管理系统，能够管理图书库存信息，包括添加新书籍、借阅、归还和查询图书。

练习题5：数据验证工具编写一个数据验证工具，能够根据设定的验证规则对用户输入的数据进行验证，如邮箱格式、手机号码格式等。

练习题6：迷宫游戏开发一个迷宫游戏，用户通过键盘控制游戏角色在迷宫中移动，寻找出口并避免陷阱。

练习题7：汽车租赁系统设计一个汽车租赁系统，要求能够查询可租赁的汽车、租车、归还车辆并计算租金。

练习题8：音乐播放器创建一个简单的音乐播放器应用程序，能够播放音乐文件、显示歌曲信息和控制播放进度。

练习题9：日历应用程序实现一个日历应用程序，能够显示当前月份的日历并提供添加、编辑和删除日程的功能。

练习题10：银行管理系统设计一个银行管理系统，能够管理用户账户，包括存款、取款、转账和查询余额等功能。

以上是一些常见的VB练习题，通过完成这些练习，读者可以对VB编程有一个较为全面的了解，并提高自己的编程能力。

希望读者能够积极参与练习，逐步提升自己在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程序设计30道编程题

V B程序设计30道编程题------------------------------------------作者xxxx------------------------------------------日期xxxx'1.输入3个数，输出最大的数Private Sub Command11_Click()Dim max%X1=Val(InputBox("input"))X2=Val(InputBox("input"))x3=Val(InputBox("input"))max=X1If max<=X2 Thenmax=X2End IfIf max<=x3 Thenmax=x3End IfMsgBox("3个数之中的最大数max="&max)End SubPrivate Sub Command12_Click()'2.'有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根a=Val(InputBox("input"))B=Val(InputBox("input"))c=Val(InputBox("input"))s=B^2-4*a*cIf a<>0 ThenIf s=0 ThenMsgBox("两个相等实根")ElseIf s>0 ThenMsgBox("两个不相等实根")ElseIf s<0 ThenMsgBox("两个不相等虚根")End IfElseMsgBox("无解")End IfEnd SubPrivate Sub Command13_Click()'3.输入一个百分制的成绩，若大于等于60，则用消息框弹出，显示"恭喜！成绩通过！"，若小于60，则弹出消息框，显示"抱歉！成绩没有通过！"X=Val(InputBox("input"))If X>=60 ThenMsgBox("恭喜！成绩通过！")ElseMsgBox("抱歉！成绩没有通过！")End If End SubPrivate Sub Command14_Click()'4.输入一年份，判断它是否为闰年，并显示有关信息。

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道⼩题，共50分）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、F9B、F8D、F55、以下( )控件可作为容器使⽤。

（1分）A、LabelB、PictureBoxC、TextBoxD、Image6、将窗体的BoderStyle属性设置为( )可使窗⼝不显⽰标题栏。

（1分）A、0B、1C、2D、57、⽂本框没有( )属性（1分）A、TextB、NameC、CaptionD、BorderStyleA 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 BC 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 D23、下列( )是不合法的常量。

（1分）A、100B、10E02D、10e0.524、下列对变量的定义中，定义X为变体型变量的是( )。

（1分）A、Dim X as DoubleB、Dim XC、Dim X!D、X%=2325、设有如下变量声明：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对其输出结果的描述中，正确的是( )。

vb试题及答案选择

vb试题及答案选择VB试题及答案选择1. 在Visual Basic中，以下哪个关键字用于声明变量？A. DimB. ConstC. FunctionD. Sub答案：A2. 以下哪个选项不是Visual Basic的控制结构？A. If...Then...ElseB. For...NextC. Do...LoopD. Switch...Case答案：D3. 在Visual Basic中，如何将文本框（TextBox）的内容赋值给一个变量？A. Dim text As String = TextBox1.TextB. Dim text As String = TextBox1.TextC. Dim text As String = TextBox1.ValueD. Dim text As String = TextBox1.Text答案：A4. 如果要在Visual Basic中创建一个窗体（Form），应该使用以下哪个类？A. FormB. UserControlC. PanelD. Button答案：A5. 在Visual Basic中，如何声明一个名为“myFunction”的过程，它不接受参数也不返回值？A. Function myFunction() As VoidB. Sub myFunction()C. Function myFunction() As IntegerD. Sub myFunction() As Integer答案：B6. 如果要在一个事件处理程序中引用当前窗体，可以使用哪个关键字？A. MeB. ThisC. SelfD. Current答案：A7. 在Visual Basic中，如何声明一个数组？A. Dim numbers(5) As IntegerB. Dim numbers As Integer(5)C. Dim numbers(5) As StringD. Dim numbers As Integer[5]答案：A8. 在Visual Basic中，以下哪个是正确的字符串连接运算符？A. +B. &C. *D. =答案：B9. 如何在Visual Basic中声明一个名为“myClass”的类？A. Function myClassB. Sub myClassC. Class myClassD. Dim myClass答案：C10. 在Visual Basic中，以下哪个关键字用于捕获所有未处理的异常？A. Try...CatchB. If...Then...ElseC. For...NextD. While...End While答案：A11. 在Visual Basic中，如何声明一个名为“myButton”的按钮？A. Dim myButton As ButtonB. Sub myButtonC. Function myButtonD. Dim myButton As Control答案：A12. 在Visual Basic中，如何将一个变量的值增加1？A. Increment myVarB. myVar += 1C. myVar = myVar + 1D. myVar.Increment()答案：C13. 在Visual Basic中，如何声明一个名为“myLabel”的标签？A. Dim myLabel As LabelB. Sub myLabelC. Function myLabelD. Dim myLabel As Control答案：A14. 在Visual Basic中，以下哪个关键字用于退出当前的过程？A. ExitB. ReturnC. EndD. Quit答案：A15. 在Visual Basic中，如何声明一个名为“myList”的列表？A. Dim myList As List(Of String)B. Dim myList As String()C. Dim myList As ArrayD. Dim myList As Collection答案：A16. 在Visual Basic中，如何声明一个名为“myDictionary”的字典？A. Dim myDictionary As DictionaryB. Dim myDictionary As HashtableC. Dim myDictionary As List(Of String)D. Dim myDictionary As Array答案：A17. 在Visual Basic中，如何声明一个名为“myEvent”的事件？A. Event myEventB. Sub myEvent()C. Function myEvent()D. Dim myEvent As Event答案：A18. 在Visual Basic中，如何声明一个名为“myDelegate”的委托？A. Delegate myDelegateB. Sub myDelegate()C. Function myDelegate()D. Dim myDelegate As Delegate答案：D19. 在Visual Basic中，如何声明一个名为“myEnum”的枚举？A. Enum myEnumB. Sub myEnumC. Function myEnumD. Dim myEnum As Enum。

vb试题及答案基础

vb试题及答案基础一、选择题（每题2分，共20分）1. VB中，用于声明变量的关键字是：A. DimB. DeclareC. SetD. Const答案：A2. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D3. VB中，用于实现条件判断的语句是：A. If...Then...ElseB. For...NextC. Do...LoopD. While...Wend答案：A4. 下列哪个选项是VB中的过程？A. FunctionB. SubC. Both A and BD. None of the above答案：C5. VB中，用于实现循环的语句是：A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D6. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(10)B. Dim arr(10) As IntegerC. Both A and BD. None of the above答案：C7. VB中，用于创建用户界面的控件是：A. LabelB. TextBoxC. ButtonD. All of the above答案：D8. 在VB中，下列哪个选项是正确的文件访问模式？A. Open For InputB. Open For OutputC. Open For AppendD. All of the above答案：D9. VB中，用于实现错误处理的语句是：A. On Error GoToB. On Error Resume NextC. On Error GoTo 0D. All of the above答案：D10. 在VB中，下列哪个选项是正确的事件处理？A. ClickB. DoubleClickC. MouseDownD. All of the above答案：D二、填空题（每题2分，共20分）1. 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中什么是继承，并给出一个简单的示例。

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

Vb简单应用题练习题第一题：打开指定文件夹下的工程文件vbsj3.vbp，在名称为Form1 的窗体上已经添加一个名为lblClock 的标签控件和一个名称为timeClock 的计时器控件；请将标签控件lblClock 的Caption 属性设为空串，BorderStyle 属性设为1，再设置timeClock 的适当属性，并编写适当的事件过程，使得在运行时，每隔一秒种在标签中显示的数字从1 开始自动加1。

如图所示是程序开始运行时的界面。

请将程序中注释语句修改为正确代码，并删除注释符号；不能修改已有的程序内容，特别是不能改变程序中已有的变量名称。

注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第二题：打开指定文件夹下的工程文件vbsj3.vbp，在名称为Form1 的窗体上已经添加一个名称为txtInput 的文本框；两个标题分别为“对齐方式”、“字体”，名称分别为fraAlign、fraFont的框架控件；在fraAlign 框架中画三个单选按钮，标题分别为“左对齐”、“居中”、“右对齐”，名称分别为optLeft、optCenter、optRight；在fraFont 框架中画两个单选按钮，标题分别为“宋体”、“黑体”，名称分别为optSt、optHt。

要求：编写五个单选按钮的Click 事件过程，使程序运行时，单击这些单选按钮，可以对文本框中的文字实现相应的操作效果，如图所示。

注意：1.不能修改其他代码行，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

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

第三题：打开指定文件夹下的工程文件vbsj3.vbp，本程序的功能是输入用户名和密码。

要求程序运行时，在输入用户名的文本框txtUserName 中输入的英文字符个数不超过10 个且按回车键时，焦点自动定位到输入密码的文本框txtPassWord 中；否则将文本框txtUserName 的内容清空，焦点还是在文本框txtUserName 中。

同时，若选中“显示密码”复选框，在文本框txtPassWord 中输入密码时，文本框txtShowPwd 中显示的是密码字符本身；若没有选中“显示密码”复选框，则文本框txtShowPwd 显示的是“#”，如图所示。

在考生文件夹中给出的窗体文件vbsj3.frm 中已经添加了全部的控件，但程序不完整。

请去掉程序中的注释，将其中的?改为正确的内容。

注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第四题：打开指定文件夹下的工程文件vbsj3.vbp，已经添加全部控件，其中“+”、“-”、“×\u8221X、“÷\u8221X对应的单选按钮为一个控件数组。

程序的功能是根据水平滚动条hsbNum1 和hsbNum2的当前值作为运算数，当单击命令按钮cmdCalc 时可分别进行加、减、乘、除运算，并将运算的结果显示在标签lblOpResult 中，程序运行时的界面如图所示。

请在设计模式下分别设置水平滚动条hsbNum1 和hsbNum2 的Max、Min 属性的值分别100、1；设置“+”对应的单选按钮控件当前为选中状态。

该程序不完整，请去掉程序中的注释符，并把?改正为正确内容，使其能够正确运行。

注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第五题：打开指定文件夹下的工程文件为vbsj3.vbp，相应的窗体文件文件为vbsj3.frm，包含了所有的控件和部分程序，程序的功能是：当选择“考试科目”、“考试形式”后，单击“确定”按钮，在文本框txtContents 中显示选中的“考试科目”和“考试形式”的内容；若没有选择相应的项目，将以消息框进行提示。

要求：(1) 利用属性窗口向列表框lstSubjects 添加“二级VB”、“二级VFP”、“二级网页设计”、“二级C”四个项目作为考试科目；同时将窗体只保留“关闭”按钮。

程序运行时的界面如图所示。

(2) 将程序代码中注释符号去掉，其中的?修改为正确的程序代码，保证程序能正常运行。

注意：1. 1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2. 在结束运行之前，必须至少要进行一次选择操作（包括列表框和单选按钮），退出程序时通过单击窗体右上角的关闭按钮。

3.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第六题：打开指定文件夹下的工程文件为vbsj3.vbp，在窗体中已添加全部控件。

程序的功能是当单击“添加”按钮时，将窗体上左侧列表框（名称为lstPending）同时选中的多个不连续的列表项移动到右侧列表框（名称为lstSelected）中；当单击“删除”按钮时，将右侧列表框lstSelected 选中的一个列表项移动到左侧列表框lstPending 中。

程序运行时的界面如图所示。

要求：(1) 通过属性窗口，设置列表框控件lstPending 可以同时选择不连续的多个列表项；(2) 窗体文件中的程序代码不完整，请将其中的注释符去掉，并将?修改为正确的代码，保证程序能够正常运行。

注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第七题：打开指定文件夹下的工程文件是vbsj3.vbp，窗体上已经添加部分控件和程序代码，程序运行时的界面如图所示。

要求：(1) 在设计模式下为窗体添加“通用对话框”控件，名称为CommonDialog1；(2) 在“设置字体”按钮的“Click”事件中将代码补充完整，程序执行时能够对文本框控件（名称为txtSample）中的文本利用打开的“通用对话框”窗口将字体、字号、下划线、颜色分别设置为“楷体”、“四号”、“加下划线”、“红色”效果。

注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第八题：打开指定文件夹下的工程文件vbsj3.vbp，窗体上已添加全部控件。

程序的功能是根据文本框（名称为txtInput）中输入的内容，当单击“统计个数”命令按钮时，分别统计“数字”、“大写字母”、“小写字母”的个数，并将统计的结果分别显示在文本框控件数组（名称为txtNumber）中。

窗体文件中的程序代码并不完整，请将代码中的注释符去掉，并将其中的?修改为正确的代码，保证程序能够正常运行。

注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第九题：在指定文件夹下有大小完全相同的两个图片文件，名称分别为p1.jpg 和p2.jpg；已经创建的窗体文件为vbsj3.frm，相应的工程文件为vbsj3.vbp。

打开指定文件夹下的该工程文件vbsj3.vbp，窗体的名称为Form1，并已添加两个图片框控件和一个命令按钮控件，两个图片框控件的名称分别为Pic1、Pic2，命令按钮控件的名称cmdChange，标题为“交换图片”。

要求：(1) 使用属性窗口，分别为两个图片框控件Pic1 和Pic2 加载考生文件夹下的图片文件p1.jpg 和p2.jpg，并设置两个图片框控件自动与图片p1.jpg 和p2.jpg 具有相同的大小，程序运行时的界面如图所示。

(2) 在命令按钮cmdChange 的Click 事件中编写代码，当单击该命令按钮时，将两个图片框控件Pic1、Pic2 已经加载的图片交换显示（交换时，不能再重新加载图片文件）。

注意：1. 程序中不得使用任何变量，也不能使用第三个图片框或图像框控件，不能修改程序的其他部分和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第十题：打开指定文件夹下的工程文件vbsj3.vbp，在名称为Form1 的窗体上建立一个名称为txtDisplay 的文本框，然后建立一个名称为mnuList 的主菜单，其子菜单项有三个，名称分别为mnuOil、mnuFood、mnuEgg，它们的标题分别为“食用油”、“米面”和“鸡蛋”。

程序运行后，界面如图所示。

如果选择“食品列表”的下拉菜单项“食用油”，则在文本框txtDisplay 中显示“保质期18 个月”；如果选择“米面”，则在文本框中显示“保质期12 个月”；如果选择“鸡蛋”，则在文本框中显示“保质期1 个月”。

注意：1. 不能使用任何变量，直接显示要求的字符串；不能修改程序的其他部分和不要求操作的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第十一题：打开指定文件夹下的工程文件vbsj4.vbp，窗体的功能是在组合框cboDivisor 选中一个数作为起始值，单击“计算”按钮cmdCalc 时，先使用输入对话框输入一个不大于5000 的整数，然后计算该整数所有大于起始值的因数之和，并将求和的结果显示在名称为txtResult的文本框中。

程序运行时的界面如图所示。

要求：(1) 使用属性窗口为组合框cboDivisor 添加三个列表项，分别为数字3、7、11；(2) 修改窗体文件的代码，将其中的注释符号去掉，并把?修改为相应的正确程序代码，保证程序能正常运行。

注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。

2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。

第十二题：打开指定文件夹下已经创建好工程文件vnsj4.vbp。

程序运行时，在窗体的Activate 事件过程中生成圆的12 个刻度点，另有长、短 2 条直线，名称分别为linLong、linShort，起点的坐标分别为圆心的坐标x0、y0，如图所示，用以模拟时钟的指针移动。

当单击“开始”按钮，则每隔0.5 秒长指针顺时针转动一个刻度，短指针顺时针转动1/12 个刻度（即长指针转动一周，短指针转动一个刻度）；当单击“停止”按钮，两个指针都停止转动。

vb简单应用练习题

合集下载

vb练习题及答案

visualbasic的练习题

vb练习题及答案

VB程序设计30道编程题

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

最新VB经典例题13道(附答案)

vb习题（含答案）

vb试题及答案选择

vb试题及答案基础

vb练习题及答案

文档推荐

最新文档