大一VB语言程序期末考试题及答案

vb期末考试和答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个是正确的变量声明方式？A. Dim a$B. Dim a IntegerC. Dim a As StringD. Dim a 123答案：C2. VB中，以下哪个是正确的条件语句？A. If x > 0 Then Print "Positive"B. If x > 0 ThenPrint "Positive"End IfC. If x > 0 ThenPrint "Positive"End IfD. If x > 0 ThenPrint "Positive"ElsePrint "Negative"End If答案：D3. 在VB中，以下哪个是正确的循环结构？A. For i = 1 To 10Print iNext iB. For i = 1 To 10Print iEnd ForC. For i = 1 To 10Print iLoopD. For i = 1 To 10Print iEnd Loop答案：A4. VB中，以下哪个是正确的数组声明方式？A. Dim arr(10)B. Dim arr(10) As IntegerC. Dim arr As Integer(10)D. Dim arr(10) Integer答案：B5. 在VB中，以下哪个是正确的函数声明方式？A. Function Add(x As Integer, y As Integer) As IntegerB. Function Add(x, y) As IntegerC. Function Add(x As Integer, y As Integer)D. Function Add(x, y)答案：A6. VB中，以下哪个是正确的事件处理程序？A. Private Sub Form_Click()B. Private Sub Form_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Me.ClickC. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Me.ClickD. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs)答案：B7. 在VB中，以下哪个是正确的窗体属性？A. Me.Width = 800B. Me.Height = 600C. Me.Caption = "My Form"D. All of the above答案：D8. VB中，以下哪个是正确的控件属性？A. Label1.Text = "Hello"B. Label1.Caption = "Hello"C. Label1.Value = "Hello"D. = "Hello"答案：A9. 在VB中，以下哪个是正确的文件操作语句？A. Open "C:\test.txt" For Input As #1B. Open "C:\test.txt" For Output As #1C. Open "C:\test.txt" For Append As #1D. All of the above答案：D10. VB中，以下哪个是正确的错误处理语句？A. On Error Resume NextB. On Error GoTo 0C. On Error GoTo -1D. All of the above答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的关键字是______。

vb期末考试题库及答案一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. StringC. Both A and BD. None of the above答案：C2. VB中，用于声明变量的关键字是？A. DimB. DeclareC. VarD. Let答案：A3. 在VB中，以下哪个函数用于计算两个数的和？A. SumB. AddC. +D. Concatenate答案：C4. 如果要声明一个整型变量并初始化为5，正确的语句是？A. Integer x = 5B. Dim x As Integer = 5C. Dim x = 5D. x = 5答案：B5. VB中，哪个控件用于显示文本，并且用户不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B6. 在VB中，以下哪个选项是正确的循环结构？A. For EachB. WhileC. Both A and BD. None of the above答案：C7. VB中，以下哪个语句用于结束当前程序的执行？A. EndB. ExitC. StopD. All of the above答案：D8. 在VB中，以下哪个选项是正确的条件判断语句？A. If...Then...ElseB. Switch...CaseC. Both A and BD. None of the above答案：C9. VB中，以下哪个函数用于获取当前系统日期？A. NowB. DateC. TodayD. Time答案：C10. 在VB中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Label答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个字符型变量可以使用关键字________。

答案：Dim2. VB中，数组的声明格式为________。

大一vb期末考试试题及答案一、选择题（每题2分，共20分）1. Visual Basic 是由哪家公司开发的？A. 微软B. 苹果C. 谷歌D. 甲骨文答案：A2. 下列哪个不是Visual Basic的控件？A. TextBoxB. LabelC. ButtonD. ComboBox答案：D3. 在Visual Basic中，下列哪个关键字用于声明变量？A. DimB. FunctionC. SubD. Class答案：A4. 如果要创建一个用户界面，应该使用Visual Basic的哪个部分？A. 代码编辑器B. 属性窗口C. 设计视图D. 解决方案资源管理器答案：C5. 在Visual Basic中，哪个函数用于计算两个数的和？A. Sum()B. Add()C. Total()D. None of the above答案：D6. 下列哪个不是Visual Basic的事件？A. ClickB. LoadC. OpenD. Close答案：C7. 在Visual Basic中，如何使用MsgBox函数显示一个消息框？A. MsgBox("Hello, World!")B. Message("Hello, World!")C. Alert("Hello, World!")D. None of the above答案：A8. 在Visual Basic中，下列哪个是正确的条件语句？A. If condition ThenB. While condition DoC. For loop DoD. None of the above答案：A9. 下列哪个不是Visual Basic的数据类型？A. IntegerB. StringC. BooleanD. Float答案：D10. 在Visual Basic中，如何声明一个全局变量？A. Dim variable As StringB. Public variable As StringC. Private variable As StringD. Global variable As String答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字来声明一个函数。

vb期末考试编程题试题及答案VB期末考试编程题试题及答案试题1：字符串反转要求：编写一个VB程序，实现将给定的字符串反转的功能。

答案：```vbFunction ReverseString(ByVal str As String) As String Dim reversedStr As String = ""For i As Integer = str.Length - 1 To 0 Step -1reversedStr &= str(i)NextReturn reversedStrEnd Function```试题2：计算阶乘要求：编写一个VB程序，实现计算任意正整数的阶乘。

答案：```vbFunction Factorial(ByVal n As Integer) As LongIf n = 0 ThenReturn 1ElseReturn n * Factorial(n - 1)End IfEnd Function```试题3：查找数组中的最大值要求：编写一个VB程序，实现在一个整型数组中查找最大值。

答案：```vbFunction FindMax(ByVal arr() As Integer) As IntegerDim max As Integer = arr(0)For Each num In arrIf num > max Thenmax = numEnd IfNextReturn maxEnd Function```试题4：判断回文数要求：编写一个VB程序，实现判断一个整数是否是回文数。

答案：```vbFunction IsPalindrome(ByVal num As Integer) As Boolean Dim strNum As String = num.ToString()Dim reversedStr As String = ReverseString(strNum) Return strNum = reversedStrEnd Function```试题5：实现冒泡排序要求：编写一个VB程序，实现对一个整型数组进行冒泡排序。

vb期末考试试题题库及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于定义一个类？A. FunctionB. SubC. ClassD. Property答案：C2. VB中用来声明变量的关键字是？A. DimB. ConstC. StaticD. Public答案：A3. 下列哪个选项不是VB中的控制结构？A. If...Then...ElseB. Do...LoopC. For...NextD. Switch...Case答案：D4. 在VB中，哪个函数用于将字符串转换为大写？A. StrConvB. UCaseC. LCaseD. StrComp答案：B5. VB中，以下哪个不是合法的变量名？A. _myVarB. myVarC. 123VarD. my$Var答案：C6. VB中，以下哪个关键字用于定义一个枚举类型？A. EnumB. TypeC. ConstD. Public答案：A7. VB中，下列哪个不是事件驱动的编程特性？A. 响应用户操作B. 响应系统消息C. 顺序执行代码D. 响应程序内部信号答案：C8. 在VB中，下列哪个选项不是集合（Collection）的方法？A. AddB. RemoveC. ClearD. Find答案：D9. VB中，下列哪个关键字用于定义一个接口？A. InterfaceB. ImplementsC. InheritsD. MustInherit答案：A10. VB中，下列哪个选项不是错误处理的关键字？A. On Error GoToB. On Error Resume NextC. On Error GoTo 0D. On Error Exit Sub答案：D二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量并赋值为10，可以使用语句：Dim __________ As Integer = 10。

答案：myVar2. VB中，使用__________关键字可以创建一个私有变量。

