If e.Form.Controls("起始时长").value = nothing Or e.Form.Controls("截止时长").value = nothing Then MessageBox.show("请选择要加载的【起始时长】【截止时长】!!!", "非常关键提醒") Else DataTables("装机工单盯控清单表").LoadFIlter = "工单时长 >= '" & e.Form.Controls("起始时长").value & "' and 工单时长 <= '" & e.Form.Controls("截止时长").value & "' " DataTables("装机工单盯控清单表").Load MessageBox.show("完成【装机工单盯控清单表】的 加载 工作!!!", "非常关键提醒") End If
|