vb问题,请教

来源:百度知道 编辑:UC知道 时间:2024/06/08 15:02:10
http://www.sycste.org/special/showinfo.asp?tcode=233&tname=%CE%F7%B2%BF%B1%AD%BF%C6%BC%BC%BE%BA%C8%FC&id=2035&kind=66

进去后,看第一题,就是日期查询

我想用DateDiff函数,但是我无法把2个textbox裏面的转换成date格式。。帮忙

Private Sub Command1_Click()
Text3.Text = DateDiff("W", CDate("2006-9-2"), CDate("2006-" & Text1.Text & "-" & Text2.Text)) + 1
End Sub

你自己研究下,控件名称:
TEXT1:月
TEXT2:日
TEXT3:显示的第几周