文档介绍：第
3
赋值与输入输出
一个完整的VB应用程序,一般都包含三部分内容,即
输入→处理→输出
可通过VB语句、各种控件实现输入输出操作
本章主要内容
赋值语句
常用基本语句
使用Print方法输出数据
窗体和基本控件
命令按钮/标签/文本框
对话框
输入对话框/消息对话框
程序举例
第3章赋值与输入输出
赋值语句是程序设计中最基本、最常用的语句
格式:[Let]变量名=表达式
功能:计算右端的表达式,并把结果赋值给左端的变量
已知a=6,b=9,计算c=√a2 + b2
编写的窗体单击事件过程代码如下:
Private Sub Form_Click()
Dim a As Single, b As Single, c As Single
a = 6
b = 9
c = Sqr(a * a + b * b)
Print "c=" & c
End Sub
运行程序后单击窗体,输出结果如下:
C=
赋值语句
本事件过程采用的是顺序程序结构,运行的过程是:
声明3个单精度变量a,b,c
6→a
9→b
计算表达式,→c
输出结果
赋值含义: 将值送到变量的存储单元中去
说明:
(1)表达式中的变量必须是赋过值的,否则变量的初值自动取零值(变长字符串变量取空字符)。例如:
a = 1
c = a + b + 3 ′b未赋过值,为0
执行后,c 值为 4
(2)利用赋值语句,可以改变变量的值,因此,同一变量在不同时刻可以取不同的值。
Private Sub Form_Click()
a = 3 : Print "*A=" & a
a = 7 : Print "**A=" & a
a = a * 2 + 3 : Print "***A=" & a
End Sub
运行程序后单击窗体,输出的结果如下:
*A=3
**A=7
***A=17
(3)赋值语句跟数学中等式具有不同的含意,例如赋值语句x=x+1,表示把变量x的当前值加上1后再将结果赋给变量
“先读后写”:读出x的内容→加1 →写回x(覆盖原有内容)
示例
设计步骤如下:
(1)分析:计算某年y的元旦是星期几,可由以下式子得出:
F = y-1 +[(y-1)/4]-[(y-1)/100]+[(y-1)/400]+ 1
其中[ ]表示求整
K = F Mod 7 F除以7的余数
y为某年公元年号,计算出K为星期几
(2)创建应用程序的用户界面
设计一个“万年历”程序,用来查看某 年的元旦是星期几
(3)设置对象属性
(4)编写程序代码
功能要求:用户在“输入年份”文本框(Text1)中输入某一年份,单击“查看”按钮时,则在“星期”文本框(Text2)中显示出星期几
编写的“查看”mand1)Click事件过程代码如下:
Private mand1_Click()
Dim y As Integer, f As Integer, k As Intege
y = Val() -1
f = y + Int(y/4) – Int(y/100) + Int(y/400) + 1
k = f Mod 7 ‘等价于 f - Int(f / 7) * 7 吗?
= k
End Sub
运行结果(见上图)
注释语句Rem
在程序的适应位置加上必要的注释,可以提高程序的可读性
语法格式: Rem 注释内容
或´ 注释内容
功能:在程序中加入注释内容,以便于对程序的理解。
例如
Rem 交换变量a和b的值
c = a ´c为临时单元
a = b
b = c
说明:(1)如果使用关键字Rem,在Rem和注释内容之间要加一个空格。
(2)在其他语句后使用Rem关键字,必须使用冒号(:)与前面的语句隔开。注释符(单引号’)可以直接写在其他语句后面。
常用基本语句