vb14.docx
《vb14.docx》由会员分享,可在线阅读,更多相关《vb14.docx(15页珍藏版)》请在冰豆网上搜索。
![vb14.docx](https://file1.bdocx.com/fileroot1/2022-12/31/55cc22f8-e138-48bd-bce1-3a4297725de2/55cc22f8-e138-48bd-bce1-3a4297725de21.gif)
vb14
三.
(1)在考生文件夹中有工程文件wy5.vbp及其窗体文件wy5.frm,该程序是不完整的,请在有?
号的地方填入正确内容,然后删除?
及所有注释符(即'号)但不能修改其他部分。
存盘时不得改变文件名和文件夹。
本题描述如下:
在窗体上有一个名称为Text1的文本框,一个名称为C1,标题为"校验"的命令按钮。
其中文本框用来输入口令(如图所示),要求在文本框中输入的内容都必须以"*"显示(请考生自己通过属性窗口设置)。
要求程序运行后,输入口令,单击命令按钮后,对口令进行校验。
如果输入的内容是"ABC"这3个大写字母,则用MsgBox信息框输出"正确",否则输出"错误"(如图所示)。
***********************************************************************
(2)在考生文件夹中有工程文件wy6.vbp及其窗体文件wy6.frm,该程序是不完整的,请在有?
号的地方填入正确内容,然后删除?
及所有注释符(即'号)但不能修改其他部分。
存盘时不得改变文件名和文件夹。
本题描述如下:
在窗体上有三个名称为Ch1、Ch2和Ch3的复选框,标题依次为"程序设计"、"数据库原理"、"计算机网络",还有一个名称为C1,标题为"选课"的命令按钮(如图所示)。
要求程序运行后,如果选择某个复选框,则当单击命令按钮时在窗体上输出相应的信息。
例如:
如果选择"程序设计"和"数据库原理"复选框,则单击命令按钮后,将在窗体上显示"我选的课程是程序设计数据库原理";如果选择"数据库原理"复选框,则单击命令按钮后,将在窗体上显示"我选的课程是数据库原理"。
解析:
1、考查考生对文本框属性PasswordChar的使用,本例中设置PasswordChar属性为"*",然后在C1的Click事件中填入如下代码:
IfText1.Text="ABC"OrText1.Text="abc"ThenMsgBox"正确"ElseMsgBox"错误"
2、如图所示新建一窗口并建立相应的控件,在命令按钮的Click事件中加入如下代码:
DimsAsString
s="我选的课程是"
IfCh1.Value=1Then
s=s&"程序设计"
EndIf
IfCh2.Value=1Then
s=s&"数据库原理"
EndIf
IfCh3.Value=1Then
s=s&Ch3.Caption
EndIf
Prints
四.请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为Text1的文本框,一个名称为Cmd1,标题为"输出"的命令按钮(如图所示)。
要求程序运行后,在文本框输入几个字符,在单击"输出"按钮,则在窗体上显示文本框中的的文字。
*注意:
1)在程序中不能使用任何变量。
2)保存时必须存放在考生文件夹下,窗体文件名为wy1.frm,工程文件名为wy1.vbp。
**********************************************************************
(2)在名称为Form1的窗体上建立二个名称分别为Cmd1、Cmd2,标题为"按钮一"、"按钮二"的命令按钮(如图所示)。
要求程序运行后,如果单击"按钮一",则把"按钮二"移到"按钮一"上,使两个按钮重合。
*注意:
1)在程序中不得使用任何变量(必须通过属性设置来移动控件)。
2)保存时必须存放在考生文件夹下,窗体文件名为wy2.frm,工程文件名为wy2.vbp。
解析:
1、考查基本控件的使用和对Print方法的使用,新建一工程,建立一名为Text1的文本框和名为Cmd,标题为"输出"的命令按钮,双击命令按钮加入如下代码:
Cls
PrintText1.Text
2、考查对控件的Top和Left属性的使用,在Cmd1的Click事件中加入如下代码:
Cmd2.Top=Cmd1.Top
Cmd2.Left=Cmd1.Left
五.请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为Text1的文本框,通过属性窗口设置文本框属性,在文本框中显示"AAAA"(如图所示);再建立一个名称为Cmd1,标题为"清除"的命令按钮,编写适当的事件过程。
要求程序运行后,如果单击"清除"命令按钮,则清除文本框中所显示的信息。
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy3.frm,工程文件名为wy3.vbp。
**********************************************************************
(2)在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2,标题分别为"输入"和"连接"的命令按钮(如图所示)。
要求程序运行后,单击"输入"按钮,可通过输入对话框输入两个字符串,存入字符串变量a、b中(a、b应定义为窗体变量),如果单击"连接"按钮,则把两个字符串连接为一个字符串(顺序不限)并在信息框中显示出来(在程序中不得使用任何其他变量)。
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy4.frm,工程文件名为wy4.vbp。
解析:
1、新建一个工程,在窗体上添加一个名为"Cmd1"的按钮和一个名为"Text1"的文本框,双击按钮在弹出的代码窗口中写入"Text1.Text=""",然后以文件名wy3.vbp和wy3.frm保存。
2.DimaAsString
DimbAsString
PrivateSubCommand1_Click()
a=InputBox("请输入第一个字符串:
","输入")
b=InputBox("请输入第二个字符串:
","输入")
EndSub
PrivateSubCommand2_Click()
MsgBoxa&b
EndSub
六.
(1)在考生文件夹中有工程文件wy5.vbp及其窗体文件wy5.frm,该程序是不完整的,请在有?
号的地方填入正确内容,然后删除?
及所有注释符(即'号)但不能修改其他部分。
存盘时不得改变文件名和文件夹。
本题描述如下:
在窗体上有一个列表框,名称为List1,一个文本框,名称为Text1,和一个命令按钮,名称为C1,标题为"复制"。
要求程序运行后,在列表框中自动建立四个列表项,分别为"Item1"、"Item2"、"Item3"、"Item4"如果选择列表框中的一项,则单击"复制"按钮时,可以把该项复制到文本框中(如图所示)。
***********************************************************************
(2)在考生文件夹中有工程文件wy6.vbp及其窗体文件wy6.frm,该程序是不完整的,请在有?
号的地方填入正确内容,然后删除?
及所有注释符(即'号)但不能修改其它部分。
存盘时不得改变文件名和文件夹。
本题描述如下:
在窗体有三个复选框,名称分别为Ch1、Ch2和Ch3,标题依次为"体育"、"音乐"、"美术",还有一个命令按钮,名称为C1,标题为"显示"。
要求程序运行后,如果选中某个复选框,则当单击"显示"命令按钮时,则显示相应的信息。
例如,如果选中"体育"和"音乐"复选框,则单击"显示"命令按钮后,在窗体上显示"我的爱好是体育音乐"(如图所示);而如果选中"体育"、"音乐"和"美术"复选框,则单击"显示"按钮后,在窗体上显示"我的爱好是体育音乐美术"。
解析:
1、该题考查考生对ListBox控件的使用,该控件显示项目列表,从其中可以选择一项或多项。
如果项目总数超过了可显示的项目数,就自动在ListBox控件上添加滚动条。
语法:
ListBoxMultiSelect属性:
返回或设置一个值,该值指示是否能够在FileListBox或ListBox控件中进行复选以及如何进行复选。
在运行时是只读的。
PrivateSubC1_Click()'单击时把选中的值给他
Text1.Text=List1.Text
EndSub
PrivateSubForm_Load()
'自动增加
List1.AddItem"item1"
List1.AddItem"item2"
List1.AddItem"item3"
List1.AddItem"item4"
EndSub
2、CheckBox控件:
该控件可用来提供True/False或者Yes/No选项。
组中可以使用CheckBox控件显示多项选择,从而可选择其中的一项或多项。
也可以通过对Value属性编程设置CheckBox的值。
DimsAsString
s="我的爱好是"
IfCh1.Value=1Then
s=s&"体育"
EndIf
IfCh2.Value=1Then
s=s&"音乐"
EndIf
IfCh3.Value=1Then
s=s&Ch3.Caption
EndIf
Prints
七.请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个文本框,名称为Text1;再画二个命令按钮,名称分别为C1、C2,标题分别为"隐藏"、"显示"(如图所示)。
请编写适当的事件过程,使得在运行时,如果单击"隐藏"按钮,则文本框消失,而如果单击"显示"按钮,则文本框显示出来。
程序中不得使用任何变量。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
**********************************************************************
(2)在窗体上画二个文本框,名称分别为Text1、Text2。
请设置适当的控件属性,并编写适当的事件过程,使得在运行时,如果在Text1中每输入一个字符,则显示一个"*",同时在Text2中显示输入的内容(如图所示)。
程序中不得使用任何变量。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。
解析:
第1小题
文本框的Visible属性:
Visible属性用来设置对象的可见性,可以取True和False两种值,取值为True时,对象可见;取值为False时,将隐藏对象。
设置Visible属性的语法是:
对象名.Visible=True(-1)或False(0)
解题方法:
1.新建一个名为Form1的窗体,点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框。
点击工具箱中的CommandButton控件图标,然后在窗体上拖拉出两个命令按钮,通过属性窗口分别设置其Name属性为"C1"和"C2",Caption属性为"隐藏"和"显示"。
打开代码窗口,输入如下的代码:
PrivateSubC1_Click()
Text1.Visible=False
EndSub
PrivateSubC2_Click()
Text1.Visible=True
EndSub
按要求保存文件即完成本题。
第2小题
文本框的PasswordChar属性
用来设置文本框中所显示的内容。
在默认状态下,该属性的设置值是空字符串,此时文本框所显示的是键盘所输入的字符;如果将该属性的值设置为一个非空字符串,则从键盘向文本框输入字符时,文本框中的实际内容仍是键入的字符,但显示的是PasswordChar属性所设置的字符串的第一个字符。
文本框的Change事件
当用户向文本框中输入新信息,或当程序把Text属性设置为新值时,就会触发Change事件。
解题方法:
新建一个窗体,点击工具箱中的TextBox控件图标,然后在窗体上分别拖拉出两个文本框,通过属性窗口设置名为Text1的文本框的PasswordChar属性为"*"。
打开代码窗口,输入如下的代码:
PrivateSubText1_Change()
Text2.Text=Text1.Text
EndSub
按要求保存文件即完成本题。
九.
(1)在名称为Form1的窗体中画一个名称为L1的标签,其标题为"0",BorderStyle属性为1;再添加一个名称为Timer1的计时器。
请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。
如图所示的是程序刚启动时的情况。
程序中不得使用任何变量。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
**********************************************************************
(2)在考生文件夹下有一个工程文件sjt6.vbp,要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。
而如果单击"显示"按钮,则在窗体上输出所有选中的列表项(如图所示)。
要求:
修改列表框的适当属性,使得运行时可以多选,并去掉程序中的注释符,把程序中的?
改为正确的内容,使其实现上述功能,但不得修改程序中的其他部分。
最后把修改后的程序以原来的文件名存盘。
解析:
第1小题
标签控件的BorderStyle属性
返回或设置标签控件的边框样式。
可以取0和1两种值,取值为0时,标签控件无边框;取值为1时,标签控件有边框。
其语法为:
控件名.BorderStyle=0或1
计时器控件的Interval属性
返回或设置计时器事件之间的间隔,以毫秒为单位,取值范围是0到65535
解题方法:
新建一个名为Form1的窗体,点击工具箱中的Timer控件图标,然后在窗体上拖拉出一个计时器,通过属性窗口设置其Interval属性为1000。
点击工具箱中的Label控件图标,然后在窗体上拖拉出一个标签控件,通过属性窗口设置其Name属性为"L1",Caption属性为"0",BorderStyle属性为1。
打开代码窗口,输入如下的代码:
PrivateSubTimer1_Timer()
L1.Caption=L1.Caption+1
EndSub
按要求保存文件即完成本题。
第2小题
列表框的MultiSelect属性
用来设置列表框控件是否可以进行多重选择。
可以取0、1和2三种值,取值为0,不能进行多重选择;取值为1,用鼠标或空格键可以选中多个列表项;取值为2,按下Shift键,用鼠标单击要选择的第一个列表项,再单击要选择的最后一个列表项,可以连续选中两者之间的所有列表项;按下Ctrl键,用鼠标单击列表项,可以不连续的选中多个列表项。
解题方法:
打开工程文件sjt6.vbp,选中列表框控件,通过属性窗口设置其MultiSelect属性为1,并修改相应的代码。
修改后的代码如下:
PrivateSubC1_Click()
Fori=0Tol1.ListCount-1
Ifl1.Selected(i)=TrueThen
Printl1.List(i)
EndIf
Nexti
EndSub
按要求保存文件即完成本题。
十.请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体中建立一个名称为Cmd1,标题为"显示"的命令按钮(如图所示)。
要求程序运行后,如果单击"显示"按钮,则执行语句Form1.Print"显示";如果单击窗体,则执行语句Form1.Cls。
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy3.frm,工程文件名为wy3.vbp。
**********************************************************************
(2)在名称为Form1的窗体上建立一个水平滚动条,名称为HS1,其最大值为100,最小值为0。
要求程序运行后,每次移动滚动框时,都执行语句Form1.PrintHS1.Value。
(如图所示)(程序中不能使用任何其他变量)
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy4.frm,工程文件名为wy4.vbp。
解析:
1、新建一个工程,在窗体上添加一个名为"Cmd1"的按钮,
双击这个按钮在弹出的代码窗口中写入"Form1.Print"显示"",
在窗体空白部分双击,在弹出的窗口中写入"Form1.Cls",
然后以文件名wy3.vbp和wy3.frm保存;
2、滚动条的属性用来标识滚动条的状态,本题中用到的属性有Max(滚动条所能表示的最大值,取值范围为-32768~32768),Min(滚动条所能表示的最小值,取值范围同Max),Value(该属性表示滚动框在滚动条上的当前位置)。
PrivateSubHS1_Change()
Form1.PrintHS1.Value
EndSub
十一.
(1)在考生文件夹下有工程文件wy5.vbp及窗体文件wy5.frm,该程序是不完整的,请在有?
号的地方填入正确内容,然后删除?
及所有注释符(即'号),但不能修改其它部分。
存盘时不得改变文件名和文件夹。
本题描述如下:
在窗口中有一个名为Image1的图像框,有一个名为Timer1的计时器,有一个名为HScroll1的滚动条,还有一个名为C1,标题为"开始"的命令按钮,要求程序运行后,点击开始按钮,则图像框中的图片根据计时器中设定的时间间隔交替变更,如果改变滚动条中滚动框的位置,则图片交替变换的速度也随之变化。
***********************************************************************
(2)在考生文件夹下有工程文件wy6.vbp及窗体文件wy6.frm,该程序是不完整的,请在有?
号的地方填入正确内容,然后删除?
及所有注释符(即'号),但不能修改其它部分。
存盘时不得改变文件名和文件夹。
本题描述如下:
在窗口中有一个名为Image1的图像框,还有两个命令按钮,名称分别是C1和C2,标题分别是"放大"和"缩小"。
要求程序运行后,点击C1按钮,则图像框变大;点击C2按钮,则图像框变小。
解析:
1、LoadPicture函数
用来将图形载入到窗体的Picture属性、PictureBox控件或Image控件。
其语法为:
对象名.Pictuer=LoadPictuer("文件名")
用该函数还可以把窗体或图像控件中的图像清除,其语法是:
对象名.Pictuer=LoadPictuer()或
对象名.Pictuer=LoadPictuer("")。
2、计时器控件的Interval属性
返回或设置对Timer控件的计时事件各调用间的毫秒数。
十二.请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为Cmd1,宽度为1500,高度为500,标题为"显示"的命令按钮(如图所示),编写适当的事件过程。
要求程序运行后,如果单击"显示"命令按钮,则在窗体上显示"祝你考试成功"运行结果如图所示(要求:
不要使用任何变量,直接显示字符串)。
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy1.frm,工程文件名为wy1.vbp。
**********************************************************************
(2)在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2,标题分别为"必修课"、"选修课"的命令按钮,编写适当的事件过程。
要求程序运行后,如果单击"必修课"命令按钮,在窗体上显示"高等数学必修课";如果单击"选修课"命令按钮,在窗体上显示"多媒体技术选修课"(要求:
不要使用任何变量,直接显示字符串)。
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy2.frm,工程文件名为wy2.vbp。
解析:
1、新建一个工程,在窗体上添加一个名为"Cmd1"的按钮,单击这个按钮在属性窗口中选择Width填入1500,Height为500,Caption为"显示",双击这个按钮在弹出的代码窗口中写入"Form1.Print"祝你考试成功"",然后以文件名wy1.vbp和wy1.frm保存;
2、新建一个工程,在窗体上添加两个名为"Cmd1"和"Cmd2"的按钮,双击按钮"Cmd1"在弹出的代码窗口中写入"Form1.Print"高等数学必修课"",双击按钮"Cmd2"在弹出的代码窗口中写入"Form1.Print"多媒体技术选修课"",然后以文件名wy2.vbp和wy2.frm保存。
十四.请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为P1的图片框和二个命令按钮,名称分别为Cmd1、Cmd2,标题分别为"输出"、"清除"(如图所示)。
要求程序运行后,每单击一次"输出"按钮,不使用任何变量而直接在图片框中显示小写字母"red";如果单击"清除"按钮,则清除图片框中的内容。
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy3.frm,工程文件名为wy3.vbp。
**********************************************************************
(2)在名称为Form1的窗体上建立一个名称为List1的列表框。
要求:
在程序运行后,通过Form_Load()事件过程加载窗体时,执行语句List1.AddItem"AAA"之后,每当单击某个列表项时,都执行语句List1.AddItemList1.Text一次(如图所示)。
*注意:
保存时必须存放在考生文件夹下,窗体文件名为wy4.frm,工程文件名为wy4.vbp。
解析:
1、PictureBox控件可以显示来自位图、图标或者源文件,以及来自增强的源文件、JPEG或GIF文件的图形。
如果控件不足以显示整幅图像,则裁剪图像以适应控件的大小。
也可以用PictureBox控件将OptionButton控件分组,并用该控件显示图形方法的输出和Print方法写入的文本。
Image控件用来显示图形,但是它只支持PictureBox控件的一部分属性、事件和方法。
2、使用AddItem或者RemoveItem方法可以添加或者删除ListBox控件中的项目。
语法为:
object.AddItemitem,index。
本题在list1_click事件中加入"List1.AddItemList1.Text"即可。