[VB]chp04输出与输入.docVIP

第四章 输出与输入 4-1 文字方块 　　「文字方块」 (Text Box) 使用实际是用来输入、修改和显示数据的工具。因为在某些条件下你希望对窗体上的数据做输入或修改的动作，又在某些条件下却不允许输入数据 ( 只能看不能改 )，此时就必须使用工具箱内的文字方块工具来完成。 4-1-1 文字方块的建立 1. 在工具箱中选取「文字方块」 钮。 2. 将指针移至窗体中任意位置，指针呈「十」字形，按住鼠标左键并拖曳，拉出适当的大小后再放开左键，如图4-1所示： 3. 设定文字方块的属性。 图4-1 文字方块的建立 4-1-2 文字方块常用的属性 　　「文字方块」的属性和「窗体」、「卷标」有许多相同的属性不再重述，只介绍不相同且常用的属性： MaxLength ( 文字长度 )：设定文字方块内可容纳最多字符数目。若设定为「0」，表示长度不限制 ( 默认值32767 )。 Mu1tiLine ( 多行 )：当文字方块内显示文字数据超过所设定的宽度时，决定能否采多行或单行显示数据：True：允许多行显示。False：不允许多行显示 ( 默认值 )。 PasswordChar ( 密码 )：输入的字符不显示，改由其它符号取代如 (*) 号。 ReadOnly ( 只读 )：决定文字方块内文字是否可以编辑。True：允许可以编辑。 False：不允许编辑 ( 默认值 ) 。 Text ( 文字 )：当文数字数据输入到文字方块内，会以字符串方式放入Text属性内，若此属性内容在程序设计或执行阶段时有所异动，则窗体上对应的文字方块内的数据亦跟着异动。 ScrollBars ( 滚动条 )：ScrollBar，用来设定文字方块中是否出现水平或 ( 及 ) 垂直滚动条。对文字方块而言可以有四个数值：None：表示不要滚动条 ( 默认值 ) 。Horizontal：表示水平滚动条。Vertical：表示垂直滚动条。Both：表示两个都要。 这个属性字段只能在设计阶段做设定，而且MultiLine属性要为True时，ScrollBars值才会有作用。 【注意】 文字方块内Text属性值为「字符串」，当利用它来输入数值数据时，特别要注意利用Val( )函数转换为数值数据。 实例04_01_01 　　设计一程序利用文字方块输入账号与密码。 题目说明 1. 窗体上有文字方块「账号」与「密码」，当输入密码时以星号「*」显示，如图4-2所示。 2. 输入「账号」与「密码」后按「执行」，在卷标(lblshow)内显示输入数据，如图4-3所示。 3. 「结束」键即离开。 图4-2 窗体上有文字方块账号与密码 图4-3 按执行卷标内显示 学习目的 1. 文字方块的运用。 2. 了解passwordchar的设定。 使用对象与命名 图4-4 使用对象 使用对象的类别与属性 对象类别 对象名称 Text ( 标题文字 ) 其它属性 Form Form1 文字方块测试 Label Label1 账号 Label Label2 密码 Label Lblshow AutuSize：False BorderStyle：Fixed3D TextAlign：MiddleCenter TextBox TextBox1 TextBox TextBox2 Button Button1 执行 Button Button2 结束 程序内容 Private Sub Form1_Load(ByVal…) Handles MyBase.Load TextBox2.PasswordChar = * 设定密码字符 End Sub Private Sub Button1_Click(ByVal…) Handles Button1.Click Dim a As String a = 账号： + TextBox1.Text + 密码： + TextBox2.Text lblshow.Text = a 显示密码与账号 End Sub Private Sub Button2_Click(ByVal…) Handles Button2.Click 结束程序 End End Sub 4-2 数值与字符串的转换函数 　　在「文字方块」工具的属性中，Text属性算是最常使用的属性之一，其功能就是不管输入的数据是文字或是数值，Visual Basic2005都自动转成字符串存入Text属性中。所以，在程序代码中欲对Text属性中的数据做数值计算时，必须先使用Val函数将文字数据转成数值方能做各种计算。 语法