[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 303
  • Last Modified:

How to show advisory notice 'processing may take several seconds...' for sub of open ended duration.

Hi,
I have a VBA process in Visio 2010 premium that takes 5-15 seconds. It analyses connected shapes into separate trees and maps all possible paths from start shapes(s) to end shapes(s) for each tree. With time I may be able to make it more efficient, but not quite yet.

Is there a way of showing an advisory notice saying 'processing may take several seconds, meantime prepare for the next steps..." instead of the MS 2010 'turning cicle' icon that does duty for the old MS 'egg-timer'?

I've seen stuff on progress bars on google, but I dont know how long the processs will take for each set of trees, so its difficult to asign a value for '100%'.

I am aware of the danger of open-ended processing - have done my best to check input data before running. Will also seek to build in a max time limit for sub execution.

Thanks,
Kelvin
0
Kelvin4
Asked:
Kelvin4
  • 3
  • 3
3 Solutions
 
borgunitCommented:
You could show a form with an animated GIF if you are not relying on exact countdowns.
0
 
Kelvin4Author Commented:
Can you give an example?
0
 
borgunitCommented:
Add a webbrowser control to a form (Components >> Microsoft Internet Controls). And then on load, load the GIF. I included a sample gif.

There are many other ways to let someone know the app is busy. this is just aiother one.
Private Sub Form_Load()
    WebBrowser1.Navigate "about:<html><body scroll='no'><img src='C:\Temp\cnt.gif'></img></body></html>"
End Sub

Open in new window

cnt.gif
0
VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

 
Kelvin4Author Commented:
Thanks, Borgunit:
So I would load the form at the start of the time-consuming procedure, and unload when the procedure has ended. Can you help me with an example of the unload process? (I am inexperienced with forms.)

Then we have a done deal!
yrs
Kelvin
0
 
borgunitCommented:
Just an FYI added also
http://msdn.microsoft.com/en-us/library/aa984358%28v=vs.71%29.aspx


Public sub ShowMyGifForm()
	frmYourGifForm.Show
End Sub

Public sub CloseMyGifForm()
	frmYourGifForm.Hide
	Unload frmYourGifForm
End Sub

Open in new window

0
 
ScriptAddictCommented:
I'd just add a msgbox.  Saying what you said in your question and then they know why they are looking at the egg timer.
0
 
Kelvin4Author Commented:
Thank you!
0

Featured Post

How to Use the Help Bell

Need to boost the visibility of your question for solutions? Use the Experts Exchange Help Bell to confirm priority levels and contact subject-matter experts for question attention.  Check out this how-to article for more information.

  • 3
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now