走进编程 程序的顺序结构(二)
如何将两杯中的液体进行交换呢? 引入新课 可乐 橙汁 空杯子
两个数的交换 若A=30,B=40,交换两数,使A=40,B=30
开始 两数交换的流程图 输入a,b的值 顺序执行 t=a a=b b=t 输出a,b的值 ? 结束 可视化编程
复习可视化编程 VB的对象被抽象为窗体和控件,用VB开发应用程序时,一般经历以下步骤:
两数交换的图形界面中:
编写程序的代码: 赋值语句 变量名=控件名称.属性 作用:将该控件名称的 此属性值赋给变量 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 赋值语句 变量名=控件名称.属性 作用:将该控件名称的 此属性值赋给变量
合作探究 以小组为单位,探讨下面的 这个问题: 从键盘上输入一个三位整 数,然后将它反向输出,如何 实现?例如输入456,输出应为 654。
分析问题 设x为输入的三位整数,y为x的反向输出 设x的百位为a,十位为b,个位为c
设计算法 流程图 (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的值。
在VB中实现:三位整数的反向输出 Text1 Label1 Label2 Command1 Label3 Label4 Text2