Resize check boxes

  • Thread starter Thread starter Alan UK
  • Start date Start date
A

Alan UK

A simple query- can it be done?
In 1024*768 resolution the check boxes are a fiddly size
for an operator to hit (especially where operators are
not that dextrous or good with a mouse)- is it possible
to resize them larger? If you expand the area in form
design it has no impact on the viewable checking area.
Its a nuisance, not the end of the world, but it seems
odd you cannot control this when so many other controls
are available...

Thanx

(PS is it me or has the etiquette in these boards nose-
dived lately? Some of the questions are obscene or surly
and the responses can occassionally be rude and unhelpful
[excl MVPs]! Its a sad day when we can't help each other
out...)
 
Alan,

The Access CheckBox control is "one-size-fits-all" but here is a link to a
thread which has details on a work-around:

http://tinyurl.com/yrdmp

As to your second question, one really cannot speak for the individuals who
post obscene or surly questions but, on the whole, I think that the
"microsoft.public.access..." newsgroups are among the most polite. By
virtue of a position high in the alphabetic list of Microsoft newsgroups (or
just because "access" may denote an activity not the product), the Access
newsgroups seem to get more than their share of posts belonging in some
other group. From what I have seen, the MVPs and other frequent responders
really are polite in re-directing these posts and in answering the topical
questions. AFAIK, these newsgroups are not moderated, so there is not
much that can be done regarding inappropriate "behavior" except to block the
sender.

hth,
 
Thanx for your speedy reply Cheryl (and on a Sunday!),
I'll try that out shortly.

As for the MBs it just seems that recently the standard
of behaviour has declined. I try to read other threads
before posting to ensure that I do not post a recently
answered point (sainthood pending), and have been sadened
by the view.
The MVPs are always helpful (I excluded them), but I have
had responses myself to other queries that were empty or
were single line statements like "try something else".
I've been using the MBs for a year or more, but it seems
that since the spam attacks on valid email addresses the
implied additional anonimity may have had an undesireable
side-effect.
I'm starting to sound like my father... ;-(
-----Original Message-----
Alan,

The Access CheckBox control is "one-size-fits-all" but here is a link to a
thread which has details on a work-around:

http://tinyurl.com/yrdmp

As to your second question, one really cannot speak for the individuals who
post obscene or surly questions but, on the whole, I think that the
"microsoft.public.access..." newsgroups are among the most polite. By
virtue of a position high in the alphabetic list of Microsoft newsgroups (or
just because "access" may denote an activity not the product), the Access
newsgroups seem to get more than their share of posts belonging in some
other group. From what I have seen, the MVPs and other frequent responders
really are polite in re-directing these posts and in answering the topical
questions. AFAIK, these newsgroups are not moderated, so there is not
much that can be done regarding inappropriate "behavior" except to block the
sender.

hth,
--
Cheryl Fischer
Law/Sys Associates
Houston, TX

A simple query- can it be done?
In 1024*768 resolution the check boxes are a fiddly size
for an operator to hit (especially where operators are
not that dextrous or good with a mouse)- is it possible
to resize them larger? If you expand the area in form
design it has no impact on the viewable checking area.
Its a nuisance, not the end of the world, but it seems
odd you cannot control this when so many other controls
are available...

Thanx

(PS is it me or has the etiquette in these boards nose-
dived lately? Some of the questions are obscene or surly
and the responses can occassionally be rude and unhelpful
[excl MVPs]! Its a sad day when we can't help each other
out...)


.
 
It ALMOST is what I want- but I have a table with days of
the week as check boxes displayed in a form, and the code
supplied treats a single selection as all the labels
checked in the form (although only the correct record is
being updated)
Is there an additional "if" clause that can be added to
the code that would make each item day have an
independent check box?

Code the new Label's Click event:

Private Sub LabelLargeCheck_Click()
[CheckBoxName] = Not ([CheckBoxName])
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub

Code the Form Current Event:

Private Sub Form_Current()
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub


-----Original Message-----
Alan,

The Access CheckBox control is "one-size-fits-all" but here is a link to a
thread which has details on a work-around:

http://tinyurl.com/yrdmp

