Download presentation
Presentation is loading. Please wait.
1
走进编程 程序的顺序结构（二）
2
如何将两杯中的液体进行交换呢？ 引入新课 可乐 橙汁 空杯子
3
两个数的交换 若A=30，B=40，交换两数，使A=40，B=30
4
开始 两数交换的流程图 输入a，b的值 顺序执行 t=a a=b b=t 输出a，b的值 ？ 结束 可视化编程
5
复习可视化编程 VB的对象被抽象为窗体和控件，用VB开发应用程序时，一般经历以下步骤：
6
两数交换的图形界面中：
7
编写程序的代码： 赋值语句 变量名=控件名称.属性 作用：将该控件名称的 此属性值赋给变量
Private Sub Command1_Click() Dim A As Integer , B As Integer, T As Integer A = Text1.Text B = Text2.Text T = A A = B B = T Print "交换后,A="; A, "B="; B End Sub 赋值语句 变量名=控件名称.属性 作用：将该控件名称的 此属性值赋给变量
8
合作探究 以小组为单位，探讨下面的 这个问题： 从键盘上输入一个三位整 数，然后将它反向输出，如何 实现？例如输入456，输出应为 654。
9
分析问题 设x为输入的三位整数，y为x的反向输出 设x的百位为a，十位为b，个位为c
10
设计算法 流程图 (1)输入x的值； (2)计算：a=x\100； (3)计算：b=(x-a*100)\10；
(4)计算：c=x-a*100-b*10； (5)计算：y=c*100+b*10+a； (6)输出y的值。
11
在VB中实现：三位整数的反向输出 Text1 Label1 Label2 Command1 Label3 Label4 Text2
Similar presentations
![第2章第2章 第 1 节 生物与非生物. [ 猜谜语 ] 名字叫做牛， 不会拉犁头； 说我力气小， 背着房子走。 （ 打一动 物）](/40/11037992/big_thumb.jpg "第2章第2章 第 1 节 生物与非生物. [ 猜谜语 ] 名字叫做牛， 不会拉犁头； 说我力气小， 背着房子走。 （ 打一动 物）>")
