作品展作品延伸——代码

上一篇博客中,我介绍了基于作品展小组作品的修改版作品,这一作品是用VB语言编写的辩论赛计时器应用,具体介绍见这篇博客:link
接下来我将介绍本作品的代码等,和我在开发本软件时遇到的主要技术性问题及解决方案。

作品代码

首先介绍作品的窗体和功能。本作品用到了6个窗体:开始界面窗体、辩论赛流程介绍窗体、一般倒计时窗体(主要窗体)、自由辩论倒计时窗体、15秒倒计时窗体、结束界面窗体。
本作品的主要功能基本只有倒计时,用到了Timer控件来实现,代码如下(以一般倒计时为例,Interval=1000):

Dim sec As Integer
Dim minu As Integer
......
Private Sub Timer1_Timer()
sec = sec - 1
If sec < 0 Thenminu = minu - 1sec = 59
End If
If minu < 0 Then......Timer1.Enabled = Falseminu = 0sec = 0
End If
txtmin.Text = Str(minu)
txtsec.Text = Str(sec)
End Sub

以上代码只表明倒计时循环如何实现,不是完整实际代码。
我在开发这个软件的过程中,遇到的最大问题就是,如何在一个窗体内判断辩论赛进行到哪个步骤,并自动更换窗体名及倒计时时间等,尤其是还有自由辩论这一不在同一窗体实现的功能。经过尝试,我只找到了一种较为麻烦的办法,关于这一点,如有其它方法欢迎与我交流。我的解决方法具体为:
1.添加一个全局变量step

Dim step As Integer

2.每次倒计时结束时或点击“结束发言,开始下一环节”时,step+1

Private Sub Timer1_Timer()
......
If minu < 0 Thenstep = step + 1......
End If
End Sub
Private Sub cmdnext_Click()
step = step + 1
......
End Sub

3.在每次倒计时结束时或点击“结束发言,开始下一环节”时,用Case语句判定一次step,并依据他改变一些参数:

Select Case stepCase 0sec = 0minu = 3Form3.Caption = "正方一辩-3分钟"Case 1sec = 0minu = 3Form3.Caption = "反方一辩-3分钟"Case 2sec = 0minu = 2Form3.Caption = "反方二辩-2分钟"......Case 8Form4.Showstep = step + 1Form3.Caption = "反方四辩-3分钟"......Case 11Form3.HideForm6.Show
End Select

这样便解决了判断进行到哪一环节的问题,其他代码方面没有太大问题,多为细节调整,在此不做介绍。

