第3节 用文本框输入输出文字信息

　　使用文本框可以输出或显示文本信息,也可以在其中输入和编辑文本在一个文本框中只能显示一种字体和字号。
3.1 文本框的使用
　例1：设计一个程序，由键盘输入两个数，然后求这两个数的和，并将结果显示出来。

• 设计界面

• 属性设置

  对象 属性 设置 对象 属性 设置 Form（窗体） Caption 文本框的使用 文本框4（等号） 名称 Text4 名称 Form1 Text = 文本框1（被加数） 名称 Text1 Tabstop False Text 置空 文本框5（和） 名称 Text5 文本框2（加号） 名称 Text2 Text 置空 Text + 命令按钮1 Caption 清除 Tabstop False 名称 Command1 文本框3（加数） 名称 Text3 命令按钮2 Caption 加法运算 Text 置空 名称 Command2 ａａａ 命令按钮3 Caption 退出 名称 Command3

• 编写程序代码
  Rem 加法运算事件过程
  Private Sub Command2_Click()
  　add1 = Val(Text1.Text)
  　add2 = Val(Text3.Text) '将文本框对象Text3中的数字字符转为数值
  　Sum = add1 + add2
  　Text5.Text = CStr(Sum) '将Sum中的数值转为字符型并改变Text5的文本属性
  End Sub

　　Rem 清除事件过程
　　Private Sub Command1_Click()
　　　Text1.Text = ""
　　　Text3.Text = "" 　　　　'文本框对象Text3清空
　　　Text5.Text = ""
　　　Text1.SetFocus　　　　　'为Text1设置焦点
　　End Sub

　　Rem 退出事件过程
　　Private Sub Command3_Click()
　　　End
　　End Sub

• 设置焦点
  通过设置焦点的方法可以使用户在操作时既使用鼠标又使用键盘。
  1. 用SetFocus方法设置文本框焦点（对象光标的位置），可以将闪动的光标定位在相应的文本框中，以便在指定的文本框输入数据。
  2. 用TabIndex属性可以控制按下Tab键时焦点的转移顺序。

  TabStop属性可以控制焦点跳过某个指定的对象	TabIndex属性可以控制按下Tab键时焦点的转移顺序

  3. 用TabStop属性可以控制按下Tab键时，让焦点跳过某个指定的对象。

数据转换
任务：
　　1. 按照以下几面和运行要求设计加法出题程序程序

　Rem 出题
　Private Sub Command1_Click()
　　Text1.Text = Fix(Rnd * 100)
　　Text3.Text = Fix(Rnd * 100)
　　Text5.SetFocus
　End Sub

　Rem 检查智力
　Private Sub Command2_Click()
　　a = Val(Text1.Text)
　　b = Val(Text3.Text)
　　c = a + b
　　If　Text5.Text = c　Then　　　　　'条件判断语句
　　　Text6.Text = "我太聪明啦!"
　　Else
　　　Text6.Text = "我可真够笨的！"
　　End If
　End Sub

　Rem 清空
　Private Sub Command3_Click()
　　Text1.Text = ""
　　Text3.Text = ""
　　Text5.Text = ""
　　Text6.Text = ""
　　Command1.SetFocus
　End Sub

　　本任务中的两个加数应随机产生，产生随机数的函数为：
　　　　RND 该函数被执行后会产生（0，1）之间的随机数。
　　若要产生某范围的随机整数，可以用RND函数与截尾函数配合完成。，函数为：
　　　　FIX(X) 截尾函数可对小数X截去小数点后面的部分。
　　求某范围[N,M]之间的随机整数的算法如下：
　　　　FIX(RND*(M-N+1))+N
　　2. 将加法出题的程序按下面的界面改为除法出题的程序，要求对计算结果按四舍五入保留两位小数。

　　除法运算的程序要求对两数相除的商按四舍五入保留小数点后两位下小数。用下面的算法可以实现对X保留小数点后N位小数：
　　　　　FIX(X*10^N+0.5)/10^N
　　对于商的显示要考虑，当小于1的数输出时是没有整数部分显示的，对此编程序时要给予处理。
VB基本知识
　　变量：变量是存放数据的地方（存储空间），将数据存入变量的过程称为给变量提供数据。
　　数据：数据包括数值型和非数值型。
　　赋值语句：赋值语句是给变量提供数据的语句之一。
　　　　　　　<变量名> = <表达式>
　　赋值：用赋值语句将数据存放到变量中的过程称为赋值。
　　变量名：由首字符为字母的字母、数字、下划线组成。（不能是专用词）
　　赋值语句的功能：将赋值号右侧表达式的值赋给赋值号左侧的变量。
表达式的计算：

常用的函数：