二级VB综合试题及答案深度挖掘

二级VB综合试题及答案深度挖掘

一、单选题

1.在VB中，若要使一个文本框只允许输入数字，应该设置该文本框的（）属性（1分）A.MaxLengthB.TextC.FormatD.Locked【答案】C【解析】Format属性可以格式化文本框的输入，包括只允许输入数字

2.在VB中，以下哪个控件不支持设置背景图片？（1分）A.LabelB.TextBoxC.FrameD.CommandButton【答案】B【解析】TextBox控件不支持设置背景图片

3.在VB中，若要在程序运行时隐藏窗体，应该设置该窗体的（）属性（1分）A.VisibleB.EnabledC.DefaultD.Minimized【答案】A【解析】Visible属性控制窗体是否可见

4.在VB中，以下哪个语句用于退出循环？（1分）A.ExitSubB.ExitFunctionC.ExitForD.ExitDo【答案】C【解析】ExitFor语句用于退出For循环

5.在VB中，若要判断一个变量是否为空，应该使用（）函数？（1分）A.IsNullB.IsEmptyC.IsNumericD.IsArray【答案】A【解析】IsNull函数用于判断一个变量是否为空

6.在VB中，以下哪个控件用于显示信息提示框？（1分）A.MsgBoxB.MessageBoxC.MessageD.Dialog【答案】A【解析】MsgBox函数用于显示信息提示框

7.在VB中，以下哪个语句用于声明一个常量？（1分）A.DimB.PublicC.ConstD.Var【答案】C【解析】Const语句用于声明一个常量

8.在VB中，以下哪个属性用于设置控件的名称？（1分）A.NameB.TextC.CaptionD.ID【答案】A【解析】Name属性用于设置控件的名称

9.在VB中，以下哪个方法用于关闭窗体？（1分）A.CloseB.EndC.QuitD.Exit【答案】A【解析】Close方法用于关闭窗体

10.在VB中，以下哪个控件用于显示复选框？（1分）A.OptionButtonB.CheckBoxC.RadioButtonD.ListBox【答案】B【解析】CheckBox控件用于显示复选框

二、多选题（每题4分，共20分）

1.以下哪些是VB中的数据类型？（）A.IntegerB.StringC.BooleanD.FloatE.Date【答案】A、B、C、D、E【解析】VB中的数据类型包括Integer、String、Boolean、Float和Date

2.以下哪些控件可以用于显示图形？（）A.PictureBoxB.ImageC.ShapeD.LabelE.TextBox【答案】A、B、C【解析】PictureBox、Image和Shape控件可以用于显示图形

3.以下哪些语句可以用于条件判断？（）A.If...ThenB.If...Then...ElseC.SelectCaseD.For...NextE.While...Wend【答案】A、B、C【解析】If...Then、If...Then...Else和SelectCase语句可以用于条件判断

4.以下哪些属性可以用于设置控件的字体？（）A.FontNameB.FontSizeC.FontBoldD.FontItalicE.FontColor【答案】A、B、C、D、E【解析】FontName、FontSize、FontBold、FontItalic和FontColor属性可以用于设置控件的字体

5.以下哪些方法可以用于打开一个文件？（）A.OpenB.CloseC.ReadD.WriteE.OpenTextFile【答案】A、E【解析】Open和OpenTextFile方法可以用于打开一个文件

三、填空题

1.在VB中，若要使一个按钮在鼠标点击时执行某个操作，应该为该按钮编写______事件过程（2分）【答案】Click

2.在VB中，若要使一个文本框只允许输入字母，应该设置该文本框的______属性为Alpha（2分）【答案】Format

3.在VB中，若要在程序运行时隐藏窗体，应该设置该窗体的______属性为False（2分）【答案】Visible

4.在VB中，若要判断一个变量是否为空，应该使用______函数（2分）【答案】IsNull

5.在VB中，以下哪个语句用于声明一个常量？（2分）【答案】Const

四、判断题

1.两个负数相加，和一定比其中一个数大（）（2分）【答案】（×）【解析】如-5+-3=-8，和比两个数都小

2.在VB中，若要使一个文本框只允许输入数字，应该设置该文本框的Format属性为Numeric（）（2分）【答案】（√）【解析】Format属性可以格式化文本框的输入，包括只允许输入数字

3.在VB中，以下哪个控件不支持设置背景图片？（）（2分）【答案】（√）【解析】TextBox控件不支持设置背景图片

4.在VB中，若要在程序运行时隐藏窗体，应该设置该窗体的Visible属性为False（）（2分）【答案】（√）【解析】Visible属性控制窗体是否可见

5.在VB中，以下哪个语句用于声明一个常量？（）（2分）【答案】（√）【解析】Const语句用于声明一个常量

五、简答题

1.简述在VB中如何声明一个数组并初始化（2分）【答案】在VB中，可以使用Dim语句声明一个数组，并使用赋值语句初始化例如```vbDimarr1To5AsIntegerarr1=1arr2=2arr3=3arr4=4arr5=5```

2.简述在VB中如何使用MsgBox函数显示信息提示框（2分）【答案】在VB中，可以使用MsgBox函数显示信息提示框例如```vbMsgBox这是一个信息提示框,vbInformation,提示```