vb期末考试试题和答案**VB期末考试试题和答案**一、单选题（每题2分，共20分）1. 在Visual Basic中，以下哪个不是基本数据类型？A. IntegerB. DoubleC. StringD. Object答案：D2. 下列哪个选项是Visual Basic的事件驱动编程模型？A. 用户操作B. 程序流程C. 函数调用D. 循环执行答案：A3. 在Visual Basic中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A4. 如果要声明一个变量用于存储字符串，应该使用以下哪个数据类型？A. IntegerB. StringC. DoubleD. Boolean答案：B5. 在Visual Basic中，哪个函数用于将字符串转换为小写？A. UCaseB. LCaseC. StrCompD. Trim答案：B6. Visual Basic中，以下哪个控件用于显示文本，但不允许用户编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B7. 在Visual Basic中，以下哪个语句用于结束程序的执行？A. EndB. ExitC. StopD. Return答案：A8. Visual Basic中，以下哪个控件用于创建下拉选择列表？A. ListBoxB. ComboBoxC. CheckBoxD. RadioButton答案：B9. 在Visual Basic中，以下哪个关键字用于声明一个过程？A. SubB. FunctionC. PropertyD. Event答案：A10. Visual Basic中，以下哪个函数用于获取当前系统日期？A. NowB. DateC. TimeD. Timer答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个数组。

vb操作题期末考试题及答案VB操作题期末考试题及答案1. 题目一：编写一个程序，实现以下功能：- 打开一个文本文件（文件名为"example.txt"），读取文件内容。

- 将读取的内容显示在文本框（TextBox1）中。

- 提供一个按钮（Button1），点击后将TextBox1中的内容写入到一个新的文本文件（文件名为"output.txt"）。

答案：```vbPrivate Sub Form_Load()' 打开文件并读取内容Dim fileContent As StringDim fileStream As IO.StreamReaderfileStream = IO.File.OpenText("example.txt")fileContent = fileStream.ReadToEnd()fileStream.Close()' 显示内容到文本框TextBox1.Text = fileContentEnd SubPrivate Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click' 将文本框内容写入到新文件Dim fileStream As IO.StreamWriterfileStream = IO.File.CreateText("output.txt")fileStream.Write(TextBox1.Text)fileStream.Close()End Sub```2. 题目二：编写一个程序，实现以下功能：- 创建一个窗体，包含一个标签（Label1）和一个文本框（TextBox1）。

- 当用户在文本框中输入文本并按下回车键时，将文本框中的内容显示在标签上。

答案：```vbPrivate Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress' 检查是否按下回车键If e.KeyChar = Convert.ToChar(Keys.Enter) Then' 显示文本框内容到标签上Label1.Text = TextBox1.TextEnd IfEnd Sub```3. 题目三：编写一个程序，实现以下功能：- 创建一个窗体，包含一个下拉框（ComboBox1）和一个标签（Label1）。

大学vb考试题及答案一、单项选择题（每题2分，共20分）1. VB中，用于声明变量的关键字是：A. DimB. ConstC. StaticD. Public答案：A2. 在VB中，以下哪个是正确的字符串连接运算符？A. +B. &C. *D. /答案：B3. VB中，以下哪个函数用于将字符串转换为数值？A. ValB. StrC. CIntD. CStr答案：A4. 以下哪个控件用于在VB中显示文本？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A5. 在VB中，以下哪个事件是当窗体加载时触发的？A. ClickB. LoadC. MouseDownD. KeyPress答案：B6. VB中，以下哪个关键字用于定义子程序？A. FunctionB. SubC. ClassD. Module答案：B7. 在VB中，以下哪个控件允许用户选择一个选项？A. OptionButtonB. CheckBoxC. RadioButtonD. ListBox答案：C8. VB中，以下哪个函数用于获取当前日期？A. NowB. DateC. TimeD. Day答案：B9. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Text答案：A10. VB中，以下哪个循环结构用于重复执行代码块直到满足特定条件？A. ForB. Do WhileC. WhileD. For Each答案：B二、填空题（每空2分，共20分）1. VB中，使用________关键字可以声明一个数组。

答案：Dim2. 如果需要在VB中捕获并处理异常，可以使用________语句。

答案：Try...Catch3. VB中，使用________函数可以返回一个随机数。

答案：Rnd4. 在VB中，使用________方法可以清除文本框中的内容。

vb期末考试试题及答案一、选择题（每题2分，共20分）1. 在Visual Basic中，下列哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D2. 下列哪个函数用于计算两个数的和？A. Sum()B. Add()C. +()D. None of the above答案：D3. 在VB中，下列哪个关键字用于声明一个变量？A. DimB. DeclareC. DefineD. Let答案：A4. 下列哪个选项是正确的循环结构？A. ForB. WhileC. DoD. All of the above答案：D5. 在VB中，下列哪个选项是正确的条件语句？A. IfB. SwitchC. CaseD. All of the above答案：A6. 下列哪个选项是VB中用于数组声明的关键字？A. ArrayB. DimC. NewD. Both A and B答案：D7. 在VB中，下列哪个选项是正确的函数声明？A. Function myFunction()B. Sub myFunction()C. Both A and BD. None of the above答案：C8. 下列哪个选项是VB中用于读取用户输入的函数？A. Input()B. Read()C. Get()D. Both A and B答案：A9. 在VB中，下列哪个选项是正确的错误处理语句？A. On ErrorB. TryC. CatchD. All of the above答案：A10. 下列哪个选项是VB中用于定义类的关键字？A. ClassB. StructureC. Both A and BD. None of the above答案：C二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的正确语法是________。

答案：Dim myVar As Integer2. 如果要将变量myVar的值增加1，应该使用________运算符。

大学vb期末考试题库及答案一、选择题（每题2分，共40分）1. 在Visual Basic中，以下哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D2. 下列哪个函数用于计算一个数的平方？A. SqrB. PowC. AbsD. Log答案：B3. 在Visual Basic中，以下哪个关键字用于声明一个变量？A. DimB. ConstC. FunctionD. Sub答案：A4. 以下哪个选项是Visual Basic中的流程控制语句？A. If...Then...ElseB. For...NextC. While...WendD. All of the above答案：D5. 在Visual Basic中，如何声明一个数组？A. Dim MyArray(10) As IntegerB. Dim MyArray As Integer(10)C. Dim MyArray = New Integer(10)D. Dim MyArray(10)答案：A6. Visual Basic中的哪种控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B7. 在Visual Basic中，以下哪个事件用于响应鼠标单击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A8. 以下哪个函数用于将字符串转换为数值？A. ValB. StrC. CIntD. Chr答案：A9. 在Visual Basic中，如何创建一个子程序？A. 使用Function关键字B. 使用Sub关键字C. 使用Class关键字D. 使用Module关键字答案：B10. 在Visual Basic中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Height答案：A11. Visual Basic中的哪种循环结构用于在满足特定条件时重复执行代码块？A. Do...LoopB. For...NextC. While...WendD. Select...Case答案：A12. 在Visual Basic中，如何声明一个常量？A. Dim MyConstant As Integer = 5B. Const MyConstant = 5C. Let MyConstant = 5D. Private MyConstant = 5答案：B13. Visual Basic中的哪种控件用于创建复选框？A. CheckBoxB. RadioButtonC. OptionButtonD. ToggleButton答案：A14. 在Visual Basic中，以下哪个函数用于计算两个数之间的绝对差值？A. AbsB. SgnC. IntD. Round答案：A15. 在Visual Basic中，如何声明一个类？A. Dim MyObject As MyClassB. Class MyClassC. Function MyClassD. Sub MyClass答案：B16. Visual Basic中的哪种控件用于创建下拉列表？A. ListBoxB. ComboBoxC. CheckBoxD. RadioButton答案：B17. 在Visual Basic中，以下哪个属性用于设置文本框的文本？A. TextB. CaptionC. ValueD. Name18. 以下哪个事件用于响应文本框内容的改变？A. ChangeB. ClickC. DblClickD. KeyPress答案：A19. 在Visual Basic中，如何声明一个接口？A. Dim MyInterface As InterfaceB. Interface MyInterfaceC. Class MyInterfaceD. Function MyInterface答案：B20. Visual Basic中的哪种控件用于创建单选按钮？A. CheckBoxB. RadioButtonC. OptionButtonD. ToggleButton答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个全局变量。

