我快要疯了-恼人的日期问题

Question

第一句改成Dim mdate As DateTime

Answer 1

楼上的兄弟，我改成了DateTime后还是没有解决问题

Answer 2

不好意思，刚刚我说错了，你是这里错了mdate.AddDays(1)
改成mdate=mdate.AddDays(1)

Answer 3

我的本意是在页面上输入一个工号，然后输入开始日期和结束日期，从而调用一个存储过程，
运行后，程序进入死循环，即日期不变化，我在编程环境中用调试器看到mdate确实也是没有变化，比如我输入了工号:00815 ,开始日期: 2004-04-08 ,结束日期: 2004-04-10, mdate初始值为2004-04-08，循环中应该每次加1，直到2004-04-10,但是mdate每循环一次，还是不变，总是2004-04-08.Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            SqlCommand1.Connection = SqlConnection1            SqlCommand1.CommandType = CommandType.StoredProcedure
            SqlCommand1.CommandText = "at_qrygather"            SqlCommand1.Parameters.Add("@filename", SqlDbType.NVarChar, 6)
            SqlCommand1.Parameters.Add("@emp_no", SqlDbType.NVarChar, 5)
            SqlCommand1.Parameters.Add("@fdate", SqlDbType.DateTime)
            SqlConnection1.Open()            Dim mdate As DateTime = CDate(TextBox1.Text)            Do While mdate <= CDate(TextBox2.Text)                SqlCommand1.Parameters(0).Value = "200404"
                SqlCommand1.Parameters(1).Value = textboxemp_no.Text
                SqlCommand1.Parameters(2).Value = mdate
                SqlCommand1.Prepare()
                SqlCommand1.ExecuteNonQuery()
                mdate.AddDays(1)
            Loop
        Dim mydatatable As New DataTable
        SqlDataAdapter1.SelectCommand.CommandType = CommandType.Text
        SqlDataAdapter1.SelectCommand.CommandText = "select * from gatherrep"
        SqlDataAdapter1.Fill(mydatatable)
        DataGrid1.DataSource = mydatatable.DefaultView
        DataGrid1.DataBind()
    End Sub

Answer 4

to smoothwood(I try my best) :
谢谢你帮了我的大忙!