因为业务需要，现在急需一个计算孕周23周的月份的VB
要求是
输入孕妇任何一次检查的时候及当时检查是超声估算出胎儿的孕周后，可以得出该胎儿什么时候可以到23周。（一年按365天算，一个月按30天算，一周按7天算。）
比如
一个孕妇，一个超声孕检时间是2015年4月15日，当时得出的超声孕周是12周，输入这些数据后，可以得出在2015年7月1日胎儿孕周达到23周！
谢谢各位大神了，在线等！！

dateadd("D",(12-1)*7,cdate("2015-04-15"))

这个需要VB？百度上这样的计算器应该有，再不行Excel都可以

看看可以不？应该符合你的要求。如果可以再给你源文件。

C盘有源代码。

[此贴子已经被作者于2016-7-21 17:01编辑过]