VisualBasic程序设计教程完教学课件完整版电子教案.pptVIP

属性 Interval：设定时钟触发事件的时间间隔。 有效值:1～65535 单位: 毫秒 (1秒=103毫秒) Enabled： 决定该控件是否对时间的推移做响应。 False ---关闭 Timer 控件 True --- 打开Timer 控件。倒计时总是从 Interval 属性的设置值开始。 * 例 数字时钟。 ☆ Private Sub Timer1_Timer( ) Label1.FontName = times new roman Label1.FontSize = 48 Label1.Caption = Time$ End Sub * 获取系统当前时间 例 ： 显示随机数据 ☆ Private Sub Form_Load( ) Timer1.Enabled = False End sub Private Sub cmdStart _Click( ) Timer1.Enabled = True End sub Private Sub cmdStop _Click( ) Timer1.Enabled = False : End sub * Private Sub Timer1_Timer( ) Dim rndValue Randomize rndValue = Int ((* Rnd) + 1) Text1. FontSize = 46 Text1. FontName = times new roman Text1.Text = Str$ (rndValue) End Sub * 7.8图片框 7.9图像框 共同点：用于在窗体的指定位置显示图形信息，可装入多种格式的图形文件。 区别 图片框：更灵活 可作为父控件，即可以包含其他控件 可用print方法接收文本 图像框：占用内存更少，显示速度快，优先考虑 不可作为父控件 不可用print方法接收文本 * VB为二者提供的属性 与窗体属性相同的属性 enabled、name、visible、height、top CurrentX和CurrentY属性 只能用在程序，用来设置下一个输出的坐标（水平或垂直）。 Picture1.CurrentX=340 (单位：twip) Picture属性 设置显示的图形文件。VB支持的图形文件格式 Stretch属性（图像框) 自动调整图像框中图形内容的大小 * VB支持的图形格式 名称 扩展名 说 明 备 注 JPEG .jpg 一种支持8位和24位颜色的压缩位图格式 GIF .gif 支持256种颜色的压缩位图格式 Metafile 图元文件 .wmf .emf 将图形定义为编码的线段和图形 要与OS兼容 Bitmap 位图 .bmp .dib 将图形定义为由点组成的图形 Icon 图标 .ico .cur 特殊类型的位图 * 图形文件的装入 在设计阶段装入 way 1: 通过picture属性 way 2: 利用剪贴板把图形粘贴到窗体、图片 框或图像框 ☆ 在运行期间装入 [对象.] picture=LoadPicture(文件名 ） 例： picture1.picture=LoadPicture ( c:\arw4.ico ) picture1.picture=LoadPicture( ) 删除原图片 * 7.10 线条 线条用来在窗体、框架或图片框中创建简单的线段。一般通过属性窗口可设置其位置、长度、颜色和样式等外观。 * * 属性名称 属性值 说 明 BorderColor 颜色值 设置直线的边框颜色 BorderStyle 0（Transparent） 设置边框样式为透明，即不可见 1（Solid）（默认值） 设置边框样式为实线 2（Dash） 设置边框样式为虚线 3（Dot） 设置边框样式为点线 4（Dash-Dot） 设置边框样式为点划线 5（Dash-Dot-Dot） 设置边框样式为双点划线 6（Inside Solid） 设置边框样式为内实线 BorderWidth 整型数值 设置边框宽度 X1，Y1 线条控件的起始点坐标 X2，Y2 线条控件的终止点坐标 7.11 形状 属性 shape 用来确定所画形状的几何特性，有6种值，对