二级 VB基本操作题

注：本题中工程文件名为project11.vbp，工程名为工程1，窗体文件名为Form11.frm，窗体名为Form1。
10.单击考试系统界面左下角的Visual Basic图标，启动Visual Basic。
打开考试文件夹下的工程文件project12.vbp，在窗体Form1中完成下列操作：
如图所示，设计一个检测框示例应用程序。
打开考试文件夹下的工程文件project12.vbp，在窗体Form1中完成下列操作：
如图所示，设计一个剪切板应用程序。
其中：窗体的标题为"剪切板"。在窗体上画两个文本框Text1、Text2，文本框Text1中的文本为"新疆大学"，文本框Text1、Text2的字号为四号；再画一个命令按钮Command1，标题为"剪切"，单击命令按钮时，将文本框Text1中的字符剪切到剪切板上(可将Text1中的字符复制到剪切板上，再将Text1中的字符设置空字符串"")，然后将剪切板中内容粘贴到文本框Text2中(代码中除了Clipboard外，不能使用其它变量)。
5.单击考试系统界面左下角的Visual Basic图标，启动Visual Basic。
打开考试文件夹下的工程文件project12.vbp，在窗体Form1中完成下列操作：
如图所示，设计一个菜单应用程序。
其中：窗体的标题为"下拉菜单"。在窗体上建立一个如图所示的下拉菜单，菜单项的标题和名称分别为:
Private Sub Command1_Click()
Shape1.Shape = 1
End Sub
Private Sub Command2_Click()
Shape1.Shape = 3
End Sub
12.单击考试系统界面左下角的Visual Basic图标，启动Visual Basic。
打开考试文件夹下的工程文件project12.vbp，在窗体Form1中完成下列操作：
编辑edit
剪切cut
复制copy
粘贴paste
其中"粘贴"菜单项为灰色（不可用）。
注：本题中工程文件名为project12.vbp，工程名为工程1，窗体文件名为Form12.frm，窗体名为Form1。
6.单击考试系统界面左下角的Visual Basic图标，启动Visual Basic。
打开考试文件夹下的工程文件project11.vbp，在窗体Form1中完成下列
如图所示，设计一个画图应用程序。
其中：窗体的标题为"画图"。在窗体上画一个形状控件，其名称为Shape1，高和宽均为2000；再画两个命令按钮Command1、Command2，标题分别为"正方形"、"圆"，单击这两个命令按钮时，在Shape1上分别画出"正方形"、"圆"。注：本题中工程文件名为project11.vbp，工程名为工程1，窗体文件名为Form11.frm，窗体名为Form1。
如图所示，设计一个字符演示应用程序。
其中：窗体的标题为"图形变换"。在窗体上画一个形状控件Shape1，左边界为0，顶边界为0，高和宽均为1000，图形为"圆"；再画一个垂直动条VScroll1，刻度值范围为1000-3000，LargeChange=100，SmallChange=10。
要求：改变VScroll1的值时，使形状控件Shape1的高和宽为VScroll1的值（代码中不能用变量）。
制粘贴到文本框Text1中(代码中除了Clipboard外，不能使用其它变量)。
Private Sub Command1_Click()
Clipboard.SetText Label1.Caption
2.单击考试系统界面左下角的Visual Basic图标，启动Visual Basic。
打开考试文件夹下的工程文件project11.vbp，在窗体Form1中完成下列操作：
如图所示，设计一个字符变换应用程序。
其中：窗体的标题为"字符变换"。在窗体上画一个标签Label1，标题分别为"程序设计"，左边界为0，顶边界为0，标签能自动调整大小以显示所有的内容；再画一个水平滚动条HScroll1，刻度值范围为12--96；再画一个文件框Text1。
Private Sub Command1_Click()
Clipboard.SetText Text1.Text
Text2.Text = Clipboard.GetText
End Sub
注：本题中工程文件名为project12.vbp，工程名为工程1，窗体文件名为Form12.frm，窗体名为Form1。
如图所示，设计一个剪切板应用程序。
其中：窗体的标题为"剪切板"。在窗体上画一个标签Label1，标题分别为"剪切板测试"，字号为四号，标签能自动调整大小以显示所有的内容；再画一个文本框Text1，字号为四号；再画一个命令按钮Command1，标题为"复制"，单击命令按钮时，利用剪切板将标签Label1中的标题字符复
Private Sub Command1_Click()
Text2.Text = UCase(Text1.Text)
End Sub
注：本题中工程文件名为project11.vbp，工程名为工程1，窗体文件名为Form11.frm，窗体名为Form1。
8.单击考试系统界面左下角的Visual Basic图标，启动Visual Basic。
要求：改变HScroll1的值时，在文本框Text1中显示HScroll1的值，标签Label1中的字符大小取HScroll1的值(代码中不能用变量)。
Private Sub HScroll1_Change()
Label1.FontSize = HScroll1.Value
Text1.Text = HScroll1.Value
操作：
如图所示，设计一个字符演示应用程序。
其中：窗体的标题为"字符演示"。在窗体上画一个标签Label1，标题为"程序设计"，使标签能自动调整大小以显示所有的内容；再画一个命令按钮Command1，标题为"放大"。
要求：单击窗体，则可使标签Label1移到窗体的左上角；单击Command1命令按钮，则使标签Label1中的字体大小扩大到原来的2倍(代码中不能用变量)。
Private Sub VScroll1_Change()
Shape1.Height = VScroll1.Value
Shape1.Width = VScroll1.Value
End Sub
注：本题中工程文件名为project11.vbp，工程名为工程1，窗体文件名为Form11.frm，窗体名为Form1。
钮标题相对应的字体。
Private Sub Option1_Click()
Text1.FontName = "宋体"
End Sub
Private Sub Option2_Click()
Text1.FontName = "楷体_GB2312"
End Sub
Private Sub Option3_Click()
如图所示，设计一个单选按钮应用程序。
其中：窗体的标题为"单选按钮例子"。在窗体上画一个文本框Text1，文本为"测试字体"，字体大小为四号；再画一个框架Frame1，标题为"字体"；在框架Frame1中画三个单选按钮，标题分别为"宋体"、"楷体"、"黑体"，单击这三个单选按钮时，文本框Text1中的字体变为与单选按
End Sub
注：本题中工程文件名为project12.vbp，工程名为工程1，窗体文件名为Form12.frm，窗体名为Form1。
11.单击考试系统界面左下角的Visual Basic图标，启动Visual Basic。
打开考试文件夹下的工程文件project11.vbp，在窗体Form1中完成下列操作：
Private Sub Check1_Click()
Text1.FontStrikethru = Not Text1.Fontate Sub Check2_Click()
Text1.FontUnderline = Not Text1.FontUnderline
其中：窗体的标题为"检测框示例"。在窗体上画一个文本框Text1，文本为"新疆医科大学"，字体大小为四号。再画两个检查框Check1、Check2，标题分别为"删除线"和"下划线"。
要求：如果选定检查框Check1，则文本框中出现删除线，如果清除检查框Check1，则文本框中删除线就消失了。如果选定检查框Check2，则文本框中出现下划线，如果清除检查框Check2，则文本框中下划线就消失了（提示：在检查框Check1、Check2的Click事件代码中，输入Text1.Font.……= Not Text1.Font.……）。
打开考试文件夹下的工程文件project11.vbp，在窗体Form1中完成下列操作：
如图所示，设计一个字符转换应用程序。
其中：窗体的标题为"字符转换"。在窗体上画两个文本框Text1、Text2，文本框Text1中的文本为"Visual Basic"，文本框Text1、Text2的字体大小为四号；再画一个命令按钮Command1，标题为"小写转换为大写"，单击命令按钮时，在文本框Text2中显示将文本框Text1中的字符转换为大写后的字符(代码中不能用变量)。