前言
时下，智能手机越来越贴近我们的生活，越来越多的教师朋友，学生朋友都会用智能手 机，因为她们功能齐全，在手机上运行的软件应有尽有，QQ、在线游戏，音乐影视…….。
对于大学生朋友，广大教师朋友，能够在自己的手机有一个动态的课程表程序，一来可以合理安 排空余时间，二来又不会误了学习工作的时间，是一件非常不错的事。本文，以微软公司的移动手机
平台 WindowsMobile2003为基础，简单实现手机上的课表程序。
程序在 WindowsMobile2003 dopod818手机上测试通过。程序运行时，主界面如图
程序 下载地http://nihg.org/blogview.asp?logID=403
开发平台与工具：
MS WindowsXp 组件 基于.net framework 1.1
Basic4ppc 5.8 （可到http://www.basic4ppc.cn/下载）
思路 与代码：
Basic语言是众多程序初学者的入门语言，开发手机程序，我们同样也能使用她，使用 没有基础的朋友也能一看就会。程序的主要思路如下：
一、根据日期得到星期，然后读取相应的 日课表。
日课表为了方便与美观，直接做成bmp图片文件，下面是空白的课表和根据自己的课程 已填好的课表，为了方便程序调用，直接将文件存为 1.bmp 2.bmp …..表示 周一 周二 的课表 ，以此类推。
空白表 1.bmp 2.bmp
程序的主界面如下 ，可见，我们为了尽量 减少动态加载的课表体积，只将界面中心部份的课表作成bmp文件，整个背景直接做在程序里了。
实现读取课表的代 码如下：
我们在窗体上用一个 timer组件来实现
Sub Timer4_Tick ' 用来检测当前日期并且读取相应课表值得注意的是 else
' then 语句 换行很重 then 必须另起一行
If label32.Text ="Monday" Then
image3.LoadPicture("class1.bmp")
Else If label32.Text ="Tuesday" Then
image3.LoadPicture("class2.bmp")
Else If label32.Text ="Wednesday" Then
image3.LoadPicture("class3.bmp")
Else If label32.Text ="Thursday" Then
image3.LoadPicture("class4.bmp")
Else If label32.Text ="Friday" Then
image3.LoadPicture("class5.bmp")
Else
End If
End Sub
其中label32显示当前的星期值，从下面timer3组件中得到值。