vb期末考试试题及详细答案一、选择题（每题2分，共20分）1. VB中用于声明变量的关键字是？A. DimB. SetC. FunctionD. Sub答案：A2. 下列哪个选项不是VB中的控件？A. LabelB. TextBoxC. ButtonD. Excel答案：D3. VB中用于结束一个程序的语句是？A. EndB. ExitC. StopD. Close答案：A4. 在VB中，哪个函数用于将字符串转换为大写？A. UCaseB. LCaseC. StrCompD. Trim5. VB中用于打开文件的语句是？A. OpenB. CloseC. PrintD. Write答案：A6. 在VB中，下列哪个选项是用来创建一个单选按钮的？A. CheckBoxB. RadioButtonC. TextBoxD. ComboBox答案：B7. VB中，下列哪个属性用于设置控件的背景颜色？A. BackColorB. ForeColorC. TextD. Font答案：A8. VB中，下列哪个事件用于响应文本框内容的改变？A. ClickB. ChangeC. DblClickD. KeyPress答案：B9. VB中，下列哪个函数用于获取当前日期？B. DateC. TimeD. Timer答案：B10. VB中，下列哪个选项用于设置窗体的标题？A. TextB. CaptionC. TitleD. Name答案：B二、填空题（每题2分，共20分）1. 在VB中，使用________关键字来定义一个函数。

答案：Function2. VB中，使用________函数可以获取当前时间。

答案：Now3. VB中，使用________函数可以获取系统启动后经过的秒数。

答案：Timer4. VB中，使用________函数可以获取当前日期和时间。

答案：Now5. VB中，使用________函数可以将字符串转换为小写。

