高考倒计时VB(共5页).doc

上传人:晟*** 文档编号:11359886 上传时间:2022-02-20 格式:DOC 页数:5 大小:32.50KB
下载 相关 举报
高考倒计时VB(共5页).doc_第1页
第1页 / 共5页
高考倒计时VB(共5页).doc_第2页
第2页 / 共5页
高考倒计时VB(共5页).doc_第3页
第3页 / 共5页
高考倒计时VB(共5页).doc_第4页
第4页 / 共5页
高考倒计时VB(共5页).doc_第5页
第5页 / 共5页
亲,该文档总共5页,全部预览完了,如果喜欢就下载吧!
资源描述

精选优质文档-倾情为你奉上“高考倒计时”程序设计文档一、 程序名称:高考倒计时二、 程序功能1:显示当前时间、高考时间、剩余时间三、 程序设计1:标签控件:Label12:文本控件:Text13:定时器控件:Timer1四、 程序实现1:窗体加载:Sub Form_Load( )2:最大化:Me.WindowState = vbMaximized3:根据窗口宽度、高度设置字体大小:F = Me.ScaleX(Me.ScaleWidth, Me.ScaleMode, 3) / (S0 * 2 + S1 + S2) H = Me.ScaleY(Me.ScaleHeight, Me.ScaleMode, 3) / 12 4: 默认时间为计算机当前年份的6月7日:If nStr = Then Y = Format(Date, yyyy) I = DateDiff(s, Now, Y & -6-7 9:00:00) If I 0 Then Y = Y + 1 nSt

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 实用文档资料库 > 公文范文

Copyright © 2018-2021 Wenke99.com All rights reserved

工信部备案号浙ICP备20026746号-2  

公安局备案号:浙公网安备33038302330469号

本站为C2C交文档易平台,即用户上传的文档直接卖给下载用户,本站只是网络服务中间平台,所有原创文档下载所得归上传人所有,若您发现上传作品侵犯了您的权利,请立刻联系网站客服并提供证据,平台将在3个工作日内予以改正。