作品展作品延伸——代码相关推荐

  1. python创意turtle作品和代码,python创意编程比赛作品

    这篇文章主要介绍了python创意turtle作品和代码,具有一定借鉴价值,需要的朋友可以参考下.希望大家阅读完这篇文章后大有收获,下面让小编带着大家一起了解一下. 1.创意编程与python编程区别 ...

  2. 抖音批量全自动删除作品JS代码教程

    之前制作过很多小视频上传到抖音上,有200多个作品这样吧,一直都上不到热门,也就没有了制作的动力了,现在想把以前那些内容都删了,但是这200多个作品一个一个去点,这手删得话累死不说,还很费时间,于是乎 ...

  3. html阴影特效作品及代码,纯CSS做特效网页(阴影,透明,画圆圈等等)

    每天进步一点,其实是很了不起的事情了. 废话不多说,直接看图! 效果2 效果2 第一步(可以先把背景图搞出来,当然你也可以先画主体,最后在搞背景,看自己心情嘛) html body {margin: ...

  4. html作品简介代码,HTML5的标签的代码的简单介绍 HTML5标签的简介

    HTML5的标签的代码的简单介绍 HTML5标签的简介 发布时间:2012-05-28 14:43:34   作者:佚名   我要评论 本文主要介绍了HTML5的标签.不同于以前的标签.更简单.更方便 ...

  5. 20行Python代码把自己塑造成一位素描大师

    事情的由来: 还有三个月左右就要过年了,回家最惨的就是父母催着相亲,催着找对象,这不,被母亲大人拉进了一个相亲群,刚进去的我一脸懵逼,你能想象吗?我的母亲大人像是推销产品一样把我的照片与信息都给介绍出 ...

  6. DIY一只机器狗需要多少钱?最低仅900美元,斯坦福大学出品,代码已开源

    机器之心报道 参与:蛋酱 DIY 一只四足机器狗,最低只需要 900 美元?它是斯坦福学生机器人俱乐部的新成员「Pupper」. 自从波士顿动力 Spot 机器狗开启零售以来,不知道有多少人迷上了这只 ...

  7. delphi 实现屏幕旋转代码_代码检查 | 如何用Processing实现3D世界

    一花一世界,一叶一菩提.每个人眼中的花是不一样的,每个人眼中的世界也是不一样的 .昔时佛祖拈花,惟迦叶微笑,既而步往极乐.在菩提树下,从一朵花中便能悟出整个世界,最终得升. 今天就来给大家介绍日本先生 ...

  8. python创意小作品-全国青少年创意编程与智能设计大赛Python创意编程比赛

    全国青少年创意编程与智能设计大赛Python创意编程比赛 一.作品类型: 1.数字艺术 通过程序生成和展示视觉艺术,具备创意.美感和互动性. 2.互动游戏 各种竞技类.探险类.角色扮演类.球类. 棋牌 ...

  9. 结对作业_代码复审= =

    ♥题目要求 (1). 首先在同学中找一个同伴,范围不限,可以在1~5班中随意组合,建议尽量不要找同组的成员,女同学尽量找男同学结对,但是不做强制要求: (2). 从以往个人完成的项目中选择一个作品,例 ...

  10. H5静态网页设计与制作_川西旅游网设计作品(HTML+CSS+jQuery)

    ​ [导语]大学生网页作业旅游网一共5种不同页面样式,川西旅游题材并采用flex布局方式,内置轮播.选项卡切换.css动效.缩略图移入放大等多种特效.不仅如此,还有网页截图展示,源码在线下载,在线解答 ...

最新文章

  1. idea 文件流读取web-inf下的文件_C#初学者教程系列20:Stream流读写
  2. Android开发环境简单配置
  3. 用python绘制图形_使用Python的turtle画炫酷图形
  4. PyCharm安装与配置,python的Hello World
  5. Kinect开发学习笔记之(二)Kinect开发学习资源整理
  6. 自如总部摘牌?官方回应:更换logo 业务一切正常
  7. mysql数据库 uft8_unicode_ci是utf8吗_MysQL数据库中utf8_unicode_ci与utf8_general_ci的区别
  8. mui打包ios_优品视界,聚合影视APP源码。mui框架,hbuilder即可编译,云打包生成ios的Android的app...
  9. 读《JavaScript语言精粹(修订版)》心得
  10. Aix5~6小机运维
  11. matlab cg steihaug,截断共轭梯度法
  12. 手机变身高清摄像头 DroidCamX完全使用教程
  13. python股票交易时间_Python量化交易,轻松获取股市每日龙虎榜详情数据
  14. 高级数理逻辑试卷参考答案
  15. 计算机基础教学质量分析报告,张丹菲信息技术质量分析报告1
  16. 思科CCNA认证课程内容
  17. 华硕x550JK,i5改进
  18. 微信公众平台教程--关键词自动回复
  19. 零基础转行,入职军工类测试方向,月薪10K | 既然选择了,就要全力以赴
  20. Zabbix监控整合OneAlert报警平台实现邮件、短信、微信、电话多方式报警

热门文章

  1. 3dsMax中Vray渲染器法线贴图用法
  2. linux 网络编程与 windows 网络编程
  3. SpringBoot+Vue项目校园闲置物品交易系统
  4. android 定时重启手机,有必要定时重启手机吗? 重启后手机会更流畅吗?
  5. html网页表单设计实验报告,网页设计实验报告(学生).doc
  6. Visual Basic从入门到精通pdf
  7. python 代码运行时间获取方式
  8. 【最全】微信支付宝小程序蓝牙API开锁全流程
  9. java电驴_java写的电驴下载完成关机小程序
  10. Windows7 品牌机OEM原版光盘镜像下载大全