第3章Visual Basic程序设计初步.pptVIP

第3章 Visual Basic程序设计初步 3.1.1 创建窗体 3.1.2 窗体的常用属性 　　使用标签的情况很多，通常用标签来标注本身不具有Caption属性的控件。例如，可用标签控件为文本框、列表框等控件添加描述性的说明文字，也可用它们为窗体添加说明性文字，向用户提供帮助信息。 　　【例3-2】建立两个标签控件，它们的属性如表3-4所示。运行结果如图3-6所示。 3.4.1.文本框的属性 　　其中当加入了加水平滚动条以后，文本框内的自动换行功能会自动消失，只有按Enter键才能以回车换行。 6.MaxLength属性 MaxLength属性用来指明文本框中能够输入正文内容的最大长度。 0——任意长字符串。 非零值——文本框中字符个数的最大值。需要注意的是，在VB中一个汉字的长度相当于一个西文字符。 If past.Text = vb1234 Then MsgBox 输入正确 Else 　　i = MsgBox(密码错误, 5 +vbExclamation, 输入密码) 　　If i 4 Then ’调用MsgBox函数按 “取消”按钮 　　Else 　　　　past.Text = 　　　　past.SetFocus 　　End If End If End Sub Private Sub out_Click() End End Sub 思考 1.如何在工程中添加一个窗体？ 2.窗体的Name 和Caption属性有何区别？ 3.命令按钮的Default、Cancel属性有什么作用？ 4.标签和文本框有什么区别？ 5.为了使一个控件在运行时不可见，应对该控件的什么属性进行何种 设置？ 6.为了防止用户编辑文本框内的内容，应对该控件的什么属性进行何 种设置？ 7.当要使标签的大小随Caption属性的值进行扩展或缩小时，应对该 控件的什么属性进行何种设置？ 8.MsgBox 函数和过程有什么区别？ 3.4.1.文本框的属性 4. PasswordChar 属性 　　PasswordChar 属性用来指定显示在文本框中的字符。如果希望在密 码框中显示星号，则可在“属性”窗口中将 PasswordChar 属性指定为 *， 运行程序时，无论用户输入什么字符，文本框中都显示星号。 5.ScrollBars 属性 　　当MultiLine 属性设置为 True时， ScrollBars 属性才有效。 　　0——None：无滚动条。 　　1——Horizontal：加水平滚动条。 　　2——Vertical：加垂直滚动条。 　　3——Both：同时加水平垂直滚动条。 3.4.2 文本框的事件 1.Change 事件 　　该事件当用户改变正文或通过代码改变 Text 属性的设置时发生。 用户可在该事件代码中加入对文本有效性检验的命令，以确保用户输入 的值符合要求。 2.GotFocus 事件 　　当对象获得焦点时产生该事件。获得焦点可以通过诸如 Tab 切 换，或单击对象之类的用户动作，或在代码中用 SetFocus 方法改变焦 点来实现。 3.5 常用的基本语句 1.赋值语句 赋值语句是在任何程序设计语言中最基本、最常用的语句。它的作 用是把计算右边表达式的运算结果赋值给左端的变量。Visual Basic使用 赋值号“=”来赋值。 格式： [Let] 变量名=表达式 [Let] [对象名.]属性名=表达式 其中：Let表示赋值，通常省略。 功能：计算右端的表达式，并把结果赋值给左边的变量。Visual Basic使用赋值号“=”来赋值。 例如：在一个新建工程的默认窗体中添加一个命令按钮，双击该命 令按钮，在代码窗口中输入以下代码，然后按F5键运行程序。 3.5 常用的基本语句 Private Sub Command1_Click() Dim A As Integer A = 3.5 MsgBox A End Sub 其中A是整型变量， 给A赋一个小数，而结果为4。给变量赋值和 设定类型是Visual Basic编程中常见的两个任务。 例如： sngRate！=0.1 ’sngRate为单精度变量，将0.1值赋给sngRate Text1.Text= ’清除文本框的内容 Text1.Text= 欢迎使用Visual　Basic 6.0 ’文本框显示的字符串 3.5 常用的基本语句 2.注释语句Rem 　　在程序的适当位置加上必要的注释，可以提高程序的可读性。 　　格式：Rem 注释内容或注释符