变量分析：

v1、v2:分别存储两人行走速度

（单位：千米每小时，km/h）

t:存储所用时间（单位：小时，h）

m:存储所用时间（单位：分钟，m）

【设计意图】分析时层层深入，将问题一个个迎刃而解，并且让学生重新理一遍变量，为程序实现作铺垫。

2、流程图转化成代码

学生根据流程图，转化成代码，教师适当提示：

Private Sub Command1_Click()

Dim v1, v2, t As Double

Dim m As Integer

V1=val(text1.text)

V2=val(text2.text)

t=25/(v1+v2)

m=Fix(t*60)

text3.text = Str(m)

End Sub

第三步 学以致用 实现主题

【教师】：下面我们就付诸实施，利用计算机帮助我们计算相遇时间。

实践活动一：相遇时间，后附。

展示完成后的程序效果，如图。

展示程序设计的界面，让学生先完成基本的程序界面，再编写代码(通过提供不完整代码，有针对性的给予