大一VB语言程序设计期末考试题一、选择题1 下列常量中,是Integer类型常量的是 C ;A、123&B、-38844C、123%D、327682 下面选项中是字符连接运算符. AA、&B、AndC、%D、Mod3 下面关于VB的集成开发环境IDE的叙述中,不正确的是 B ;A、IDE是设计、调试、运行VB程序的工具;B、用户不能随意关闭IDE中的窗口;C、"窗体设计" 窗口是用来设计应用程序界面窗体的;D、打开 / 关闭各窗口的命令主要在IDE的"视图"菜单中;4 len“vb程序设计”= C ;A、 5B、2C、 6D、105 表达式 15 Mod 4 + 13 \ 5 2 的值是 DA、7B、0C、2D、46 赋值语句A=123 + Mid$ “123456”,3,2 执行后,A= A ;A、157B、12334C、123D、"12334"7 在一个语句内写多条语句时,用来分隔每条语句的符号是C.A、,B、;C、:D、、8 将逻辑型数据转换成整型数据时,转换规则是 D ;A、将True转换为 1 ,将False转换为 0B、将True转换为 1 ,将False转换为 -1C、将True转换为 0 ,将False转换为 -1D、将True转换为 -1 ,将False转换为 09 表达式2+34^5-SINX+1/2中最先进行的运算是D.A、SINB、4^5C、34D、x+110 如果x=2,则表达式x+1>2 Or sinx> And 3>x+3的值 B ;A、不能计算B、 TrueC、5D、False11 随机产生 10,50 之间整数的正确表达式是 D ;A、Round Rnd50B、 IntRnd40+10C、Round Rnd51D、 10+IntRnd4112 每建立一个窗体,工程管理器窗口中就会增加一个C.A、类模块文件B、工程文件C、窗体文件D、程序模块文件13 INT100RND1产生的随机整数的闭区间是B.A、1,100B、0,99C、0,100D、1,9914 下列数据类型中,占用内存最小的是D.A、IntegerB、SingleC、BooleanD、Byte15 VisualBasic是一种程序设计语言.BA、过程式B、非过程式C、机器D、低级16 函数Int10Rnd是在A范围内的整数.A、0,9D、1,1017 以下合法的一组Visual Basic用户标识符是 CA、Sum 和 8abcB、ax 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile18 函数LenStrVal""的值为B.A、5B、6C、8D、1119 Int100+/100的值为BA、B、C、200D、19820 以下各表达式中, 计算结果为0的是A.A、FIX+FIXB、CINT+CINTC、INT+INTD、FIX+FIX21 MsgBox的正确语法是 D ;A、 MsgBox标题 ,提示信息 ,按钮类型B、 MsgBox提示信息,标题 ,按钮类型C、MsgBox标题 ,按钮类型 ,提示信息D、 MsgBox提示信息 ,按钮类型 ,标题22 3>8-3 OR 10+2 <=34 AND 5=2+3的结果是C.A、10B、-3C、TrueD、False23 表达式4+5 \ 6 7 / 8 Mod 9 的值是D.A、7B、4C、6D、524 设a=6,则执行x=IIfa>5,-1,0后,x的值为D.A、5B、025 下面关于VB的叙述中,不正确的是 A ;A、用VB编写的程序可以在任何操作系统环境中运行;B、VB是面向对象的可视化的软件开发工具;C、VB是在20世纪60年代美国Dartmouth学院开发的Basic语言基础上发展而形成的;D、VB是由美国Microsoft微软公司开发程序设计语言;26 表达式16 / 4-2^58 / 4 Mod 5 \ 2 = A ;A、4B、0C、-2D、 -627 声明符号常量应该用关键字B.A、PrivateB、ConstC、StaticD、V26/ariant28 下列数据类型中,占用内存最大的是D.A、BooleanB、IntegerC、ByteD、Single29 下列VB数据类型中,占用内存最少的是 D ;A、CurrencyB、IntegerC、BooleanD、Byte30 RGB 函数通过红.绿.蓝三基色混合产生某种颜色,某语法为RGB红.绿.蓝,括号中红、绿、蓝三基色的成分使用0~255之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置B属性.A、Scroll和ChangeB、Max和MinC、Smallchange和 LargeChangeD、Value31 k= ,len str k = B ;A、 4B、5C、 3D、 232 表达式Abs-55\5/5的值是 DA、1B、5C、-25D、2533 产生10,37之间的随机整数的VisualBasic表达式是C.A、IntRnd127+11B、IntRnd128+11C、IntRnd128+10D、In tRnd127+1034 工具栏中的"启动"按钮的作用是B.A、工程管理窗口B、运行一个应用程序C、打开被选中对象的代码窗口D、运行一个窗体35 不需要编译,计算机便可直接执行的程序是 B ;A、C语言程序B、机器语言程序C、汇编语言程序D、 Visual Basic语言程序36 Val “123ab”= D ;A、0B、不能转换C、1230D、12337 表达式16/4-2^58/4MOD5\2的值为 AA、4B、2C、14D、2038 删除字符串前导和尾随空格的函数是D.A、RtrimB、LtrimC、LcaseD、Trim39 下列表达式中,其值为0的是C.A、15 mod 9B、7/9C、7\9D、7 mod 1540 表达式Len"123程序设计ABC"的值是 BA、17B、10C、14D、2041 Int+round =________C_________;A、-8B、-6C、-9D、-742 \、/、Mod、等4个算术运算符中,优先级最低的是A.A、ModB、/C、D、\43 下面正确的赋值语句是 D ;A、x=y=1B、x+2=y^2+2C、x+y=1D、x=y+z144 Len"实践应用能力"的值是A.A、6B、4C、不能确定D、845 表达式Mid"SHANGHAI",6,3的值是C.A、ANGHB、SHAC、HAID、SHANGH46 表达式25\3 mod 3 Int的值为B.A、1B、8C、4D、547 下面变量名称正确的是 C ;A、x □1B、integerC、 x_1_yD、 x , y48 不能正确表示条件"两个整型变量A和B之一为0,但不能同时为0" 的布尔表达式D.A、AB=0ANDA<>BB、A=0ORB=0ANDA<>BC、A=0ANDB<>0ORA<>0AND B=0D、AB=0ANDA=0ORB=049 如果X是一个正的实数,将千分位四舍五入,保留两位小数的表达式是C.A、int100x+B、intx+C、int100x+D、intx+50 表达式X+1>X是D.A、非法表达式B、字符表达式C、算术表达式D、关系表达式51．VisualBasic的编程机制是B.A、面向图形B、事件驱动C、面向对象D、可视化52 下面4项中合法的变量名是A.A、X_yzB、X-YC、123abcD、integer53 以下可以作为VB变量名的是C.A、COSXB、X-1C、CO1D、SIN54 表达式7\3+118\5-1的值是B.A、B、6C、D、55 下列哪个变量名的取法是不正确的C.A、sTmeB、T_12C、T12%D、T_Temp56 可以同时删除字符串前导和尾部空白的函数是B.A、LtrimB、TrimC、MidD、Rtrim57 VB窗体文件的扩展名是A.A、FRMB、VBWD、BAS58 一个具有图形用户界面的“标准EXE”工程必须包含的文件是 A ;A、工程文件和窗体文件;B、窗体文件和标准模块文件;C、工程文件和资源文件;D、工程文件和标准模块文件;59 数学式3≤X＜5写成VB表达式是 A ;A、3<=X and X<5B、X>=3 and 5<XC、3<=X or X<5D、3<=X<560 表达式INT8SQR3610^-210+/10的值是A.A、.5B、C、.05D、61 变量未赋值时,数值型变量的值为C.A、空B、无任何值C、0D、162 正确的变量名是 A ;A、xy_01B、sa t01C、3xyD、integer63 当Ucase$C$>”A” and Ucase$C$<”Z”为true时,则C$是__A______;A、字母B、大写字母C、小写字母D、不一定64 表达式-1Sgn-100+IntRnd100的值是A.A、1B、-1C、随机数D、065 表达式print Lentrim" abcd "&"123"的结果是 DA、abcdB、9C、123D、766 Rnd函数不可能产生的值.BA、0B、1C、D、.0000567 下面变量名称不正确的是 B ;A、x1B、1xC、 x1y68 下列哪个变量名的取法是不正确的B.A、T_TempB、T32C、T32D、TName69 选中复选框控件时,value属性的值,可以是C.A、TrueB、falseC、1D、070 程序运行时,如果复选框被用户选中,那么其Value属性值为 A ;A、1B、FalseC、 TrueD、 071 程序运行时,如果单选框被用户选中,那么其Value属性值为 D ;A、0B、1C、FalseD、True72 下列是窗体文件的扩展名.AA、frmB、clsC、dllD、bas73要使标签能透出窗体的背景,必须设置C属性.A、AppearanceB、BorderStyleC、BackStyleD、BackColor74 当窗体被关闭时,系统自动执行该窗体的 A 事件过程;A、UnloadB、LoadC、LostFocusD、Click75 要使窗体运行时充满整个屏幕,应设置其 D 属性;A、AutoRedrawB、WidthC、 HeightD、WindowState76 要使得窗体一开始运行就充满整个屏幕则须设置属性. AA、windowstateB、borderstyleC、appearanceD、drawmode77 要使一个文本框具有水平和垂直滚动条,则应先将其MultiLine属性设置为True,然后再将ScrollBar属性设置为A.A、3B、0C、1D、278 决定控件上文字的字体、字形、大小及效果的属性是C.A、TEXTB、CAPTIONC、FONTD、NAME79 在窗体设计器窗口双击窗体的任何地方,可以打开的窗口是A.A、代码窗口B、以上3个选项都不对C、工程管理窗口D、属性窗口80 下列关于属性设置的叙述错误的是D.A、一个控件具有什么属性是VB预先设计好的,用户可以改变B、一个控件的属性即可以在属性窗口中设置,也可以用程序代码设置C、一个控件的属性在属性窗口中设置,还可以利用程序代码为其设置新值D、一个控件具有什么属性是VB预先设计好的,用户不能改变81 MaxLength属性可以设置文本框可以输入与显示的最多字符个数,当其值为0时表示D.A、不允许输入字符B、以上都不正确C、不允许输入任何字符,但显示不限制D、输入的字符长度不限82 下面C控件不具有Caption属性.A、标签框B、命令按钮C、文本框D、单选钮83 要使标签能够显示所需要的东西,则在程序中应设置其哪一属性的值D.A、NameB、TextC、AutoSizeD、Caption84 程序运行时,要限制文本框的输入长度,那么应设置 A ;A、MaxLengthB、EnabledC、LockedD、MultiLine85 事件的名称D.A、是不固定的B、有的由用户定义,有的由系统定义C、都要由用户定义D、都是由系统预先定义86若设置窗体的BorderStyle=1,则在程序运行时窗体的行为是A ;A、窗体没有最大化和最小化按钮,窗体可以移动,但不能改变大小;B、窗体有最大化和最小化按钮,窗体既可以移动,也可以改变大小;C、窗体没有最大化和最小化按钮,窗体既不能移动,也不能改变大小;D、窗体有最大化和最小化按钮,窗体可以移动,但不能改变大小;87 如果要设置窗体的标题栏,应选择以下那种属性D.A、TipsB、NameC、TextD、Caption88 要把一个命令按钮设置成无效,应设置其哪一属性值D.A、VisibleB、DefaultC、CancelD、Enabled89 将焦点主动设置到指定的控件或窗体上,应采用C方法.A、SetTextB、GetGataC、SetFocusD、SetData90 要使标签控件的大小随Caption 属性值而自动调整,应设置其 B 属性;A、AlignmentB、AutoSizeC、WidthD、Caption91 能够改变窗体边框线类型的属性是C.A、FontStyleB、BorderC、BorderStyleD、BackStyle92 要使Form1窗体的标题栏显示"欢迎使用VB",以下语句正确的是A.A、=〞欢迎使用VB〞B、="欢迎使用VB"C、=欢迎使用VBD、=ˊ欢迎使用VBˊ93 文本框所没有的属性是D.A、VisibleB、BackColorC、EnabledD、Caption94 在VB环境中,工程文件的扩展名是D.A、.frxB、.basC、.frmD、.vbp95 如果要在命令按钮上显示图形文件,应设置命令按钮的B.A、Style属性和Graphics属性B、Style属性和Picture属性C、Picture属性D、Graphics属性96 要使鼠标指向“命令按钮”时,出现一个提示文本,应设置其A 属性;A、ToolTipTextB、StyleC、PictureD、Caption97不论何控件,共同具有的属性是B.A、ForeColorB、NameC、CaptionD、Text98 要使标签控件标题内容居中显示,应设置其 B 属性;A、 ToolTipTextB、 AlignmentC、 BackStyleD、 Appearance99 使命令按钮获得“焦点”的方法是 A ;A、SetFocusB、MoveC、RefreshD、LinkSend100 改变控件在窗体中的上下位置应修改控件的属性. CA、HeightB、WideC、TopD、Left101、语句PRINT"SGN-26=";SGN-26的输出结果为CA、SGN-26=-26B、SGN-26=26C、SGN-26=-1D、SGN-26=+1102、若要使得文本框的初始值为空,则应更改文本框的属性是 AA、textB、indexC、nameD、caption103、要使得标签能自动扩充以满足字体大小则可对其 C属性进行设置.A、tagB、alignmentC、autosizeD、usemnemonic104、为了把焦点移到某个指定的控件,所使用指定的控件的 C 方法.A、VisibleB、RefreshC、SetFocusD、GetFocus105、如果要给字体加删除线,可以选择下列那种属性 C.A、FontSizeB、FontNameC、FontStrikethruD、FontUnderLine106、要设置标签控件字体的大小,应设置其 A 属性;A、FontB、HeightC、WidthD、Caption107、每个窗体对应一个窗体文件,窗体文件的扩展名是 A .A、.frmB、.vbpC、.basD、.cls108、标签控件最重要的属性是A.A、captionB、textC、nameD、width109、A对象不具有Caption属性.A、TimerB、FormC、OptionD、Label110、一个窗体上有三个文本框,按放置顺序分别是：Text1,Text2,Text3 ,若使程序运行时Text3首先获得“焦点”,那么,应设置其 B 属性值为 0 ;A、IndexB、TabindexC、TagD、Top111、如果要改变窗体的标题,则需要设置的属性是 D .A、BorderStyleB、NameC、BackColorD、Caption112、欲使某命令按钮失效,应修改命令按钮的C属性.A、EnableB、CaptionC、EnabledD、Visible113、为使文本框显示滚动条,必须首先设置的属性是D.A、AutosizeB、ScrollbarsC、AlignmentD、Mulitiline114、改变控件在窗体中的左右位置应修改该控件的B属性.A、RightB、LeftC、WidthD、Top115、要使标签中显示的文本靠右显示,则应将其Alignment属性设置为A.A、1B、3C、2D、0116、当设置文本框的ScrollBars=Both 而文本框确没有显示出滚动条,原因是A ;A、文本框的MultiLine=FalseB、文本框中没有内容C、文本框的MultiLine=TrueD、文本框的Locked=True117、要使文本框获得输入焦点,则应采用文本框控件的哪个方法D.A、KeyPressB、LostFocusC、GodFocusD、SetFocus118、假设窗体上有一个标签控件Label1和一个时钟控件Timer,要想每隔1秒钟,在标签Label1上显示一次系统当前时间,应在 A 事件过程中编写实现该功能的程序;A、Private Sub Timer1_TimerB、Private Sub Label1_DblClickC、Private Sub Label1_ChangeD、Private Sub Label1_Click119、如果设计时在属性窗口将命令按钮的B属性设置为False,则运行时按钮从窗体上消失.A、DisabledPictureB、VisibleC、DefaultD、Enabled120、一个窗体上有两个文本框,按放置顺序分别是：Text1,Text2 ,要想在Text1中按“回车”键,“焦点”自动转到Text2上,应在 D 事件过程中编写程序;A、Private Sub Text1_ClickB、Private Sub Text2_GotFocusC、Private Sub Text1_LostFocusD、Private Sub Text1_KeyPressKeyAscii As Integer121、文本框中选定的内容,由下列 A 属性反映.A、SeltextB、CaptionC、sellenghtD、Text122、下面4项中不属于面向对象系统三要素的是 A .A、变量B、事件C、方法D、属性123、若要使命令按钮不可操作,要设置的属性是 A .A、EnabledB、VisibleC、CaptionD、BackColor124、文本框控件中将Text的内容全部显示为所定义的字符的属性项是D.A、PasswordB、以上都不是C、需要编程来实现D、PasswordChar125、如果Print方法在窗体的Load事件过程中不起作用,原因是 A 属性值为false;A、AutoRedrawB、ControlBoxC、MoveableD、MaxButton126、inputBox函数返回值的类型为C.A、变体B、数值C、字符串D、数值或字符串视输入的数据而定127、窗体的Caption属性的作用是B.A、确定窗体的边界类型B、确定窗体的标题C、确定窗体的名称D、确定窗体的字体128、欲使标签的内容自动换行,必须设置属性A.A、WordWrapB、AutoSizeC、AlignmentD、left129、用来设置粗体字的属性是DA、FontItalicB、FontSizeC、FontNameD、FontBold130、Text1控件在运行时不可见,是设置下列B属性的结果.A、CancelB、VisibleC、ControlBoxD、Enabled131、若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的D属性.A、BORDERSTYLEB、BACKCOLORC、FORECOLORD、BACKSTYLE132、要使“命令按钮”在程序运行时不可见,可以将其 C 属性设置为False;A、CancelB、DefaultC、VisibleD、Enabled133、下列赋值语句正确的是D.A、=+B、=+C、=+D、=+134、不具有输入数据功能的控件是C控件.A、列表框B、选项按钮C、窗体D、文本框135、程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是A.A、LoadB、ClickC、MouseDownD、MouseUp136、列表框和组合框的 B 属性的值,表示其列表中项目的个数;A、 ListIndexB、 ListCountC、ListD、Text137、在定义静态数组时,关于下标的叙述中,正确的是 A ;A、省略下界,一般系统默认为：下界是 0B、下标可以是字符型C、下标下界最小为：-32768 ,下标上界最大为：32767D、下标可以是变量;138、下列程序：Private Sub Textl _ChangePrint Textl；End Sub当在文本框输入"1234"这4个字符时,窗体上显示的是 DA、1234B、1 12 123 1234C、1 2 3 4D、139、下面对象在运行时一定不可见. CA、LineB、OptionC、TimerD、Text140、若要清除列表框的所有内容,可用什么方法实现 CA、以上均不可以B、ClsC、ClearD、RemoveItem141、要使时钟控件Timer1的Timer事件不起作用,以下正确的语句是 AA、=FalseB、=0C、=1000D、=False142、为使计时器控件每隔5秒钟产生一个计时器事件Timer事件,则应将其Interval属性值设置为 D.A、300B、5C、500D、5000143、将数据项"China"添加到列表框List1中成为第一项应使用的语句是 A;A、〞China〞,0B、〞China〞,1C、 0, 〞China〞D、 1,〞China〞144、在程序代码中修改滚动条的value 属性时将激发滚动条的 D事件.A、scrollB、dragdropC、gotfocusD、change145、循环结构For I%= -1 to -17 Step -2 共执行 C次.A、6B、5C、9D、8146、执行下面的程序段后,x 的值为 Dx=5For i=1 To 20 Step 2x=x+i\5Next iA、24B、23C、22D、21147、由For k=10 to 0 step 3:next k循环语句控制的循环次数是 D. A、-11C、-10D、0148、下列方法中可用于列表框动态添加数据的是 D.A、removeitemB、addlistC、addD、additem149、组合框控件是将组合成一个控件. AA、列表框控件和文本框控件B、复选框控件和选项按钮控件C、标签控件和列表框控件D、标签控件和文本框控件150、下面程序段输出的结果是 DPrivate Sub Command1_Clickx = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd SubA、X=50B、X=218C、X=210D、X=58151、定时器的Interval属性以为单位指定Timer事件之间的时间间隔. CA、分B、微秒C、毫秒D、秒152、由For k=35 to 0 step 3:next k循环语句控制的循环次数是. AA、0B、-10C、12D、-11153、在列表框中当前被选中的列表项的序号是由下列哪个属性表示. CA、ListB、IndexC、ListIndexD、TabIndex154、设计动画通常使用时钟控件来控制动画速度. CA、EnabledB、TimerC、IntervalD、Move155、为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应将列表框的Multiselect属性设置为. CA、1B、3C、2D、0156、引用列表框的最后一项应使用. DA、ListCount-1B、C、ListCount157、列表框控件中的列表内容是通过属性设置的. AA、ListB、CaptionC、NameD、Text填空1.在窗体上已建立多个控件,如Text1,Label1,Command1,若要使程序一运行焦点就定位在Command1控件上,应对Command1控件的__tabindex___属性设置为_TabIndex____;2.日期表达式 2/24/02 - 2/12/02 的值为_12____;3 .已知a=,b=,c=,d=True,则表达式：a>=0 AND a+c>b+3 OR NOT d的值是_false____;4.表示x是5的倍数或是9的倍数的逻辑表达式为__x mod 5 = 0 OR x mod 9 = 0___;5.在刚建立工程时,使窗体上的所有控件具有相同的字体格式,就对__font___的属性进行设置;、Int、Fix、Fix的值分别是_-3____、___2__、__-2___、____3_;和TextBox控件用来显示和输入文本,如果仅需要让应用程序在窗体中显示文本信息,可使用_label___控件；若允许用户输入文本,则应使用_Textbox____控件;8.若命令按钮的名称为Cmdopen,程序要求单击该命令按钮时,打开一个窗口frm1,请对以下事件过程填空;Private Sub Cmdopen_Click_____end sub9.表达式93 \ 7 Mod 2 ^ 2 的值是__1___;10.表达式UcaseMid“abcdefgh”,3,4的值是__CDEF___;11.当程序运行时,要求窗体中的文本框呈现空白,则在设计时,应当在此文本框的__属性___窗口中,把此文本框的__text___属性设置成空白;12.已知a=3,b=4,c=5,表达式a>b and Not c>a Or c>b And c<a+b的值是__true___;表达式c>a And Not b<c的值是__false___;程序设计1.'------------------------------------------------'程序改错'------------------------------------------------'题目：程序功能：求1+2+3……,直到其和超出3000为' 止,并输出结果;'------------------------------------------------Option ExplicitPrivate Sub Form_ClickClsDim i As IntegerDim s As Singlei =0s = 1Do'ERRORi = i + 2s = s + i'ERRORLoop s > 3000Print "从1 到:"; i; "的和是"; sEnd Sub答案学生答案i = i + 2参考答案i=i+12. '------------------------------------------------'程序改错'------------------------------------------------862'题目：以下程序段用于输出100-300的所有素数'------------------------------------------------Option ExplicitPrivate Sub Form_ClickDim n As Integer, k As Integer, i As Integer, swit As Integer For n = 101 To 300 Step 2k = IntSqrni = 2'ERRORswit = 1'ERRORWhile swit = 0If n Mod i = 0 Thenswit = 1Else'ERRORi = i - 1End IfWendIf swit = 0 ThenPrint n;End IfNext n答案学生答案swit = 1参考答案swit=0学生答案While swit = 0参考答案While i<=k And swit =0While k>=i And swit=0While swit=0 And i<=kWhile swit=0 And k>=i学生答案i = i - 1参考答案i=i+1ExplicitPrivate Sub Form_ClickDim i As Integer, j As Integer, k As Integer Print Tab30; "99 table"Print: PrintPrint " ";For i = 1 To 9'ERRORPrint Tabi 6; iNext iPrintFor j = 1 To 9Print j; " ";For k = 1 To jPrint Tabk 6; j k; " ";'ERRORNext jPrint'ERRORNext k答案学生答案Print Tabi 6; i参考答案Print Tabi 6; i;学生答案Next j参考答案Next k学生答案Next k参考答案Next j4.'------------------------------------------------ '程序改错'------------------------------------------------ '题目：以下程序段用于计算5的N次方;'------------------------------------------------ Option ExplicitPrivate Sub Form_ClickDim n As Integer, k As Integer, s As Long n = InputBox" Input n "'ERRORk = 0'ERRORs = 0Do While k <= ns = s 5k = k + 1'ERRORNextPrint "5的"; "n次方是"; sEnd Sub答案学生答案k = 0参考答案k=1学生答案s = 0参考答案s=1学生答案Next参考答案loop'------------------------------------------------ 5.'程序改错'------------------------------------------------ '题目：以下程序段用于打印如图1所示的九九乘法表：'------------------------------------------------ Option ExplicitPrivate Sub Form_ClickDim i As Integer, j As Integer, k As IntegerPrint Tab30; "99 table"Print: PrintPrint " ";For i = 1 To 9'ERRORPrint Tabi 6; iNext iPrintFor j = 1 To 9Print j; " ";'ERRORFor k = 1 To 9'ERRORPrint Tabj 6; j k; " ";Next kPrintNext jEnd Sub答案学生答案Print Tabi 6; i参考答案Print Tabi6;i;学生答案For k = 1 To 9参考答案For k = 1 To j学生答案Print Tabj 6; j k; " ";参考答案Print Tabk6;jk;" ";6.'程序改错'------------------------------------------------ '题目：下面程序可输出如下图形：''''''------------------------------------------------Option ExplicitPrivate Sub Form_ClickDim m As Integer, n As Integer, s As String, i As Integer, j As Integer n = 4m = 1s = ""For i = 5 To 1 Step -1'ERRORPrint SpcnFor j = 1 To 2 m - 1Print s;Next jPrint'ERRORn = n + 1'ERRORm = m - 1Next i答案学生答案Print Spcn参考答案Print Spcn;Print Spci;Spcn;Spci;学生答案n = n + 1参考答案n=n-1n=-1+n学生答案m = m - 1参考答案m=m+17.'题目：以下程序段用于输出100-300的所有素数'------------------------------------------------Option ExplicitPrivate Sub Form_ClickDim n As Integer, k As Integer, i As Integer, swit As Integer For i = 101 To 299k = IntSqriFor n = 2 To kIf i Mod n = 0 Then'ERRORExitEnd IfNext n'ERRORIf n < k ThenPrint i;End If'ERRORNext n'Print i答案学生答案Exit参考答案exit for学生答案If n < k Then参考答案If n>k ThenIf k<n Then学生答案Next n参考答案next iNext i程序填空1.'从键盘输入三个整数,从其中找出最大值并输出到窗口Private Sub Form_ClickDim a%, b%, c%, max%a = ValInputBox"请输入一个整数"b = ValInputBox"请输入一个整数"c = ValInputBox"请输入一个整数"max=a'FILLIf ______Thenmax=bEnd IfIf max < c Then'FILL________End If'FILLPrint a; "、"; b; "、"; c; "中最大值是";______End Sub答案学生答案If ______Then参考答案max<bmax<=bb>maxb>=max学生答案________参考答案max=c学生答案Print a; "、"; b; "、"; c; "中最大值是";______参考答案max2.以下程序的功能;'Private Sub Form_ClickDim a%, b%, c%, dDim x1, x2Dim p, q, ra = InputBox"请输入a的值"b = InputBox"请输入b的值"c = InputBox"请输入c的值"d = b b - 4 a cp = -b / 2 aIf d >= 0 Then'FILLIf _____ Thenr = Sqrd / 2 ax1 = p + rx2 = p - rElsex1 = px2 = p'FILL_____Print "x1="; x1, "x2="; x2'FILL_____q = Sqr-d / 2 aPrint "x1="; p; "+"; q; "i", "x2="; p; "-"; q; "i" End If答案学生答案If _____ Then参考答案d>0学生答案_____参考答案End ifEnd Ifend if学生答案_____参考答案elseElseELSE3.'从键盘输入学生分数,统计学生总人数和各分数段人数, '即优秀90-100、良好80-89、中等70-79、' 及格60-69、不及格60以下的人数;Private Sub Form_ClickDim score%, n1%, n2%, n3%, n4%, n5%msg = "请输入分数-1结束"msgtitile = "输入数据"score = ValInputBoxmsg, msgtitle'FILLWhile _____total = total + 1'FILLSelect Case _____Case Is >= 90n1 = n1 + 1Case Is >= 80n2 = n2 + 1Case Is >= 70n3 = n3 + 1Case Is >= 60n4 = n4 + 1Case Elsen5 = n5 + 1'FILL_____score = ValInputBoxmsg, msgtitleWendPrint n1, n2, n3, n4, n5, totalEnd Sub答案学生答案While _____参考答案score>=0 and score<=100score>=0 and score<=100score<>-1学生答案Select Case _____参考答案score学生答案_____参考答案End Select4．以下程序段用于实现：输入两个正整数m和n,求其最大'公因数和最小公倍数;Private Sub Form_ClickDim a%, b%, num1%, num2%, tempnum1 = InputBox"请输入一个正整数"num2 = InputBox"请输入一个正整数"'FILLIf _____ Thentemp = num1: num1 = num2: num2 = tempEnd Ifa = num1b = num2Do While _____temp = a Mod ba = b'FILL_____LoopPrint "最大公因数为："; aPrint "最小公倍数为："; num1 num2 / a答案学生答案If _____ Then参考答案num1<num2num2>num1学生答案Do While _____参考答案b<>0b>00<btemp<>0temp>00<tempNot b=0Not 0=b学生答案_____参考答案b=temp5．'以下程序用于判断一个正整数≥3是否为素数;' Private Sub Form_Clickn = InputBox"请输入一个正整数≥3"k = IntSqrni = 2swit = 0'FILLDo While i <= k And _____'FILLIf _____ Thenswit = 1Else_____End IfLoopIf swit = 0 ThenPrint n; "是一个素数"ElsePrint n; "不是素数"End IfEnd Sub答案学生答案Do While i <= k And _____参考答案swit=0学生答案If _____ Then参考答案n Mod i = 0n \ i = n / in / i = int n / i学生答案_____参考答案i = i + 16．题目：从键盘上输入一串字符,以""结束,统计输入字符中的' 大、小写字母和数字的个数;Private Sub Form_ClickDim ch$, n1%, n2%, n3%n1 = 0n2 = 0n3 = 0ch = InputBox"请输入一个字符"'FILLDo While _____Select Case chCase "a" To "z"n1 = n1 + 1'FILLCase _____n2 = n2 + 1Case "0" To "9"n3 = n3 + 1End Selectch = InputBox"请输入一个字符"'FILL_____Print n1, n2, n3答案学生答案Do While _____参考答案do while ch<>""Do While ch<>""学生答案Case _____参考答案case "A" to "Z"Case "A" to "Z"学生答案_____参考答案loopLoop窗体设计1 在名称为Form1的窗体上画一个文本框,名称为Txt1；再画一个命令按钮,名称为C1,标题为"移动",如图1所示;请编写适当的事件过程,使得在运行时,单击"移动"按钮,文本框水平移动到窗体的最左端如图2所示;程序中不得使用任何变量;注意：完成题目后,必须保存工程后再关闭;控件标准答案：Name=C1学生答案：Name=控件属性评分错误控件标准答案：Caption=移动学生答案：Caption=控件属性评分错误控件标准答案：Name=Txt1学生答案：Name=事件评分错误事件Private Sub C1_Click标准答案： = 0学生答案：二 1、利用 VB设计上面的程序界面;窗体的标题为"字体修改"；其中包括一名称为Label1,标题为"请输入文字"的标签；一名称为Text1,内容为空的文本框；名称为Command1,标题为"隶书",名称为Command2,标题为"黑体"的两个命令按钮;2、程序功能：单击"隶书"命令按钮时,文本框的字体设为"隶书"；单击"黑体"命令按钮时,文本框的字体设置为"黑体";提示：不能使用任何变量事件Private Sub Command2_Click标准答案： = "黑体"学生答案：控件属性评分错误控件标准答案：Caption=隶书学生答案：Caption=事件评分错误事件Private Sub Command1_Click标准答案： = "隶书"学生答案：控件属性评分错误控件标准答案：Caption=请输入文字学生答案：Caption=三在名称为Form1的窗体上建立一个名称为List1的列表框;要求：在程序运行后,通过Form_Load事件过程加载窗体时,执行语句 "AAA",每当单击某个列表项时,都执行语句一次,如图所示;事件Private Sub Form_Load标准答案： "AAA"学生答案：事件评分错误事件Private Sub List1_Click标准答案：四在名称为Form1的窗体上建立一个水平滚动条,名称为HS1,其最大值为100,最小值为0;要求程序运行后,每次移动滚动框时,都执行语句 ,如图所示程序中不能使用任何变量事件Private Sub HS1_Scroll标准答案： Print学生答案：控件属性评分错误控件标准答案：Name=HS1学生答案：Name=控件属性评分错误控件标准答案：Max=100五 1、在名称为Form1的窗体上建立一个名称为l1的标签,并设置他不可见；两个名称为cmd1和cmd2,标题分别为"显示1"和"显示2"的命令按钮;2、编写适当的事件过程,要求程序运行后,如果单击"显示1"命令按钮,则标签可见并显示字符串"aaa"；如果单击"显示2"命令按钮,则标签可见并显示字符串"bbb";程序中不能使用任何变量,直接显示字符串；不能使用默认属性;程序开始运行时界面如图1所示标准答案：Caption=显示1学生答案：Caption=控件属性评分错误控件标准答案：Visible=0 'False学生答案：Visible=控件属性评分错误控件标准答案：Name=l1学生答案：Name=控件属性评分错误控件标准答案：Name=cmd2学生答案：Name=控件属性评分错误控件标准答案：Name=cmd1学生答案：Name=事件评分错误事件Private Sub cmd1_Click标准答案： = True= "aaa"学生答案：事件评分错误事件Private Sub cmd2_Click标准答案： = "bbb"六 1、在名称为Form1的窗体上画一个文本框,名称为Text1,且不可见；再画两个命令按钮,名称分别为c1和c2,标题分别为"隐藏"和"显示";2、请编写适当的事件过程,使得在运行时,如果单击"隐藏"按钮,则文本框消失；如果单击"显示"按钮,则文本框显示出来,如图1和图2所示;程序中不得使用任何变量;控件属性评分错误控件标准答案：Name=c2学生答案：Name=控件属性评分错误控件标准答案：Caption=显示学生答案：Caption=控件属性评分错误控件标准答案：Name=c1学生答案：Name=控件属性评分错误控件标准答案：Caption=隐藏学生答案：Caption=控件属性评分错误控件标准答案：Visible=0 'False学生答案：Visible=事件评分错误事件Private Sub c2_Click标准答案： = True学生答案：事件评分错误事件Private Sub c1_Click标准答案： = False学生答案：七标题为"输出"的命令按钮,如图1-12所示;要求程序运行后,在文本框输入几个字符,单击"输出"按钮,则在窗体上显示文本框中的文字;注意：在程序中不能使用任何变量,不能使用默认属性;控件属性评分错误控件标准答案：Name=Cmd1学生答案：Name=控件属性评分错误控件标准答案：Caption=输出学生答案：Caption=事件评分错误事件Private Sub Cmd1_Click标准答案： Print学生答案：八在名为Form1的窗体上画一个框架,名称为Frm1,标题为"框架",高度为2500,宽度为4000,框架内建立一文本框,距左边框600,距框架的上边框1200,文本框中的初始内容设置为"文本框",如图所示;注意：完成试题后,必须保存,然后关闭窗口;控件属性评分错误控件标准答案：Name=Frm1学生答案：Name=控件属性评分错误控件标准答案：Height=2500学生答案：Height=控件属性评分错误控件标准答案：Width=4000学生答案：Width=控件属性评分错误控件标准答案：Left=600学生答案：Left=控件属性评分错误控件标准答案：Text=文本框学生答案：Text=控件属性评分错误控件标准答案：Top=1200学生答案：Top=九 2、界面中窗体的标题为：密码的显示；3、窗体中包括两个文本框,他们的名称分别为p asstxt和showtxt,其中：passtxt用于密码输入,当在其中输入信息时,显示为""；4、showtxt文本框,在程序运行时不能用,只能显示密码;5、具体功能：程序运行时,当在文本框passtxt中输入密码时,showtxt中同时将输入的内容原样显示;提示：不能使用任何变量,不能使用默认属性窗体属性评分错误窗体标准答案：Caption=密码的显示学生答案：Caption=Form1控件属性评分错误控件标准答案：Name=showtxt学生答案：Name=控件属性评分错误控件标准答案：Enabled=0 'False学生答案：Enabled=。

