第3章 Visual Basic数据的输入与输出.pdfVIP

第3 章 Visual Basic 数据的输入与输出 学习内容 输入输出的概念 赋值语句 InputBox函数 Print语句及输出格式 与Print语句相关的函数 Print的其他方法和属性 字形 MsgBox函数和MsgBox语句 打印机输出 学习目标 掌握 Print方法以及 InputBox函数和MsgBox函数的一般用法,了解与打印机输出有关的属性和方 法。 3.1 数据输入 Visual Basic程序设计除了界面以外,在程序设计中需要对原始数据进行输入,待数据处理完毕后 需将处理的结果进行输出。一般来说,一个计算机程序由三部分组成,即输入、处理和输出。在程 序中用于输入数据的是输入语句,用于输出的是输出语句。 Visual Basic提供赋值语句和InputBox函数用于数据的输入。 3.1.1 赋值语句 格式:[let]variable=表达式 功能:计算赋值号右侧表达式的值,然后将计算结果赋给左侧的变量。 几点说明: (1)Let:表示赋值,通常省略。 (2)表达式:可以是任何类型的表达式,一般其类型应与变量的类型一致。例如: X=0:Y=100:Z=X＋Y: X=Y＋Z R=34:S=3.14159*r*r:Z=2*3.14159*r (3)一个赋值语句只能对一个变量赋值。 (4)赋值号两边的数据类型要匹配,不能把字符串的值赋给数值型变量,但可使用类型转换函数先 将数据转换成与左边变量名相同的类型,然后再赋值。 (5)要在一行中给多个变量赋值,可以用冒号将语句与语句之间隔开。 下列赋值语句是不合法的: x＋y=a （等号左边是表达式） g％= “Visual Basic”（数据类型不匹配） x=y=z=1 （不能同时对多个变量赋值） 在 Visual Basic中,除了给变量赋值外,还可以给对象的属性赋值,即对象名.属性名=属性值。例 如:Forml.Caption= “程序设计”。 例3-1 编写程序,先随机产生3个两位正整数,再统计并输出平均值。要求:在3个文本框中显示随机 数,单击“计算”按钮,在图片框中显示计算结果；单击“下一个”按钮,产生下一组随机数；单击 “退出”按钮,结束程序运行。程序运行后的界面如图3-1所示。 图3-1 例题3-1程序运行界面 程序代码如下: Private Sub Command1_Click() Dim average As Single average = (Val(Text1) + Val(Text2) + Val(Text3)) / 3 Picture1.Cls Picture1.Print Picture1.Print 平均值=; average End Sub Private Sub Command2_Click() Picture1.Cls Form_Load End Sub Private Sub Command3_Click() End End Sub Private Sub Form_Load() Randomize Text1.Text = Int(Rnd * 90) + 10 Text2.Text = Int(Rnd * 90) + 10 Text3.Text = Int(Rnd * 90) + 10 End Sub 例3-2 编写程序,交换两个图片框中的内容,其窗体界面如图3-2所示。 3-2 例3-2运行界面 程序代码如下: Private Sub Command1_Click() Picture3.Picture = Picture1.Picture Picture1.Picture = Picture2.Picture Picture2.Picture = Picture3.Picture Picture3.Picture = LoadPicture() End Sub 其中,Picture3.Picture=LoadPicture （）语句的作用是在Picture3图片框中使用 LoadPicture 函数装入一个空图片。 3.1.2. InputBox 函数 InPutBox函数是提供从键盘输入数据的函数。该函数在执行过程中会产生一个对话框,等待用户在 该对话框中输入数据,并返回所输入的内容。 格式:InputBox （提示信息[,对话框标题][,默认内容][,x坐标位置][,y坐标位置