项目八 Visual Basic常用内部控件《Visual Basic程序设计》（电工版第六版）章节过关卷

《Visual Basic程序设计（第6版)》电子工业出版社 项目八 Visual Basic常用内部控件 考试时间：90分钟 满分：100分 姓名 班级 学号 1、 单项选择题（本题共20小题，每题3分，共60分） 1. 窗体的标题栏显示内容由窗体对象的（ ）属性决定。 A.BackColor B.BackStyle C.Text D.Caption 【答案】D 【解析】 Caption 是窗体、按钮、标签等可视化控件的核心属性，专门用于设置显示的标题文字。 2.窗体的边框样式由窗体对象的（ ）属性来设置。 A.BackStyle B.BorderStyle C.WindowState D.FillStyle 【答案】B 【解析】BorderStyle 是窗体专门用于设置边框样式的核心属性，不同取值对应不同的边框效果。 3.运行程序时，系统自动执行窗体的（ ）事件。 A. load B. click C. unload D. GotFocus 【答案】A 【解析】程序启动时系统自动执行窗体的 Load 事件，用于初始化。 4.标签框文本的对齐方式由（ ）属性来决定。 A.Align B.Alignment C.Autosize D.BackStyle 【答案】B 【解析】Alignment 是标签（Label）专门用于设置文本对齐方式的核心属性。 5.若要取消窗体的最大化功能，则可设置（ ）属性为False来实现。 A.ControlBox B.MinButton C.MaxButton D.Enabled 【答案】C 【解析】MaxButton 是窗体专门用于控制最大化按钮的属性。 6、可以用作其它控件容器的控件有（ ） A.窗体控件，列表控件，图像控件 B.窗体控件，文本框控件，框架控件 C.窗体控件，框架控件，图片框控件 D.窗体控件，标签控件，图片控件 【答案】C 【解析】窗体：顶级容器，所有控件的基础容器；框架：专门用于分组的容器（如单选按钮分组）；图片框：可容纳控件。 7、若要设置文本框中所显示的文本颜色，使用的属性是（ ）。 A. BackColor B. FillColor C. ForeColor D. BackStyle 【答案】C 【解析】ForeColor（前景色）是所有可显示文字的控件（文本框、标签、按钮等）的核心属性，专门用于设置文字的显示颜色。 8、命令按钮Command1的Caption属性为“退出(x)”，要将命令按钮的快捷键设为Alt+x，应修改Caption属性为（ ）。 A. 在x前插入& B. 在x后插入& C. 在x前插入# D. 在x后插入# 【答案】A 【解析】VB 中设置控件快捷键（Alt + 字母）的核心规则是：在Caption属性的目标字母前添加 & 符号，该字母会自动带下划线，按下Alt+该字母即可触发控件的Click事件。 9、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（ ）属性来实现。 A.SelStart B.SelLength C.Text D.SelText 【答案】D 【解析】SelText 是专门用于获取 / 设置用户选中的文本内容的属性。 10、若要设置文本框最大可接收的字符数，可通过（ ）属性来实现。 A.MultiLine B.Length C.Max D.MaxLength 【答案】D 【解析】MaxLength 是文本框专门用于设置最大可接收字符数的核心属性。 11、对于某对象的SetFocus和GotFocus描述中，正确的是( )。 A．SetFocus是方法，GotFocus事件 B．SetFocus是事件，GotFocus是事件 C．SetFocus是方法，GotFocus是方法 D．SetFocus是事件，GotFocus是方法 【答案】A 【解析】SetFocus（方法）：作用是主动让指定控件获得焦点,GotFocus（事件）：作用是当控件获得焦点时触发的响应。 12、单击滚动条两端的箭头时，滚动条Value属性值的改变量由（ ）属性值决定。 A．LargeChange B．Max C．SmallChange D．Min 【答案】C 【解析】SmallChange 单击滚动条两端箭头时，Value 属性的每次改变量（小幅度调整）。 13、以下关于复选框的说法，正确的是（ ） A.一个窗体上的所有复选框一次只能有一个被选中 B.一个容器中的所有复选框一次只能有一个被选中 C.在一个容器中的复选框可以同时有多个被选中 D.无论是在容器中还是在窗体中，都不可以同时选 【答案】C 【解析】复选框的核心特性是支持多选，容器不改变这一规则；单选按钮才受容器限制，同一容器内互斥。 14、当用户按下并且释放一个后会触发KeyPress、KeyUp和KeyDown事件，这3个事件发生的顺序是( ) A.KeyPress、KeyDown、KeyUp B.KeyDown、Keyup 、KeyPress C.KeyDown、KeyPress、KeyUp D.没有规律 【答案】C 【解析】事件触发顺序为 KeyDown → KeyPress → KeyUp。 15、以下有关图片框PictureBox用法的叙述，错误的是（ ）。 A．图片框可用作其他控件的容器 B．图片框可以显示不同种类与格式的图形或图像文件 C．用户可以从其他绘图软件中把一幅图形或图片剪切／复制，再粘贴到图片框中 D．不需任何设置，图片框就能自动适应加载图片的大小 【答案】D 【解析】图片框默认不会自动适应图片大小的功能，需将其AutoSize属性设置为True，才能使图片框自动调整大小以适应加载的图片。 16、命令按钮Command1 的Caption属性为“退出（x）”，要将命令按钮的快捷键设为Alt+x,应修改Caption属性为( )。 A.在x前插入& B.在x后插入& C.在x前插入 # D.在x后插入# 【答案】A 【解析】在 Caption 属性的目标字母前添加符号&，该字母会自动带下划线，按下Alt+该字母即可触发控件的点击 / 响应事件。 17、下列对象中没有焦点属性的是( )。 A.命令按钮控件 B.标签控件 C.文本框控件 D.单选框控件 【答案】B 【解析】标签（Label）是纯显示类控件，未提供焦点相关属性和方法。 18、设置组合框的风格，可用的属性是（ ）。 A.Backstyle B.Borderstyle C.Style D.Sorted 【答案】C 【解析】Style 是组合框的核心属性，专门用于设置组合框的显示风格（类型），不同取值对应三种完全不同的样式。 19、删列表框中所有项目的方法是( )。 A.Delete B.Clear C.New D.Cls 【答案】B 【解析】清空所有项目的语句是：列表框名.Clear。 20、用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是( ) A.List B.ListIndex C.Text D.ListCount 【答案】C 【解析】Text是指直接获取用户输入/选中的具体内容。 2、 填空题（本题共10小题，每题2分，共20分） 1. 如果希望每0.6秒钟产生一个计时事件，那么应将Interval属性值应设置为________。 【答案】 600 【解析】 计时器（Timer）控件的Interval属性单位是毫秒，1 秒 = 1000 毫秒. 2、 假定在C：盘根目录下有一个名为pic2.gif的图形文件，要在运行期间把该文件装入一个图片框picture1中，应执行的语句为________。 【答案】Picture1.picture=loadpicture（”C：\pic2.gif” ） 【解析】 LoadPicture()：VB 中专门用于加载图片文件的函数，参数必须是完整的文件路径 + 文件名；Picture 属性：图片框（PictureBox）的核心属性，用于存储显示的图片。 3、当用户单击滚动条空白处时，滑块的增量值由________属性决定。 【答案】largechange 【解析】 单击滚动条空白处的滑块增量由 LargeChange 属性决定。 4、要选择多个不相邻的控件，按住________或________键不放，再单击要选择的控件。 【答案】ctrl ；shift 【解析】 按住Ctrl 键单击控件，是选择 “不相邻控件” 的标准操作；按住Shift 键也能选择多个控件。 5、一个控件在窗体上的位置由________和________属性决定，其大小由________和________决定。 【答案】Top ；Left；Hight ；Width 【解析】 Top和Left两个属性以窗体左上角为坐标原点（0,0） 来定位控件，单位是缇；Hight和Width两个属性控制控件的尺寸。 6、VB中的控件分为内部控件、ActiveX控件和________ 三类。 【答案】 可插入对象 【解析】 VB 控件三类 —— 内部控件、ActiveX 控件、可插入对象。 7、 在Visual Basic中，默认窗体名为_______，默认工程名为_______。 【答案】Form1； Project1 【解析】在 Visual Basic 中，默认窗体名为 Form1，默认工程名为 Project1。 8、 在文本框中，通过________属性能获得当前插入点所在的位置。 【答案】selstart 【解析】 SelStart 是文本框（TextBox）专门用于表示插入点（光标）位置的属性。 9、列表框和组合框中，用方法________来添加选项，用________方法来删除一个选项。 【答案】AddItem；RemoreItem 【解析】 AddItem 是列表框 / 组合框的核心添加方法，用于向控件中插入单个选项，RemoveItem 用于删除指定位置的选项，必须指定要删除选项的索引值。 10、计时器控件能有规律的以一定时间间隔触发_______事件，并执行该事件过程中的程序代码。 【答案】Timer 【解析】 只要计时器的Enabled属性设为True，就会按照Interval属性设置的时间间隔（单位：毫秒）反复触发 Timer 事件。 3、 程序填空题（本题共2小题，每题10分，共20分） 1、 下列VB程序实现的功能是：在 Visual Basic窗体中有一定时器控件Timerl,有一滚动条Hscroll1,一标签Labell。运行程序时单击窗体,定时器开始工作,每秒触发一次定时器Timer事件;定时器的Timer事件是使标签中的字号从20号开始随滚动框的向右移动而增加,当字号等于30号,再随滚动框向左移动而减小。如此反复变化，运行效果图如下。 Dim flag As Boolean Private Sub Form__ClickO() Timerl.Enabled = True _______(1)_______ HScroll1.Min = 20 HScroll1.Max = 30 End Sub Private Sub Timer1_Timer() If _______(2)_______ Then HScroll1.Value = HScroll1.Value + 1 If HScroll1.Value = 30 Then flag = True End If Else HScroll1.Value = HScroll1.Value - 1 If HScroll1.Value = 20 Then flag = False End If Label1.FontSize = HScroll1.Value End Sub 【答案】 (1)Timerl.Interval = 1000 (2)Not flag 【解析】 该程序的功能是通过flag标记控制滚动条值的增减，标签字号同步滚动条值，实现 20~30 之间反复变化。 2、 下列VB程序实现的功能是：输入正整数n，求最大的k，使1×l+2×2+3×3+…+k×k<n成立。请完善下列程序。 Option Explicit Dim n AS Integer Private Sub CmdInput_Click() Text1.Text="" Text2.Text="" N=Val(InputBox("输入N", "求累加和")) Text1.Text=n End Sub Private Sub CmdCalculate_Click() ‘ 求累加和 Dim k As Integer, sum As Integer k = 1 （1） Do k = k + 1 sum = sum + k*k Loop Until （2） Text2.Text = Str(k-1) End Sub Private Sub CmdClose_Click() Unload Me End Sub 【答案】 （1） sum=1 （2） sum>n 【解析】 sum = 1，是初始化平方和的起始值； sum >= n，是设置循环终止条件。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $ 《Visual Basic程序设计（第6版)》电子工业出版社 项目八 Visual Basic常用内部控件 考试时间：90分钟 满分：100分 姓名 班级 学号 1、 单项选择题（本题共20小题，每题3分，共60分） 1. 窗体的标题栏显示内容由窗体对象的（ ）属性决定。 A.BackColor B.BackStyle C.Text D.Caption 2.窗体的边框样式由窗体对象的（ ）属性来设置。 A.BackStyle B.BorderStyle C.WindowState D.FillStyle 3.运行程序时，系统自动执行窗体的（ ）事件。 A. load B. click C. unload D. GotFocus 4.标签框文本的对齐方式由（ ）属性来决定。 A.Align B.Alignment C.Autosize D.BackStyle 5.若要取消窗体的最大化功能，则可设置（ ）属性为False来实现。 A.ControlBox B.MinButton C.MaxButton D.Enabled 6、可以用作其它控件容器的控件有（ ） A.窗体控件，列表控件，图像控件 B.窗体控件，文本框控件，框架控件 C.窗体控件，框架控件，图片框控件 D.窗体控件，标签控件，图片控件 7、若要设置文本框中所显示的文本颜色，使用的属性是（ ）。 A. BackColor B. FillColor C. ForeColor D. BackStyle 8、命令按钮Command1的Caption属性为“退出(x)”，要将命令按钮的快捷键设为Alt+x，应修改Caption属性为（ ）。 A. 在x前插入& B. 在x后插入& C. 在x前插入# D. 在x后插入# 9、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（ ）属性来实现。 A.SelStart B.SelLength C.Text D.SelText 10、若要设置文本框最大可接收的字符数，可通过（ ）属性来实现。 A.MultiLine B.Length C.Max D.MaxLength 11、对于某对象的SetFocus和GotFocus描述中，正确的是( )。 A．SetFocus是方法，GotFocus事件 B．SetFocus是事件，GotFocus是事件 C．SetFocus是方法，GotFocus是方法 D．SetFocus是事件，GotFocus是方法 12、单击滚动条两端的箭头时，滚动条Value属性值的改变量由（ ）属性值决定。 A．LargeChange B．Max C．SmallChange D．Min 13、以下关于复选框的说法，正确的是（ ） A.一个窗体上的所有复选框一次只能有一个被选中 B.一个容器中的所有复选框一次只能有一个被选中 C.在一个容器中的复选框可以同时有多个被选中 D.无论是在容器中还是在窗体中，都不可以同时选 14、当用户按下并且释放一个后会触发KeyPress、KeyUp和KeyDown事件，这3个事件发生的顺序是( ) A.KeyPress、KeyDown、KeyUp B.KeyDown、Keyup 、KeyPress C.KeyDown、KeyPress、KeyUp D.没有规律 15、以下有关图片框PictureBox用法的叙述，错误的是（ ）。 A．图片框可用作其他控件的容器 B．图片框可以显示不同种类与格式的图形或图像文件 C．用户可以从其他绘图软件中把一幅图形或图片剪切／复制，再粘贴到图片框中 D．不需任何设置，图片框就能自动适应加载图片的大小 16、命令按钮Command1 的Caption属性为“退出（x）”，要将命令按钮的快捷键设为Alt+x,应修改Caption属性为( )。 A.在x前插入& B.在x后插入& C.在x前插入 # D.在x后插入# 17、下列对象中没有焦点属性的是( )。 A.命令按钮控件 B.标签控件 C.文本框控件 D.单选框控件 18、设置组合框的风格，可用的属性是（ ）。 A.Backstyle B.Borderstyle C.Style D.Sorted 19、删列表框中所有项目的方法是( )。 A.Delete B.Clear C.New D.Cls 20、用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是( ) A.List B.ListIndex C.Text D.ListCount 2、 填空题（本题共10小题，每题2分，共20分） 1. 如果希望每0.6秒钟产生一个计时事件，那么应将Interval属性值应设置为________。 2、 假定在C：盘根目录下有一个名为pic2.gif的图形文件，要在运行期间把该文件装入一个图片框picture1中，应执行的语句为________。 3、当用户单击滚动条空白处时，滑块的增量值由________属性决定。 4、要选择多个不相邻的控件，按住________或________键不放，再单击要选择的控件。 5、一个控件在窗体上的位置由________和________属性决定，其大小由________和________决定。 6、VB中的控件分为内部控件、ActiveX控件和________ 三类。 7、 在Visual Basic中，默认窗体名为_______，默认工程名为_______。 8、 在文本框中，通过________属性能获得当前插入点所在的位置。 9、列表框和组合框中，用方法________来添加选项，用________方法来删除一个选项。 10、计时器控件能有规律的以一定时间间隔触发_______事件，并执行该事件过程中的程序代码。 3、 程序填空题（本题共2小题，每题10分，共20分） 1、 下列VB程序实现的功能是：在 Visual Basic窗体中有一定时器控件Timerl,有一滚动条Hscroll1,一标签Labell。运行程序时单击窗体,定时器开始工作,每秒触发一次定时器Timer事件;定时器的Timer事件是使标签中的字号从20号开始随滚动框的向右移动而增加,当字号等于30号,再随滚动框向左移动而减小。如此反复变化，运行效果图如下。 Dim flag As Boolean Private Sub Form__ClickO() Timerl.Enabled = True _______(1)_______ HScroll1.Min = 20 HScroll1.Max = 30 End Sub Private Sub Timer1_Timer() If _______(2)_______ Then HScroll1.Value = HScroll1.Value + 1 If HScroll1.Value = 30 Then flag = True End If Else HScroll1.Value = HScroll1.Value - 1 If HScroll1.Value = 20 Then flag = False End If Label1.FontSize = HScroll1.Value End Sub 2、 下列VB程序实现的功能是：输入正整数n，求最大的k，使1×l+2×2+3×3+…+k×k<n成立。请完善下列程序。 Option Explicit Dim n AS Integer Private Sub CmdInput_Click() Text1.Text="" Text2.Text="" N=Val(InputBox("输入N", "求累加和")) Text1.Text=n End Sub Private Sub CmdCalculate_Click() ‘ 求累加和 Dim k As Integer, sum As Integer k = 1 （1） Do k = k + 1 sum = sum + k*k Loop Until （2） Text2.Text = Str(k-1) End Sub Private Sub CmdClose_Click() Unload Me End Sub 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $