Dim Wshell
Set Wshell = CreateObject("Wscript.Shell")
Dim timeWorked, workInterval
workInterval = 40*60
Dim timeBegin, timeEnd
timeBegin = "09:30:00"
timeEnd = "18:30:00"
While 1=1
While DateDiff("n", Time(), timeBegin) > 1
Wshell.run "sleep " & workInterval, 0, True
timeWorked = timeWorked + workInterval
MsgBox("You worked " & workInterval/60 & " minutes, totally worked " & Int(timeWorked/3600) & " hours and " & timeWorked/60 mod 60 &" minutes! Have a rest!!!")
Wend
timeWorked = 0
Wshell.run "sleep 3", 0, True
Wend
Set WShell = Nothing
Function isWorkingDay ()
Weekday(Date())
isWorkingDay = True
End Function
分享到:
相关推荐
数据库大作业/家庭保健信息系统/Home-Healthcare Information System/This assignment is to perform the logic design of an information system. It involves the construction of a DFD, an ER diagram, mapping ...
Personal_Healthcare_1.0 Personal_Healthcare_1.0
This book is a wake-up call explaining how to detect and prevent the hacking of medical equipment at hospitals and healthcare facilities. The vulnerability of the medical equipment inside the hospital...
蛋白质纯化手册(GE_Healthcare_中文版)
ISO 22956:2021 Healthcare organization management - Requirements
中国私募股权投资系列-REPORT_Healthcare_Private_Equity_and_Corporate_M&A.pdf
《Hacking Healthcare: A Guide to Standards, Workflows, and Meaningful Use》
CB-Insights_Healthcare-Report-Q1-2021.pdf
葛兰素史克GSK-201401-32nd Annual JP Morgan Healthcare Conference_By_CFO.pdf
Mark L. Braunstein - Health Informatics on FHIR_ How HL7's New API is Transforming Healthcare (2018, Springer International Publishing)
在医卫信息系统和生物基因技术数十年的高速发展之后,医疗领域同样 进入了“大数据时代”。面对不断爆发的数据海啸(data tsunami)和数据爆炸 (data explosion),如何以数据创新探索未来的医学科学,如何在庞大的数据资
SmartDraw HealthCare Solution是SmartDraw公司為醫生及其他衛生保健行業提供的圖形化解決方案。它含有大量的專業素材和病例圖片,並且生成的結果能很好的輸出到微軟的Office中。
Typically entrenched and systemic, healthcare problems require the sort of comprehensive solutions that can only be addressed by a change in culture and a shift in thinking. Applying Lean in ...
NULL 博文链接:https://foxalien.iteye.com/blog/859754
IHE是Integrating the Healthcare Enterprise的缩写,国内还没有统一定名。IHE并不是一个组织,也没有正式命名为标准,而是一个活动,由其发起单位,如北美放射学会(RSNA)、医疗信息管理系统学会(HIMSS)等组织...
Keywords:Algorithm Design,Computational Clinical Decision Support,Data Mining,Healthcare Informatics,Intelligent Systems,Machine Learning
… presents students and professionals in the healthcare field (who have some working knowledge of the open-source programming languages Perl, Python, or Ruby) with instruction for applying basic ...
南京工业大学数据库大作业 本系统的主要功能;... 家庭用户主要功能:输入健康状况,记录家庭诊断测试结果,提出健康问题。可以查看在线专家的诊断,治疗建议和健康问题的回答。 在线专家根据家庭用户的健康状况和测试...
来自斯坦福大学和 Google Research 的研究者对医疗领域中的深度学习应用进行了综述,并将研究文章发表在《Nature Medicine》上。这篇文章从应用于医疗行业的计算机视觉、自然语言处理、强化学习和通用方法入手,详细...
ACM SIGKDD(国际数据挖掘与知识发现大会,简称 KDD)是世界数据挖掘领域的最高级别的学术会议,由 ACM 的数据挖掘及知识发现专委会(SIGKDD)主办,被中国计算机协会推荐为 A 类会议。自 1995 年以来,KDD 已经连续...