Dim yq As WinForm.DateTimePicker = e.Form.Controls("延期")
If yq.Value = "" Then MessageBox.Show("延期时间无效或为空,请重新输入!","提示",MessageBoxButtons.OK) ReturnElse Tables("会员信息表").Current("有效期") = yq.Value End If
代码运行后出现如下错误,麻烦专家看看,问题出再哪里?