320分求VB打字练习源码,最好把整个文件压缩发到我的邮箱:[email protected]发邮箱也给分!!!

[复制链接]
查看11 | 回复5 | 2009-8-7 15:31:30 | 显示全部楼层 |阅读模式
Option ExplicitDim score As IntegerDim speed As IntegerDim typetime As String'初始化字符1Sub innt1()
'产生随机大写字母、数字及其他符号
zi1.Caption = Chr(Int(Rnd * 43 + 48))
'起初位置
zi1.Left = Int(Rnd * (mm1.Width - zi1.Width))
zi1.Top = mm1.Top - zi1.HeightEnd Sub'初始化字符2Sub innt2()
'产生随机小写字母
zi2.C...
回复

使用道具 举报

千问 | 2009-8-7 15:31:30 | 显示全部楼层
这个对于有经验的人不难,不过综合性太强了,老师应该指导下的打字肯定要用到控件数组,这个在窗体上复制粘贴成一个键盘就行了声音播放使用sndPlaySound,或者用MMControl播放声音估计只有的程序即使老师给源代码学生都不一定看得懂,肯定要分析过案例才行...
回复

使用道具 举报

千问 | 2009-8-7 15:31:30 | 显示全部楼层
程序已发送,请查收。...
回复

使用道具 举报

千问 | 2009-8-7 15:31:30 | 显示全部楼层
你要是想学习VB,就自己动手编;如果你想练习打字,就从网上搜索,有很多的。...
回复

使用道具 举报

千问 | 2009-8-7 15:31:30 | 显示全部楼层
请把题目内所说的图片都贴出来(如主界面等),不然无法完成所要求的设计.如果方便的话,你把上述界面及声音文件等资料传到我的信箱,有空给你做一个。[email protected]...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行