vb习题及部分答案.doc

1.在名称为Form1的窗体上画一个名称为Command1、标题为“保存文件”的命令按钮，再画一个名称为CommonDialog1的通用对话框。要求： 1）通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为out2； 2）运行时单击“保存文件”命令按钮，则以“保存对话框”方式打开该通用对话框，如图所示。 注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。 保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。 Private Sub Command1_Click() CommonDialog1.Action = 1 End Sub 2.在名称为Form1的窗体上画一个名称为command1的命令按钮，标题为“命令按钮”。然后建立一个菜单，标题为“控件”，名称为menu，包含两个子菜单项，一个是“显示命令按钮”，名称为subMenu1；另一个是“隐藏命令按钮”，名称为subMenu2，如图所示。编写适当的事件过程，使得程序运行时，如果选择“显示命令按钮”菜单命令，则显示命令按钮控件；而如果选择“隐藏命令按钮”菜单命令，则隐藏命令按钮控件。 Private Sub subMenu1_Click() Command1.Visible = True End Sub Private Sub subMenu2_Click() Command1.Visible = False End Sub 3.在考生文件夹下有一个工程文件sjt4.vbp，含有Form1和Form2两个窗体，Form1为启动窗体。两个窗体上的控件如图1所示。程序运行后，在Form1窗体的文本框中输入有关信息（‘密码’框中显示‘*’字符），然后单击‘提交’按钮则弹出‘确认’对话框（即Form2窗体），并在对话框中显示输入的信息，如图2所示。单击‘确认’按钮则程序结束，单击‘重输’按钮，则对话框消失，回到Form1窗体。在给出的窗体文件中已经给出了程序，但不完整。 要求：1）把Form1的标题改为‘注册’，把Form2的标题改为‘确认’；2）设置适当的属性，使Form2标题栏上的所有按钮消失（如图2所示）； 3）去掉程序中的注释符，把程序中的？改为正确的内容。 窗体 1Private Sub Command1_Click() a = Text1.Text b = Text2.Text n = Text3.Text If Option1.Value = True Then sex = 男 If Option2.Value = True Then sex = 女 Form2.Show Form2.Print 用户民：; a Form2.Print 密码：; b Form2.Print 姓名：; n Form2.Print 性别：; sex End Sub Public a As String, b As String, n As String Public sex As String 在模块中： Public a As String, b As String, n As String Public sex As String（全局变量） 在窗体2中： Private Sub Command1_Click() End End Sub Private Sub Command2_Click() form1.Show form1.Text1.Text = form1.Text2.Text = form1.Text3.Text = End Sub 4.在名称为Form1的窗体上画一个名称为Text1的文本框，再建立一个名称为Format的弹出式菜单，含三个菜单项，标题分别为‘加粗’、‘斜体’、‘下划线’，名称分别为M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击文本框时，弹出此菜单，选中一个菜单项后，则进行菜单标题所描述的操作，如图所示。Private Sub M1_Click() Text1.FontBold = True End Sub Private Sub M2_Click() Text1.FontItalic = True End Sub Private Sub M3_Click() Text1.FontUnderline = True End Sub Private Sub Text1_MouseDown(Button As Integer, Shift As Integer