VisualBasic程序设计教程教学课件汇总整本书电子教案全套教学教程完整版电子教案(最新).ppt

属性 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种值，对