根据你拼写单词的正误,相应提示信息的效果如图7、图8和图9所示。
图7 拼写单词错误的提示信息
图8 拼写单词正确的提示信息
图9 跳过拼写单词的提示信息
(4)设置桌面背景功能的实现
本系统每次运行时,首先询问你是否要进入挑战模式,即测试模式,退出测试模式后,接着调用设置桌面背景函数SetBackColor,系统就会自动选取数据库中那个你最不熟悉和记忆日期最早的单词,然后把那个单词转换成单词图片(word.bmp),最后设置桌面背景为单词图片,中间过程是先用字符串变量str储存单词信息,然后将其转换为图片储存在指定的目录下。下面代码中的WordPicutre为PicutreBox控件。设置背景需要调用win API的SystemParametersInfo API函数,读者可以参考相关文献。核心代码如下:
'设置桌面背景时,用到的常量和win API函数
Const SPI_SETDESKWALLPAPER = 20
Const SPIF_UPDATEINIFILE = &H1
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
|