3.简述在VB中如何设置控件的字体（2分）【答案】在VB中，可以使用控件的Font属性设置字体例如```vbLabel

1.FontName=ArialLabel

1.FontSize=12Label

1.FontBold=True```

六、分析题

1.分析以下代码的功能，并说明如何修改代码以实现不同的功能（10分）```vbPrivateSubCommand1_ClickDimiAsIntegerFori=1To10PrintiNextiEndSub```【答案】该代码的功能是从1到10依次打印数字要修改代码以实现不同的功能，可以修改For循环的条件或Print语句的内容例如，要打印从10到1的数字，可以将For循环修改为```vbPrivateSubCommand1_ClickDimiAsIntegerFori=10To1Step-1PrintiNextiEndSub```

2.分析以下代码的功能，并说明如何修改代码以实现不同的功能（10分）```vbPrivateSubCommand2_ClickDimnumAsIntegernum=InputBox请输入一个数字Ifnum0ThenMsgBox输入的数字是正数ElseMsgBox输入的数字不是正数EndIfEndSub```【答案】该代码的功能是提示用户输入一个数字，并根据输入的数字是正数还是非正数显示不同的信息提示框要修改代码以实现不同的功能，可以修改条件判断或信息提示框的内容例如，要判断输入的数字是偶数还是奇数，可以将条件判断修改为```vbPrivateSubCommand2_ClickDimnumAsIntegernum=InputBox请输入一个数字IfnumMod2=0ThenMsgBox输入的数字是偶数ElseMsgBox输入的数字是奇数EndIfEndSub```

七、综合应用题

1.编写一个VB程序，实现以下功能用户输入两个数字，程序计算并显示这两个数字的和、差、积、商（20分）【答案】以下是一个示例代码```vbPrivateSubCommand1_ClickDimnum1AsDoubleDimnum2AsDoubleDimsumAsDoubleDimdiffAsDoubleDimprodAsDoubleDimquotAsDoublenum1=InputBox请输入第一个数字num2=InputBox请输入第二个数字sum=num1+num2diff=num1-num2prod=num1num2quot=num1/num2MsgBox和sumvbCrLf差diffvbCrLf积prodvbCrLf商quotEndSub```

2.编写一个VB程序，实现以下功能用户输入一个数字，程序判断该数字是正数、负数还是零，并显示相应的信息提示框（20分）【答案】以下是一个示例代码```vbPrivateSubCommand2_ClickDimnumAsDoublenum=InputBox请输入一个数字Ifnum0ThenMsgBox输入的数字是正数ElseIfnum0ThenMsgBox输入的数字是负数ElseMsgBox输入的数字是零EndIfEndSub```---标准答案

一、单选题

1.C

2.B

3.A

4.C

5.A

6.A

7.C

8.A

9.A

10.B

二、多选题

1.A、B、C、D、E

2.A、B、C

3.A、B、C

4.A、B、C、D、E

5.A、E

三、填空题

1.Click

2.Format

3.Visible

4.IsNull

5.Const

四、判断题

1.（×）

2.（√）

3.（√）

4.（√）

5.（√）

五、简答题

1.在VB中，可以使用Dim语句声明一个数组，并使用赋值语句初始化例如```vbDimarr1To5AsIntegerarr1=1arr2=2arr3=3arr4=4arr5=5```

2.在VB中，可以使用MsgBox函数显示信息提示框例如```vbMsgBox这是一个信息提示框,vbInformation,提示```

3.在VB中，可以使用控件的Font属性设置字体例如```vbLabel

1.FontName=ArialLabel

1.FontSize=12Label

1.FontBold=True```

六、分析题

1.该代码的功能是从1到10依次打印数字要修改代码以实现不同的功能，可以修改For循环的条件或Print语句的内容例如，要打印从10到1的数字，可以将For循环修改为```vbPrivateSubCommand1_ClickDimiAsIntegerFori=10To1Step-1PrintiNextiEndSub```

2.该代码的功能是提示用户输入一个数字，并根据输入的数字是正数还是非正数显示不同的信息提示框要修改代码以实现不同的功能，可以修改条件判断或信息提示框的内容例如，要判断输入的数字是偶数还是奇数，可以将条件判断修改为```vbPrivateSubCommand2_ClickDimnumAsIntegernum=InputBox请输入一个数字IfnumMod2=0ThenMsgBox输入的数字是偶数ElseMsgBox输入的数字是奇数EndIfEndSub```

七、综合应用题

1.以下是一个示例代码```vbPrivateSubCommand1_ClickDimnum1AsDoubleDimnum2AsDoubleDimsumAsDoubleDimdiffAsDoubleDimprodAsDoubleDimquotAsDoublenum1=InputBox请输入第一个数字num2=InputBox请输入第二个数字sum=num1+num2diff=num1-num2prod=num1num2quot=num1/num2MsgBox和sumvbCrLf差diffvbCrLf积prodvbCrLf商quotEndSub```

2.以下是一个示例代码```vbPrivateSubCommand2_ClickDimnumAsDoublenum=InputBox请输入一个数字Ifnum0ThenMsgBox输入的数字是正数ElseIfnum0ThenMsgBox输入的数字是负数ElseMsgBox输入的数字是零EndIfEndSub```。