五、保存

单击工具栏上的“全部保存”按钮，在“保存项目”对话框中输入名称：抽车牌程序，选择位置为：D：\项目一\活动一，单击“保存”按钮（参见图1-11）。

试一试

1．编写一个程序，用户输入姓名后，单击“进入”按钮，显示欢迎字样；单击“退出”按钮，程序结束运行，如图1-25所示。要求：文字“请输入姓名：”为隶书、三号字；单击“进入”按钮后，显示的欢迎字样呈蓝色。

提示

①FontSize属性值为数值，不能直接输入汉字“三号”。单击属性窗口中Font属性旁的按钮，打开“字体”对话框，可以设置字体大小为三号字。单击“确定”按钮后，自动转换成相应的字体大小：15.75 pt。

② 使用字符串连接运算符“&”将文本框中输入的姓名放入欢迎字样，“进入”按钮的事件过程程序代码为：

    Private Sub Button1_Click（ByVal sender As System.Object，ByVal e As
      System.EventArgs）Handles Button1.Click
      Label1.Text = TextBox1.Text & "，您好！欢迎进入系统！"
      Label1.ForeColor = Color.Blue
    End Sub

2．编写一个选择标签前景色和背景色的程序。文字“配色合适吗？”字体为黑体、大小为15 pt；颜色块的大小为20 pt×20 pt。单击上面一行颜色，改变标签的前景色；单击下面一行颜色，改变标签的背景色。如图1-26所示。

提示

① 标签的前景色属性为ForeColor，背景色属性为BackColor。

② 使用标签创建颜色块，将标签的Text属性设置为空白，BorderStyle属性设置为Fixed3D，使得颜色块带三维边框。将AutoSize属性值设置为False，使得能够设置大小，将Size属性的Width和Height属性值分别设置为20 pt。

③ 为使每一块颜色的大小一致，可以先创建第一块颜色的标签，然后选中第一块颜色的标签，单击“复制”按钮，以后单击“粘贴”按钮，逐个复制。

④选中一行颜色块，单击“布局”工具栏“减小水平间距”按钮，使得一行颜色块相连在一起。

⑤ 单击第一块颜色，改变标签的前景色。其事件过程代码为：

    Private Sub Label2_Click（ByVal sender As System.Object，
      ByVal e As System.EventArgs）Handles Label2.Click
      Label1.ForeColor = Label2.BackColor
    End Sub

其余事件过程代码与它类似。可以在代码窗口中单击对象名（如Label3），再单击事件名（如Click），然后将代码Label1.ForeColor = Label2.BackColor复制后修改。

3．编写一个设置文字字体的程序。窗体上有若干个按钮，分别表示不同的字体设置，单击某个按钮后，示例文字的字体相应变化，如图1-27所示。

提示

①单击Font属性前的，用“字体”对话框将按钮上显示的文字设置成相应的字体。

② 单击某一按钮后，标签的字体设置成与这个按钮相同的字体。如第一个按钮的事件过程代码为：

    Private Sub Button1_Click（ByVal sender As System.Object，ByVal e As
      System.EventArgs）Handles Button1.Click
      Label1.Font = Button1.Font
    End Sub