VB期末试题2内蒙古师范大学.docx
- 文档编号:29621820
- 上传时间:2023-07-25
- 格式:DOCX
- 页数:22
- 大小:159.20KB
VB期末试题2内蒙古师范大学.docx
《VB期末试题2内蒙古师范大学.docx》由会员分享,可在线阅读,更多相关《VB期末试题2内蒙古师范大学.docx(22页珍藏版)》请在冰豆网上搜索。
VB期末试题2内蒙古师范大学
要求:
编程,输入圆的半径,计算并输出圆的面积,按下列要求分别实现:
(1)在打开的工程的Form1窗体中设计如图1所示的界面
(2)创建一个文本框控件用于输入,创建一个标签控件显示计算结果,
创建一个命令按钮控件单击命令按钮后将结果显示在标签里,将命令按钮的
Caption属性设置为"按文本框计算"
(3)在窗体中创建一个命令按钮,Caption属性为"按输入框计算"
单击此命令按钮后,调用Inputbox函数输入数据,通过标签控件显示计算结果。
要求本命令按钮执行的结果需要小数点后15位有效位数,
圆周率15位:
3.141592653589793
【窗体属性评分】
【窗体】Form1.frm
标准答案:
Caption=计算出圆的面积
Caption=Form1
【控件】VB.CommandButton_
标准答案:
Caption=按文本框计算
Caption=
【控件】VB.CommandButton_
标准答案:
Caption=按输入框计算
Caption=
【事件评分】
【事件】PrivateSubCommand2_Click()
标准答案:
InputBox
【事件评分】
【事件】PrivateSubCommand1_Click()
标准答案:
Label1.Caption=
【控件】VB.TextBox_
标准答案:
Name=Text1
Name=
【控件】VB.Label_
标准答案:
Name=Label1
Name=
注意:
不能使用缺省属性
在窗体上建立一个二级菜单,该菜单含有"文件"和"帮助"(名称分别为vbFile和vbHelp)
两个主菜单项,其中"文件"菜单包括"打开"、"关闭"和"退出"三个子菜单项
(名称分别为vbOpen、vbClose和vbExit),如图所示。
只建立菜单,不必定义其事件过程。
【控件】VB.Menu_
标准答案:
Name=vbFile
Name=
【控件】VB.Menu_
标准答案:
Caption=文件
Caption=
【控件】VB.Menu_
标准答案:
Name=vbOpen
Name=
【控件】VB.Menu_
标准答案:
Caption=打开
Caption=
【控件】VB.Menu_
标准答案:
Name=vbClose
Name=
【控件】VB.Menu_
标准答案:
Caption=关闭
Caption=
【控件】VB.Menu_
标准答案:
Name=vbExit
Name=
注意:
不能使用缺省属性
在名为Form1的窗体上画一个框架,名称为Frm1,标题为"框架",高度为2500,宽度为4000,
框架内建立一文本框,距左边框600,距框架的上边框1200,文本框中的初始内容设置为"文本框",
如图所示。
注意:
完成试题后,必须保存,然后关闭窗口。
【控件】VB.Frame_
标准答案:
Name=Frm1
Name=
【控件】VB.Frame_
标准答案:
Height=2500
Height=
【控件】VB.Frame_
标准答案:
Width=4000
Width=
【控件】VB.TextBox_
标准答案:
Left=600
Left=
【控件】VB.TextBox_
标准答案:
Text=文本框
Text=
【控件】VB.TextBox_
标准答案:
Top=1200
Top=
注意:
不能使用缺省属性
在名称为Form1的窗体上建立一个名称为List1的列表框。
要求:
在程序运行后,通过Form_Load()事件过程加载窗体时,执行语句List1.AddItem"AAA",
每当单击某个列表项时,都执行语句List1.AddItemList1.Text一次,如图所示。
【事件评分】
【事件】PrivateSubForm_Load()
标准答案:
List1.AddItem"AAA"
【事件评分】
【事件】PrivateSubList1_Click()
标准答案:
List1.AddItemList1.Text
注意:
不能使用缺省属性
在名称为Form1的窗体上建立一个名称为Cmd1,标题为"显示"的命令按钮,
编写适当的事件过程。
程序运行后,如果单击"显示"命令按钮,
则在窗体上显示"呵呵,小菜一碟!
",如图1-1所示。
程序中不能使用任何变量,直接显示字符串。
注意:
完成后必须保存,然后再关闭。
【控件】VB.CommandButton_
标准答案:
Name=Cmd1
Name=
【控件】VB.CommandButton_
标准答案:
Caption=显示
Caption=
【事件评分】
【事件】PrivateSubCmd1_Click()
标准答案:
Print"呵呵,小菜一碟!
"
注意:
不能使用缺省属性
在名称为Form1的窗体上建立一个名称为P1的图片框和两个命令按钮,
名称分别为Cmd1和Cmd2,标题分别为"输出"和"清除",如图1所示。
要求程序运行后,每单击一次"输出"按钮,
不使用任何变量而直接在图片框中显示"有一幅画更完美!
",如图2所示;
如果单击"清除"按钮,则清除图片框中的内容。
图1
图2
控件属性评分】
【控件】VB.CommandButton_Cmd1
标准答案:
Name=Cmd1
Name=
【控件】VB.CommandButton_Cmd1
标准答案:
Caption=输出
Caption=
【控件】VB.CommandButton_Cmd2
标准答案:
Name=Cmd2
Name=
【控件】VB.CommandButton_Cmd2
标准答案:
Caption=清除
Caption=
【控件】VB.PictureBox_P1
标准答案:
Name=P1
Name=
注意:
不能使用缺省属性
在名称为Form1的窗体上建立一个名称为Text1的文本框,文本框的内容为空;一个名称为Cmd1,
标题为"输出"的命令按钮,如图1-12所示。
要求程序运行后,在文本框输入几个字符,
单击"输出"按钮,则在窗体上显示文本框中的文字。
注意:
在程序中不能使用任何变量,不能使用默认属性。
【控件】VB.CommandButton_
标准答案:
Name=Cmd1
Name=
【控件】VB.CommandButton_
标准答案:
Caption=输出
Caption=
【事件评分】
【事件】PrivateSubCmd1_Click()
标准答案:
PrintText1.Text
注意:
不能使用缺省属性
1、在名称为Form1的窗体上建立一个名称为l1的标签,并设置他不可见;两个名称为cmd1和cmd2,
标题分别为"显示1"和"显示2"的命令按钮。
2、编写适当的事件过程,要求程序运行后,
如果单击"显示1"命令按钮,则标签可见并显示字符串"aaa";
如果单击"显示2"命令按钮,则标签可见并显示字符串"bbb"。
程序中不能使用任何变量,直接显示字符串;不能使用默认属性。
程序开始运行时界面如图1所示。
图1程序运行时界面
3、单击显示1命令按钮后,窗体如图2所示:
图2单击显示1命令按钮后程序界面
控件属性评分】
【控件】VB.CommandButton_
标准答案:
Caption=显示2
Caption=
【控件】VB.CommandButton_
标准答案:
Caption=显示1
Caption=
【控件】VB.Label_
标准答案:
Visible=0'False
Visible=
【控件】VB.Label_
标准答案:
Name=l1
Name=
【控件】VB.CommandButton_
标准答案:
Name=cmd2
Name=
【控件】VB.CommandButton_
标准答案:
Name=cmd1
Name=
【事件评分】
【事件】PrivateSubcmd1_Click()
标准答案:
l1.Visible=True
l1.Caption="aaa"
【事件评分】
【事件】PrivateSubcmd2_Click()
标准答案:
l1.Caption="bbb"
注意:
不能使用缺省属性
1、利用VB设计上面的程序界面。
窗体的标题为"字体修改";其中包括一名称为Label1,标题为"请输入文字"的标签;
一名称为Text1,内容为空的文本框;
名称为Command1,标题为"隶书",名称为Command2,标题为"黑体"的两个命令按钮。
2、程序功能:
单击"隶书"命令按钮时,文本框的字体设为"隶书";
单击"黑体"命令按钮时,文本框的字体设置为"黑体"。
提示:
不能使用任何变量!
标准答案:
Caption=隶书
Caption=
【事件评分】
【事件】PrivateSubCommand1_Click()
标准答案:
Text1.Font="隶书"
【控件】VB.Label_
标准答案:
Caption=请输入文字
Caption=
注意:
不能使用缺省属性
在名称为Form1的窗体上建立一个水平滚动条,名称为HS1,其最大值为100,最小值为0。
要求程序运行后,每次移动滚动框时,都执行语句Form1.PrintHS1.Value,
如图所示(程序中不能使用任何变量)
【事件评分】
【事件】PrivateSubHS1_Scroll()
标准答案:
PrintHS1.Value
【控件】VB.HScrollBar_
标准答案:
Name=HS1
Name=
【控件】VB.HScrollBar_
标准答案:
Max=100
Max=
在窗体上添加1个文本框(Text1)、1个命令按钮(Command1),运行时文本框中显示“VisualBasic程序设计”,
命令按钮标题为“结束”,文本框及命令按钮能随窗体大小的调整而自动调整大小及位置,其中调整文本框使其:
Left=0,
Top=0,宽度和高度都为窗体的一半;命令按钮:
始终位于窗体右下角位置。
请编写:
(1)用代码初始化各控件(提示:
可写在Form_Load事件中)。
(2)文本框控件随窗体的大小而调整大小的代码,以及调整命令按钮位置始终位于窗体右下角的代码
(提示:
调整大小位置的代码写在Form_Resize事件中)。
(3)结束程序运行的代码(命令按钮)。
事件评分】
【事件】PrivateSubForm_Load()
标准答案:
Text1.Text=
VisualBasic
程序设计
【事件评分】
【事件】PrivateSubForm_Resize()
标准答案:
Text1.Text=
VisualBasic
程序设计
Text1.Top=0
Text1.Left=0
Text1.Width=
/2
【控件】VB.CommandButton_
标准答案:
Caption=结束
Caption=
【事件评分】
【事件】PrivateSubCommand1_Click()
标准答案:
End
如果单击"显示"按钮,则文本框显示出来,如图1和图2所示。
程序中不得使用任何变量。
图1
图2
【控件】VB.CommandButton_
标准答案:
Name=c2
Name=
【控件】VB.CommandButton_
标准答案:
Caption=显示
Caption=
【控件】VB.CommandButton_
标准答案:
Name=c1
Name=
【控件】VB.CommandButton_
标准答案:
Caption=隐藏
Caption=
【控件】VB.TextBox_
标准答案:
Visible=0'False
Visible=
【事件评分】
【事件】PrivateSubc2_Click()
标准答案:
Text1.Visible=True
【事件评分】
【事件】PrivateSubc1_Click()
标准答案:
Text1.Visible=False
注意:
不能使用缺省属性
在名称为Form1的窗体上画一个文本框,名称为Txt1;再画一个命令按钮,
名称为C1,标题为"移动",如图1所示。
请编写适当的事件过程,使得在运行时,单击"移动"按钮,
文本框水平移动到窗体的最左端如图2所示。
程序中不得使用任何变量。
注意:
完成题目后,必须保存工程后再关闭。
图1
图2
【控件】VB.CommandButton_
标准答案:
Name=C1
Name=
【控件】VB.CommandButton_
标准答案:
Caption=移动
Caption=
【控件】VB.TextBox_
标准答案:
Name=Txt1
Name=
【事件评分】
【事件】PrivateSubC1_Click()
标准答案:
Txt1.Left=0
注意:
不能使用缺省属性
1、设计下图所示的界面:
2、界面中窗体的标题为:
密码的显示;
3、窗体中包括两个文本框,他们的名称分别为passtxt和showtxt,其中:
passtxt用于密码输入,当在其中输入信息时,显示为"*";
4、showtxt文本框,在程序运行时不能用,只能显示密码。
5、具体功能:
程序运行时,当在文本框passtxt中输入密码时,showtxt中同时将输入的内容原样显示。
提示:
不能使用任何变量,不能使用默认属性!
【窗体属性评分】
【窗体】Form1.frm
标准答案:
Caption=密码的显示
Caption=Form1
【控件】VB.TextBox_
标准答案:
Name=showtxt
Name=
【控件】VB.TextBox_
标准答案:
Enabled=0'False
Enabled=
【控件】VB.TextBox_
标准答案:
Name=passtxt
Name=
【控件】VB.TextBox_
标准答案:
PasswordChar=*
PasswordChar=
【事件评分】
【事件】PrivateSubpasstxt_Change()
标准答案:
showtxt.Text=passtxt.Text
设计窗体程序,程序运行的初始界面如图1-1所示,当用户在文本框中输入姓名,例如输入“张三”,
单击“确定”按钮,则程序的运行情况如图1-2所示,如果单击“结束”按钮,即结束程序运行。
图1-1
图1-2
【控件】VB.TextBox_
标准答案:
Name=Text1
Name=
【控件】VB.CommandButton_
标准答案:
Name=Command2
Name=
【控件】VB.CommandButton_
标准答案:
Name=Command1
Name=
【控件】VB.Label_
标准答案:
Caption=请输入你的姓名
Caption=
【控件】VB.Label_
标准答案:
Caption=我的第一个VB程序
Caption=
【事件评分】
【事件】PrivateSubCommand2_Click()
标准答案:
End
【事件评分】
【事件】PrivateSubCommand1_Click()
标准答案:
Label2.Visible=False
欢迎使用
Text1.Visible=False
Command1.Enabled=False
Command2.Enabled=True
在窗体上建立4个命令按钮Command1、Command2、Command3和Command4。
要求:
(1)命令按钮的Caption属性分别为“字体变大”、“字体变小”、“加粗”和“标准”。
(2)每单击Command1按钮和Command2按钮一次,字体变大或变小3个单位。
(3)单击Command3按钮时,字体变粗;单击Command4按钮时,字体又由粗体变为标准。
(4)4个按钮每单击一次都在窗体上显示“欢迎使用VB”。
(5)双击窗体后可以退出。
【事件评分】
【事件】PrivateSubForm_DblClick()
标准答案:
End
【事件评分】
【事件】PrivateSubCommand4_Click()
标准答案:
Form1.FontBold=False
"欢迎使用VB"
【事件评分】
【事件】PrivateSubCommand2_Click()
标准答案:
Form1.FontSize
-3
欢迎使用VB
【事件评分】
【事件】PrivateSubCommand1_Click()
标准答案:
Form1.FontSize
+3
欢迎使用VB
【控件】VB.CommandButton_
标准答案:
Caption=标准
Caption=
【控件】VB.CommandButton_
标准答案:
Caption=加粗
Caption=
【控件】VB.CommandButton_
标准答案:
Caption=字体变小
Caption=
【控件】VB.CommandButton_
标准答案:
Caption=字体变大
Caption=
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 期末 试题 内蒙古 师范大学