Download presentation
Presentation is loading. Please wait.
1
顺序结构程序设计 ——关于“字符串”和数值
2
Integer和String有什么区别?
关于数据类型 Integer和String有什么区别? a=10 可以做加减乘除计算 b = "10" 不可以做加减乘除计算
3
“+”和“&”的区别 +(两层作用) 数值 + 数值=数值的和 12 +12 =24 字符串+ 字符串= “字符串字符串”
“abc” + “abc”=“abcabc” 数值 + 字符串?(错误!) ”abc”+Str(12)=“abc 12” ”abc”+trim(Str(12))=“abc12” &(字符串连接) 数值 & 数值=“数值数值” 12 & 12=1212 数值 & 字符串=“数值字符串” 12 & “abc”=12abc
4
典型的字符串连接代码 写法1: Label1.Caption = "最大值:" + Text1.Text + Chr(13) + "最小值:" + Text2.Text 写法2: a= Text1.Text b= Text2.Text Label1.Caption = "最大值:" + a + Chr(13) + "最小值:" + b
5
如何输出特殊字符 换行 Chr(13) Chr(10) vbCrLf 试试这段代码,在文本框中按下回车键。
Private Sub Text1_KeyPress(KeyAscii As Integer) Print KeyAscii End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Print KeyAscii End Sub
6
阅读程序 &
7
函数列表
8
VB运算符 12 mod 2=0 9 mod 2=1
9
VB关系运算
10
VB逻辑运算
11
课堂练习:解读身份证 要求: 显示出年龄、性别、生日等信息。 关于性别的判断,不使用if语句。
12
核心:获取字符 出生年份:7-10 生日:11-14 当地顺序号:15-16 性别:17 奇数为男,偶数为女。
13
核心函数(s为输入的身份证号码) 得到字符数量:len(s) 解析出年份:mid Mid(s,7,4) 当前年份:year(now())
year(now()) –val(mid(s,7,4)) 如何不用if判断得到性别? 通过mod 2,得到余数 Sex=“女男” Mid(sex,2,1)为男 换行符号:Chr(13)
14
参考代码
15
上节课挑战题解释: “猜大小”程序 修改代码实现“猜大小”功能。
16
程序解释:全局变量和局部变量 如何让一个变量的值一直保存? 程序中的“V”和“l”是全局变量(窗体变量)
17
程序解释:过程 Sub echo() s = "竞猜次数:" + Str(v + l) Label1.Caption = s End Sub
Similar presentations