基础体vb.docVIP

A1 在名称为form1的窗体上划两个文本框其名称分别为：text1和text2，内容分别为“文本框1”和“文本框2编写适当的事件过程，程序运行后，如果单击窗体text1隐藏，text2显示;如图所示，如果双击窗体，则text1显示，text2隐藏。如图所示 注意：程序中不得使用变量 Private Sub Form_Click() text1 属性 text== 文本框1 Text1.Visible = False text2 属性 text===文本框2 Text2.Visible = True End Sub Private Sub Form_DblClick() Text1.Visible = True Text2.Visible = False End Sub A2 用户界面 标签（label1）;标题文字为“欢迎进入vb世界”，背景色是蓝色（H00FF0000）,文字的颜色是黄色(H0000FFFF),文字在标签上居中显示。 命令按钮 （command1）;标题文字是”隐藏” （2）功能 程序运行后，单击命令按钮，能够隐藏标签，并把命令按钮的标题修改为“显示”如图所示，再次单击命令按钮，能够显示标签，并把命令按钮的标题修改为隐藏 A2 l Label1的属性 caption ==” 欢迎进入vb世界” Private Sub Command1_Click() Backcolor=蓝色（H00FF0000） If Label1.Visible = True And Command1.Caption = 隐藏 Then Forecolor=黄色(H0000FFFF) Label1.Visible = False Alignment=2 Command1.Caption = 显示 Command1的属性 caption=”隐藏” Else Label1.Visible = True Command1.Caption = 隐藏 End If End Sub A3 新建立一个工程文件，并按照下列要求进行操作 将窗体的标题属性设置为“改变文本框的前景与背景”；窗体中包含一个命令按钮（command1）;其标题属性为“设置颜色”；一个文本框（Text1）单击命令按钮将文本框的前景色设置为RGB(255,0,0),背景色设置为RGB(0,255M0) . Private Sub Command1_Click() Form1 属性 caption=改变文本框的前景与背景 Text1.BackColor = RGB(255, 0, 0) Command1 属性 caption=设置颜色 Text1.ForeColor = RGB(0, 255, 0) End Sub A4: 在名称为form1的窗体上划两个标签，（名称分别为Label1和Label2, 标题分别为“书名”和“作者“）两个文本框（名称分别为Text1和Text2,Text属性均为空白），何一个命令按钮（名称为Commond1,标题为“显示”）。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在窗体的标题栏上显示两个文本框的内容，要求程序中不得使用任何变量 。 A4  Label1属性 Caption=书名 Private Sub Command1_Click() Label2属性Caption=作者 Form1.Caption = Text1.Text Label2.Caption Text2.TexT Text1属性 Text 为空 End Sub Text2属性Text为空 Conmend1 属性 Caption=显示 A5 新建一个工程文件 在明成为Form1的窗体上划一个垂直滚动条