vb期末考试试题及答案百度文库一、单项选择题（每题2分，共20分）1. VB中，哪个关键字用于声明变量？A. DimB. SetC. CallD. Function答案：A2. 下列哪个选项不是VB的数据类型？A. IntegerB. StringC. BooleanD. Array答案：D3. VB中，哪个函数用于计算字符串的长度？A. LenB. UBoundC. LBoundD. Sqr答案：A4. 在VB中，如何表示“不等于”？A. =B. ==C. <>D. !=答案：C5. VB中，哪个关键字用于循环结构？A. ForB. NextC. ToD. Loop答案：A6. VB中，哪个函数用于将字符串转换为大写？A. StrConvB. LCaseC. UCaseD. Trim答案：C7. VB中，哪个语句用于退出子程序？A. Exit SubB. End SubC. ReturnD. Exit Function答案：A8. VB中，哪个关键字用于声明函数？A. FunctionB. SubC. DimD. Const答案：A9. VB中，哪个关键字用于声明常量？A. DimB. ConstC. PrivateD. Public答案：B10. VB中，哪个函数用于获取当前日期？A. NowB. DateC. TimeD. Today答案：D二、填空题（每题3分，共15分）1. 在VB中，使用________关键字可以定义一个类。

答案：Class2. VB中，________函数用于获取当前时间。

