第4章节 数据的输入输出和图形控件.ppt

第四章 数据的输入输出和图形控件 4.1 数据的输入 4.2 数据的输出 4.3 字形 4.4 图形控件及图形方法 一、赋值语句 形式：[LET]变量名＝表达式 作用： 将表达式的值赋值给变量名。 一般用于给变量赋值或对控件设定属性值。 例： sRate!=0.1 Text1.Text ＝ 欢迎使用Visual Basic 6.0 4.2 数据的输出 一、MsgBox函数和MsgBox过程 函数形式：变量[%] = MsgBox(提示[,按钮][，标题]) 过程形式：MsgBox 提示[,按钮][,标题] 例4.1 编一帐号和密码检验程序。 要求： 帐号不超过6位数字，有错，清除原内容再输入。 密码输入时在屏幕上以 “*”代替； 若密码错，显示有关信息，选择“重试”按钮，清除原内容再输入，选择“取消”按钮，停止运行。 分析： 帐号6位，MaxLength为6，LostFocus判断数字IsNumeric函数 密码PassWordChar为“*”，MsgBox函数设置密码错对话框。 代码-账号有效性检验 Private Sub Text1_LostFocus() If Not IsNumeric(Text1) Then MsgBox 请输入数字！ Text1.SetFocus Text1 = End If End Sub 代码-密码检验 Private Sub Command1_Click() If Text2 1234 Then i = MsgBox(密码错误，重新输入吗？, vbOKCancel) If i = vbOK Then Text2.SetFocus Text2 = Else End End If End If End Sub 二、常用方法 代码 Private Sub Command1_Click() Command1.Move (Form1.ScaleWidth - Command1.Width) / 2, (Form1.ScaleHeight - Command1.Height) / 2 End Sub 4.3 字形 ① FontName：字符型，决定窗体上显示正文的字体。 ② FontSize：整型，决定窗体上显示正文的字体大小。以磅为单位，最大值为 2160 磅。 ③ FontBold：逻辑型，决定窗体上显示正文的字体是否粗体。 ④ FontItalic：逻辑型，决定窗体上显示正文的字体是否斜体。 ⑤ FontStrikethru：逻辑型，决定窗体上显示正文的字体是否加删除线。 ⑥ FontUnderline：逻辑型，决定窗体上显示正文的字体是否带下划线。 4.4 图形控件及图形方法 主要控件 Picture Image Line Shape 4.4 图形控件 4.4.1 图片框和图像框 （3）图元文件(MetaFile)：将图像作为线、圆或多边形这样的图形对象来存储，而不是存储其像素。 图元文件的类型有两种： 标准型（.Wmf） 增强型（.Emf） （4）JPEG文件：JPEG是一种支持8位和24位颜色的压缩位图格式。 （.jpg） （5）GIF文件： GIF是一种支持256种颜色的压缩位图格式。 （.gif） 图像控件（Image） 图像控件用来显示一个来自磁盘上的图形文件并可随意调整图形的大小。 （.BMP、.ICO、.WMF、.EMF、.JPG 、.GIF文件） 重要属性、事件和方法： 1、Name 属性——对象名 2、Left、Top、Width、Height、Visible、 Enabled 3、BorderStyle 属性——边框样式 0：无边框（默认） 1：有边框 4、Picture 属性：返回或设置控件中要显示的图片。其格式为： [对象名.]Picture = LoadPicture([ 图片文件路径名 ]) LoadPicture函数语法为： LoadPicture([图形文件名]) 说明：①不带参数的LoadPicture( )函数，是使图像控件不显示任何图像。 ② 属性窗口设置的Picture 属性，会被复制到二进制窗体文件(.frx)中，运行时不依