t120052
asked on
Access Guage Control
I'm trying to find, buy, etc. a control that would behave the same way that the Progress Control (Active X component comctl32.ocx) works but I would like to use it as a text box type control. I would like to create a form with a tabular type of layout based on a query that will eventually display multiple lines for each of the rows in the query, from those rows I would like to create a progress type control on each line that would indicate the percent of utilization. I would like to find an Active X control that would allow me to simply provide the control with the data value and then for every line it would generate the guage control. Has anyone every seen anything like this for Access 97. Thanks in advance for your help.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
I have a sample DB I could mail you . . .
I've got a good one that uses no extra queries, modules, or ActiveX controls. Just a subform, and a few lines of code. I can email you this one as well.
Turns out that queries are not nec. (Didn't use one in my sample DB.)
You can set a TextBox to
=String([Field Whatever], "Û")
Brian
You can set a TextBox to
=String([Field Whatever], "Û")
Brian
Brian's idea is excellent. Just tried it and it works well for a gauge type thing. The sample I have is better for showing the actual motion from 0 to X, X being the current value.
ASKER
It appears to work as directed by Brian, but I wasn't able to use the =String([Field Whatever], "Û") character because it would simply print
Û characters. I substituted the character "+" and that worked fine. Is the display problem because I don't have "terminal " fonts installed?
Û characters. I substituted the character "+" and that worked fine. Is the display problem because I don't have "terminal " fonts installed?
The terminal font might not be showing.
Select the textbox that is to serve as the gauge, then in the Font drop-down, type in Terminal, and hit <Enter>.
It's often there, even when not shown.
The format of String() is
String(number, character)
Help's example shows:
MyString = String(5, "*") ' Returns "*****".
MyString = String(5, 42) ' Returns "*****".
So you could use
String([Field Whatever], 219)
[Field Whatever] must be something that evaluates to a number, so that it satisfies the requirements of the String Function.
Get back to me on what typing in 'Terminal' did, after changing back to the Û character.
Or let me send you this sample...
Brian
Select the textbox that is to serve as the gauge, then in the Font drop-down, type in Terminal, and hit <Enter>.
It's often there, even when not shown.
The format of String() is
String(number, character)
Help's example shows:
MyString = String(5, "*") ' Returns "*****".
MyString = String(5, 42) ' Returns "*****".
So you could use
String([Field Whatever], 219)
[Field Whatever] must be something that evaluates to a number, so that it satisfies the requirements of the String Function.
Get back to me on what typing in 'Terminal' did, after changing back to the Û character.
Or let me send you this sample...
Brian
ASKER
Excellent suggestion! Many thanks...