答案：Time3. VB中，________关键字用于定义一个接口。

答案：Interface4. VB中，________关键字用于定义一个事件。

答案：Event5. VB中，________关键字用于定义一个属性。

答案：Property三、简答题（每题5分，共20分）1. 请简述VB中的事件驱动编程是什么？答案：事件驱动编程是一种编程范式，其中程序的执行流程由外部事件（如用户操作、消息、定时器等）触发，而不是按照预先定义的顺序执行。

vb程序设计教程期末复习题及答案一、选择题1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 以下哪个是VB中的过程？A. FunctionB. SubC. Both A and BD. None of the above答案：C3. 在VB中，哪个关键字用于声明变量？A. DimB. DeclareC. ConstD. Option答案：A4. VB中的哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B5. 如何在VB中创建一个事件处理程序？A. 使用On关键字B. 使用Handles关键字C. 使用WithEvents关键字D. 使用Event关键字答案：B二、填空题1. VB中的________关键字用于声明一个数组。

答案：Dim2. 在VB中，________方法用于结束一个循环。

答案：Exit3. VB中的________控件允许用户从列表中选择一个或多个项目。

答案：ComboBox4. 使用________方法可以在VB中打开一个文件。

答案：Open5. VB中的________函数用于计算字符串的长度。

答案：Len三、简答题1. 描述VB中如何使用If...Then...Else语句。

