Progressbar updating

  • Thread starter Thread starter Michael
  • Start date Start date
M

Michael

My Form_Main contains a progressbar the needs to be updated based on
calculation progress performed in several external modules called from the
Form_Main menu's.

Using the following code to access Form_Main from within the modules.

Private MyForm As Form_Main
MyForm = Form.ActiveForm
MyForm.ProgressBar1.Visible = True
MyForm.ProgressBar1.Value = CInt(50 * (n2 / NOEQ))

I get the following error when trying to run the program.

"Option Strict On disallows implicit conversions from
'System.Windows.Forms.Form' to MyProgram.Form_Main"

It will run if I turn off option strict, but I suspect there is a better
"more correct" way to update the progressbar.

Can anyone help

Thanks

Mike
 
* "Michael said:
Using the following code to access Form_Main from within the modules.

Private MyForm As Form_Main
MyForm = Form.ActiveForm
Click to expand...

Replace the line above with this line:

\\\
MyForm = DirectCast(Form.ActiveForm, Form_Main)
///
 
Back
Top