用VB实现番茄工作法 miniTomato

最近番茄工作法比较火，对于我们半导体的工程师而言好的工作习惯与效率十分重要，于是下载了若干个app使用都不称手；

于是心血来潮，凭着大学时学一些皮毛visual basic 花了周末2天时间自己动手搞了一个；自己使用起来很好，总算称手；

编程的基本思路是VB+Access数据库，分享给大家

运行后界面是这样子的，基本如下模样；走的是简约模式
1.紧急程度，红色最急，黄色次之，绿色不急
2.需要完成的时间
3.需要完成的内容



使用方法
1.双击一个任务，出现任务执行按钮(包含开始，暂停，完成等)



2.单击开始
则窗体最小化，并进入25分钟倒计时状态，这会体现在任务栏上 的一个进度条，风格类似于迅雷下载的样子



3.完成之后出现休息一会字样，并不停闪烁
其他功能
1.单击收割按钮，会将当前已经完成的项目进行汇总，并统计每天的状况



2.在窗体空白处双击会想法纪录状态，可以纪录自己的的工作的想法；再空白窗体上再次双击则会回到番茄工作的状态；因为不想让别人看到我的想法吗，所以没有单独做按钮，用双击空白窗体的方式才能调出来，呵呵



3.在copyright@shujin.zhang上双击可以更换皮肤.，可以选用自己喜欢的皮肤



声明：部分美化代码与进度条 代码是copy网上的，在此表示原作者致敬

附上软件与源码下载地址：https://pan.baidu.com/s/1c13AsrY

点击打开链接