答案：If...Then...Else语句用于根据条件执行不同的代码块。

如果条件为真，则执行Then后面的代码；如果条件为假，则执行Else 后面的代码。

2. 解释VB中的继承是如何工作的。

答案：在VB中，继承允许一个类（子类）继承另一个类（父类）的属性和方法。

子类可以扩展或重写父类的功能，但不能访问父类的私有成员。

3. 什么是VB中的多态性？答案：多态性是指允许不同类的对象对同一消息做出响应的能力。

在VB中，多态性通常是通过接口或抽象类实现的，允许子类以自己的方式实现接口或抽象类中定义的方法。

大学vb期末考试题库及答案一、单项选择题（每题2分，共20分）1. VB中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. End答案：A2. 在VB中，以下哪个函数用于计算两个数的和？A. SumB. AddC. TotalD. +答案：D3. VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A4. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Height答案：A5. VB中，以下哪个事件用于响应鼠标单击事件？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A6. 在VB中，以下哪个关键字用于循环结构？A. ForB. IfC. WhileD. Select答案：A7. VB中，以下哪个函数用于获取当前日期？A. NowB. DateC. TimeD. Today答案：D8. 在VB中，以下哪个属性用于设置文本框的只读状态？A. ReadOnlyB. EnabledC. VisibleD. MultiLine答案：A9. VB中，以下哪个控件用于选择单个项目？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B10. 在VB中，以下哪个事件用于响应文本框内容改变事件？A. ChangeB. ClickC. KeyPressD. TextChanged答案：A二、填空题（每题2分，共20分）1. VB中，声明变量的关键字是________。

