赋值语句与输入输出语句

第二章程序设计基础第二节VB语言概述

赋值语句与输入输出语句柳州三中钟东华复习：活动一观摩、分析程序语句1、数据类型和常量、变量；2、运算符、函数和表达式。活动二修改、完善程序语句学习内容：1、赋值语句：=2、输入语句：InputBox函数3、输出语句：Print方法MsgBox函数1、赋值语句

赋值语句是程序设计语言中最基本的语句，它的作用就是把某一值赋给某一变量。VB中赋值语句的格式为：

变量名=表达式其中“=”是赋值运算符，它将右边表达式的值赋给左边的变量。例如：（1）a=15,表示将数值15赋给变量a。（2）b=a,表示将变量a的值赋给变量b，但a的值不变。（3）

b=b+1，表示将变量b的值加1后，赋给变量b。

变量bb=1010b=b+111思考：15

=a，能把数值15赋给变量a吗？下面一组代码完成的是变量i和j的赋值、计算及交换操作。为变量i、j、t分配三个整型的存储单元DimI

ASInteger,jASInteger,t

ASIntegerj=5(2)i=j(3)i=i+55

105

5ij

t5(4)~(6)句执行交换操作，交换变量i和变量j的值t=jj=ii=t51051055

i

j

t10

510思考：按以下步骤能否实现变量i和变量j的值的交换？（1）i=j（2）j=iij1055555注意（1）在VB中规定：如果数值变量没有赋值，其值为0；如果字符串变量没有赋值，其值为空串。（2）赋值运算符两边的数据类型要一致，否则可能发生“类型不匹配”的错误，例如：DimxAsIntegerX=“string”第2句在运行的时候就会发生“类型不匹配”的错误，程序的运行将中断。2、输入语句InputBox()是提供从键盘输入数据的系统函数。

该函数执行时将产生一个对话框，用户可以在对话框中输入数据，该函数的返回值就是用户输入的字符串。InputBox()函数的语法格式为：InputBox(提示信息，标题，默认值，位置)其中，提示信息是指显示在对话框中的提示语句，不能省略；标题是指弹出的对话框的标题；默认值是指默认的输入数据值；位置是指弹出的对话框的左上角在屏幕上的位置。InputBox(提示信息，标题，默认值，位置)例如：运行以下代码DimusernameAsStringUsername=InputBox(“请输入用户名”,“输入”,“标准用户”,100，30)在屏幕坐标（100，30）处将出现如图所示的输入对话框。3、输出语句（1）Print方法（2）MsgBox函数3、输出语句（1）Print方法Print是输出数据、文本的一个重要方法。Print方法输出数据的基本格式是：Print输出项1[;输出项2;…输出项n]如果输出内容是数、变量或表达式，则输出数、变量或表达式的值；如果输出内容是用引号括起来的字符串，则按照原样输出该字符串。多个输出内容之间可以用逗号或分号分隔。如果用分号，则后面一个输出紧跟前一个输出；如果用逗号，则按照分区格式输出。例如：Print“a=”输出结果：a=Print“a=”;a;”b=”;b输出结果：a=ab=bPrint“a=”;a,”b=”;b输出结果：a=ab=b例：Print”可兑换人民币”&rmb&”元”就是将计算出来的变量rmb的值以“可兑换人民币XX元”的形式输出到窗体上。（2）MsgBox函数MsgBox函数的作用是弹出一个对话框，以显示字符串。例如，

可以用MsgBox函数显示本节活动的结果。MsgBox”可兑换人民币”&rmb&”元”注意：

使用InputBox和Print语句进行输入输出，并不能创建友好的用户交互界面。

在VB可视化编程中，更多地是采用丰富多彩的控件来对界面进行设计。例如，活动二中使用了三个文本框，一个文本框用于输入当天的汇率，一个文本框用于输入美元值，一个文本框用于输出换算后的人民币值。使用文本框的Text属性可以方便地获取或改变文本框的值。常用的输入输出控件有：文本框、命令按钮、标签、列表框、单选按钮、复选框和组合框。本节活动程序中的语句都是按其出现的顺序逐句执行的，执行完第一句后执行第二句，然后执行第三句，依次执行下去，直到执行完最后一句，这种结构便是顺序结构，通常由输入、输出、赋值等语句实现。体验活动1、观察下列程序的运行结果，体会各语句的作用。（1）比较程序中两条输入语句的执行效果。PrivateSubForm_Click()DimaAsDoubleDimbAsStringa=Val(InputBox(“a=”,”输入数字”,100))b=InputBox(“b=”)EndSub（2）分析Print语句中各符号对显示的影响。PrivateSubForm_Click()ConstaAsInteger=5ConstbAsInteger=8Print“a=”;a;”b=”;bPrint“a=”;a,”b=”;bPrint“a=”;a,Print“b=”;bPrint“a=”;aPrint“b=”;bEndSub输出结果：a=5b=8a=5b