I have a MDI form and few childs.
In one menu I have this SQL Script Executing
Function SetFreight() As Boolean
con.Execute ("Update PROD SET PFType = (select CASE DFType WHEN 'W' then 'W' WHEN '%' THEN '%' WHEN 'F' THEN 'F' End From DEPT Where ProdDepID = DeptID), Freight = (select CASE DFType WHEN 'W' then ((Weight / 1000.0) * FValue) WHEN '%' THEN ((FValue * RRP) / 100.0) WHEN 'F' THEN FValue End From DEPT Where ProdDepID = DeptID)")
SetFreight = True
Total Time of execution for this script take about a minute.
I notice While it execution the GUI goes freeze and stop responding. Also For this time Whole window become white.
I want to display a message " please stand by" untill SetFreight = True.
How Can I do this?
Can I Use DoEvent in Here?