答案：Dim2. VB中，用于计算两个数的乘积的运算符是________。

答案：*3. VB中，用于显示消息框的函数是________。

答案：MsgBox4. VB中，用于设置控件的标题的属性是________。

vb期末考试过程试题及答案VB期末考试过程试题及答案1. 选择题(1) 在Visual Basic中，用于声明变量的关键字是：A. DimB. DeclareC. SetD. Const答案：A(2) 下列哪个选项是Visual Basic中用于循环的语句？A. IfB. ForC. SelectD. Do答案：B2. 填空题(1) 在VB中，使用________关键字可以定义一个子程序。

答案：Sub(2) 用于在VB中声明全局变量的关键字是________。

答案：Public3. 简答题(1) 简述Visual Basic中的事件驱动编程的概念。

答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户输入、系统消息等）触发，而不是按照预先定义的顺序执行。

(2) 解释Visual Basic中的类和对象的概念。

答案：在Visual Basic中，类是一种用户定义的数据类型，它定义了一组属性、方法和事件。

对象是类的实例，具有类定义的属性和方法，可以独立操作。

4. 编程题(1) 编写一个VB程序，实现用户输入一个数字，程序输出该数字的平方。

答案：```vbSub CalculateSquare()Dim number As Integernumber = InputBox("请输入一个数字：")MsgBox "该数字的平方是：" & number * numberEnd Sub```(2) 编写一个VB程序，实现一个简单的计算器，可以进行加、减、乘、除运算。

答案：```vbSub SimpleCalculator()Dim num1 As DoubleDim num2 As DoubleDim result As DoubleDim operation As Stringnum1 = Val(InputBox("请输入第一个数字："))operation = InputBox("请输入运算符（+、-、*、/）：")num2 = Val(InputBox("请输入第二个数字："))Select Case operationCase "+"result = num1 + num2Case "-"result = num1 - num2Case "*"result = num1 * num2Case "/"If num2 <> 0 Thenresult = num1 / num2ElseMsgBox "除数不能为0"Exit SubEnd IfCase ElseMsgBox "无效的运算符"Exit SubEnd SelectMsgBox "运算结果是：" & resultEnd Sub```5. 论述题(1) 论述Visual Basic中的异常处理机制。

大学生vb期末考试题库及答案一、选择题（每题2分，共20分）1. VB中，下列哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D2. 在VB中，下列哪个关键字用于声明一个过程？A. FunctionB. SubC. ProcedureD. Method答案：B3. VB中，下列哪个选项是用于声明一个变量的？A. DimB. DeclareC. VarD. Let答案：A4. 在VB中，下列哪个选项是用于控制循环的？A. DoB. ForC. WhileD. All of the above5. VB中，下列哪个函数用于计算一个数的绝对值？A. AbsB. SgnC. RoundD. Int答案：A6. 在VB中，下列哪个选项是用于打开一个文件的？A. OpenB. CloseC. ReadD. Write答案：A7. VB中，下列哪个选项是用于关闭一个文件的？A. OpenB. CloseC. ReadD. Write答案：B8. 在VB中，下列哪个选项是用于读取文件内容的？A. OpenB. CloseC. ReadD. Write答案：C9. VB中，下列哪个选项是用于写入文件内容的？B. CloseC. ReadD. Write答案：D10. 在VB中，下列哪个选项是用于声明一个数组的？A. DimB. DeclareC. VarD. Let答案：A二、填空题（每题2分，共20分）1. 在VB中，使用________关键字可以创建一个类。

答案：Class2. VB中，使用________关键字可以创建一个对象。

答案：New3. 在VB中，使用________关键字可以声明一个常量。

答案：Const4. VB中，使用________关键字可以声明一个枚举。

答案：Enum5. 在VB中，使用________关键字可以声明一个结构体。