主题：ValueChanged

DateTimePicker1的ValueChanged代码

Dim rkqssj As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")

Dim rkjzsj As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")

Dim tjrkzq As WinForm.TextBox = e.Form.Controls("TextBox1")

Dim t1 As TimeSpan  = rkjzsj.value.AddDays(1) - rkqssj.Value

tjrkzq.text = "入库周期共计:" & t1.days & "天"

可是打开窗口提示

错误所在事件：窗口,仓库明细,DateTimePicker1,ValueChanged

详细错误信息：

未设置对象变量或 With 块变量。