[]第08章 常用控件.pptVIP

Visual Basic 第八章 常用控件 Private Sub Command闪烁_Click() Timer1.Enabled = True End Sub Private Sub Command停止_Click() Timer1.Enabled = False Image1.Visible = True End Sub 时钟控件 Private Sub Timer1_Timer() Static flag As Boolean If flag Then Image1.Visible = False flag = False Else Image1.Visible = True flag = True End If End Sub 时钟控件 Private Sub Command设置时间_Click() Text时间.Visible = True End Sub Private Sub Text时间_LostFocus() Timer1.Interval = Text时间.Text Text时间.Visible = False End Sub 时钟控件 Line 控件 Line(直线)控件的用途： Line控件的作用是在窗体上画一条直线，主要用于修饰窗体。 1、常用属性 Y1，Y2 用于控制控件的高度。 X1，X2 用于控制控件的宽度。 BorderWidth 直线的宽度。 BorderStyle 直线的线型。 BorderColor 直线的颜色。 Shape 控件 Shape(形状)控件的用途： 在窗体上画矩形、正方形、椭圆、圆、圆角矩形及圆角正方形，用于修饰窗体。 1、常用属性 Shape 控件的形状 0 —— Rectangle 矩形（缺省值） 1 —— Square 正方形 2 —— Oval 椭圆形 3 —— Oval 圆形 4 —— Rounded Rectangle 圆角矩形 5 —— Rounded Square 圆角正方形 Shape 控件 BorderWidth 边线的宽度。 BorderStyle 边线的线型。 BorderColor 边线的颜色。 FillColor 填充的颜色。 FillStyle 填充的样式。 PictureBox 控件(容器对象) PictureBox(图片框)控件的用途：用于在窗体的指定位置显示图形信息。 VB 6.0支持 .bmp、.ico、.wmf、.emf、.jpg、.gif等格式的图形文件。 1、常用属性 Picture 图片框中显示的图形文件。 AutoSize 控件是否自动改变大小以显示图片的全部内容。缺省值为False，此时保持控件大小不变，超出控件区域的内容被裁减掉；若值为True时，自动改变控件大小以显示图片的全部内容（注意：不是图形改变大小）。 2、常用方法 LoadPicture 在运行期间，把图形文件装入图片框中。语句格式如下： 对象名.Picture = LoadPicture(图形文件路径名) 3、常用事件 Click 单击控件。 注意： PictureBox控件是容器对象，可在该控件内放置其他控件。 PictureBox 控件(容器对象) PictureBox 控件作为容器 Image 控件 Image(图像框)控件的用途：用于在窗体的指定位置显示图形信息。 VB 6.0支持 .bmp、.ico、.wmf、.emf、.jpg、.gif等格式的图形文件。 1、常用属性 Picture 图像框中显示的图形文件。 stretch 是否调整图形的大小以适应图像框控件的大小。当其值为False时，控件将自动改变大小以适应图形的大小；当其值为True时，改变图形的大小以适应控件的大（注意：此时图形可能会变形）。 2、常用方法 LoadPicture 在运行期间，把图形文件装入图像框中。语句格式如下： 对象名.Picture = LoadPicture(图形文件路径名) 3、常用事件 Click