已知年月,如何知道该年该月日期的最大值? 您要是勤快点,可以自己写算法 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Sub Command1_Click()myyear = Left(Text1.Text, 4): mymonth = Mid(Text1.Text, 5, 2)If Mid(Text1.Text, 5, 2) = 12 Then myyear = Left(Text1.Text, 4) + 1: mymonth = "01"Print Right(DateAdd("d", -1, myyear & "-" & mymonth), 2)End Sub假如输入年月格式为"yyyymm" 又升级了。散白粉。 mshflegrid带区的问题? 我写的这段代码哪里出错了呀? 窗体中的 width和scalewidth 有什么区别 ???? 图像处理模块的问题 存储过程、记录集返回问题 如何在VB中作DLL,并在ASP中调用? Picturebox 不规则图形半透明填充 如何清空DataGrid中的记录 如何将VB运行后的窗体保存成bmp图形? 在WIN98中有没有类似 GetNetUserGroup() 的函数? App.hInstance是什么意思?
myyear = Left(Text1.Text, 4): mymonth = Mid(Text1.Text, 5, 2)
If Mid(Text1.Text, 5, 2) = 12 Then myyear = Left(Text1.Text, 4) + 1: mymonth = "01"
Print Right(DateAdd("d", -1, myyear & "-" & mymonth), 2)
End Sub
假如输入年月格式为"yyyymm"