As to your second question, one really cannot speak for the individuals who
post obscene or surly questions but, on the whole, I think that the
"microsoft.public.access..." newsgroups are among the most polite. By
virtue of a position high in the alphabetic list of Microsoft newsgroups (or
just because "access" may denote an activity not the product), the Access
newsgroups seem to get more than their share of posts belonging in some
other group. From what I have seen, the MVPs and other frequent responders
really are polite in re-directing these posts and in answering the topical
questions. AFAIK, these newsgroups are not moderated, so there is not
much that can be done regarding inappropriate "behavior" except to block the
sender.

hth,
--
Cheryl Fischer
Law/Sys Associates
Houston, TX

A simple query- can it be done?
In 1024*768 resolution the check boxes are a fiddly size
for an operator to hit (especially where operators are
not that dextrous or good with a mouse)- is it possible
to resize them larger? If you expand the area in form
design it has no impact on the viewable checking area.
Its a nuisance, not the end of the world, but it seems
odd you cannot control this when so many other controls
are available...

Thanx

(PS is it me or has the etiquette in these boards nose-
dived lately? Some of the questions are obscene or surly
and the responses can occassionally be rude and unhelpful
[excl MVPs]! Its a sad day when we can't help each other
out...)


.
 
Are you saying that you have 7 fields in your table (each corresponding to a
day of the week) and 7 checkboxes on your form (each bound to one of your
"day" fields? If this is the case, you will need to create 7 "large
labels", for example:

LabelLargeCheck_Sun
LabelLargeCheck_Mon
LabelLargeCheck_Tue
LabelLargeCheck_Wed
LabelLargeCheck_Thu
LabelLargeCheck_Fri
LabelLargeCheck_Sat

Then you will have to enter code in the click event of *each* of these
labels:

' This is for Sunday
[CheckBox_Sunday] = Not ([CheckBoxSunday])
If [CheckBoxSunday] = -1 Then
LabelLargeCheck_Sun.Caption = Chr(254)
Else
LabelLargeCheck_Sun.Caption = "o"
End If

and

' This is for Monday
[CheckBox_Monday] = Not ([CheckBox_Monday])
If [CheckBox_Monday] = -1 Then
LabelLargeCheck_Mon.Caption = Chr(254)
Else
LabelLargeCheck_Mon.Caption = "o"
End If

et cetera

The code behind the Form's Current event can have multiple If ... EndIf
statements:

If [CheckBox_Sunday] = -1 Then
LabelLarge_Sun.Caption = Chr(254)
Else
LabelLarge_Sun.Caption = "o"
End If

If [CheckBox_Monday] = -1 Then
LabelLarge_Mon.Caption = Chr(254)
Else
LabelLarge_Mon.Caption = "o"
End If

' et cetera


If I have not interpreted your question correctly, please post back with
more detail about the field(s) in your table which correspond to days and
the control(s) on your form.



--
Cheryl Fischer
Law/Sys Associates
Houston, TX

Alan UK said:
It ALMOST is what I want- but I have a table with days of
the week as check boxes displayed in a form, and the code
supplied treats a single selection as all the labels
checked in the form (although only the correct record is
being updated)
Is there an additional "if" clause that can be added to
the code that would make each item day have an
independent check box?

Code the new Label's Click event:

Private Sub LabelLargeCheck_Click()
[CheckBoxName] = Not ([CheckBoxName])
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub

Code the Form Current Event:

Private Sub Form_Current()
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub


-----Original Message-----
Alan,

The Access CheckBox control is "one-size-fits-all" but here is a link to a
thread which has details on a work-around:

http://tinyurl.com/yrdmp

As to your second question, one really cannot speak for the individuals who
post obscene or surly questions but, on the whole, I think that the
"microsoft.public.access..." newsgroups are among the most polite. By
virtue of a position high in the alphabetic list of Microsoft newsgroups (or
just because "access" may denote an activity not the product), the Access
newsgroups seem to get more than their share of posts belonging in some
other group. From what I have seen, the MVPs and other frequent responders
really are polite in re-directing these posts and in answering the topical
questions. AFAIK, these newsgroups are not moderated, so there is not
much that can be done regarding inappropriate "behavior" except to block the
sender.

hth,
--
Cheryl Fischer
Law/Sys Associates
Houston, TX

A simple query- can it be done?
In 1024*768 resolution the check boxes are a fiddly size
for an operator to hit (especially where operators are
not that dextrous or good with a mouse)- is it possible
to resize them larger? If you expand the area in form
design it has no impact on the viewable checking area.
Its a nuisance, not the end of the world, but it seems
odd you cannot control this when so many other controls
are available...

Thanx

(PS is it me or has the etiquette in these boards nose-
dived lately? Some of the questions are obscene or surly
and the responses can occassionally be rude and unhelpful
[excl MVPs]! Its a sad day when we can't help each other
out...)


.
 
It ALMOST is what I want- but I have a table with days of
the week as check boxes displayed in a form, and the code
supplied treats a single selection as all the labels
checked in the form (although only the correct record is
being updated)
Is there an additional "if" clause that can be added to
the code that would make each item day have an
independent check box?

Code the new Label's Click event:

Private Sub LabelLargeCheck_Click()
[CheckBoxName] = Not ([CheckBoxName])
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub

Code the Form Current Event:

Private Sub Form_Current()
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub
Your difficulty is not caused by the code, but by the fact that you
are using a continuous form with an UNBOUND check box.

You'll need to bind the actual check box to a table field.
If you are using 7 check boxes (for the 7 days of the week), you need
7 different check box fields bound to their different day fields, and
then 7 large label check boxes to replace the smaller ones.

I don't know what you're trying to accomplish (other than wanting a
larger check box), but I suspect your table is not well designed.
 
Fred,

I did not "pick up" on the unbound issue. Thanks for mentioning it!



--
Cheryl Fischer
Law/Sys Associates
Houston, TX

It ALMOST is what I want- but I have a table with days of
the week as check boxes displayed in a form, and the code
supplied treats a single selection as all the labels
checked in the form (although only the correct record is
being updated)
Is there an additional "if" clause that can be added to
the code that would make each item day have an
independent check box?

Code the new Label's Click event:

Private Sub LabelLargeCheck_Click()
[CheckBoxName] = Not ([CheckBoxName])
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub

Code the Form Current Event:

Private Sub Form_Current()
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub
Your difficulty is not caused by the code, but by the fact that you
are using a continuous form with an UNBOUND check box.

You'll need to bind the actual check box to a table field.
If you are using 7 check boxes (for the 7 days of the week), you need
7 different check box fields bound to their different day fields, and
then 7 large label check boxes to replace the smaller ones.

I don't know what you're trying to accomplish (other than wanting a
larger check box), but I suspect your table is not well designed.
 
Thanks Fred & Cheryl for the information about the bound
checkboxes, and requiring 7 checkbox labels.
With regards to my table design the reason I have 7 days
to display is so that a day maybe selected and then a
second day associated with it-the table is structured as
follows:

Supplier ID Text (link for other tables)
Weekday Text (week days listed)
Day Code Number (link to calendar table)
Selected Yes/No (Check box)
Delivery Text (pick value list)

This seemed the best way to define a date for regular
orders and associate a delivery day for it where these
values must be entered by a user and possibly amended
seasonally.
If you are able to suggest a better method then I will be
happy to accept your suggestion, but other ways I
considered seemed to involve more, rather than fewer,
fields.

-----Original Message-----
It ALMOST is what I want- but I have a table with days of
the week as check boxes displayed in a form, and the code
supplied treats a single selection as all the labels
checked in the form (although only the correct record is
being updated)
Is there an additional "if" clause that can be added to
the code that would make each item day have an
independent check box?

Code the new Label's Click event:

Private Sub LabelLargeCheck_Click()
[CheckBoxName] = Not ([CheckBoxName])
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub

Code the Form Current Event:

Private Sub Form_Current()
If [CheckBoxName] = -1 Then
LabelLargeCheck.Caption = Chr(254)
Else
LabelLargeCheck.Caption = "o"
End If
End Sub
Your difficulty is not caused by the code, but by the fact that you
are using a continuous form with an UNBOUND check box.

You'll need to bind the actual check box to a table field.
If you are using 7 check boxes (for the 7 days of the week), you need
7 different check box fields bound to their different day fields, and
then 7 large label check boxes to replace the smaller ones.

I don't know what you're trying to accomplish (other than wanting a
larger check box), but I suspect your table is not well designed.

.
 
Back
Top