年月日只显示年月 vb中怎么实现输入某一天(年月日)，计算这一天在本年中的天数(第几天)？

vb中怎么实现输入某一天(年月日)，计算这一天在本年中的天数(第几天)？“VB某yinterplic Sub commandbutton控u Click（）Dim n As IntegerIf IsD

vb中怎么实现输入某一天(年月日)，计算这一天在本年中的天数(第几天)？

“VB某yinterplic Sub commandbutton控u Click（）Dim n As IntegerIf IsDate（Text1.Text），然后“d”，Year（Text1.Text）-1& “-12-31”，Text1.Text）MsgBox Text1.Text& “Year（Text1.Text）”n=DateDiff（”，Year（Text1.Text）-1& “-12-31”，Text1.Text）& “network¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨（num[9]-“0”）

月=（num[10]-“0”）*10（num[11]-“0”

日=（num[12]-“0”*10（num[13]-“0”）

void main（）

{

char num[20]={NULL}

printf printf（“s”，num）

getDate（num）

printf（“year=%d，month=%d，day=%d”，year，month，day）}