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

x
?
Solved

Set DTPicker's Checkbox at run time?

Posted on 2001-07-04
8
Medium Priority
?
426 Views
Last Modified: 2012-08-13
Hi,

How to set the DTPicker's checkbox to visible and vice versa in runtime? Thanks.
0
Comment
Question by:Trowa
8 Comments
 
LVL 3

Expert Comment

by:marcoszorrilla
ID: 6252983
Try this example:
You need a DtPicker control and a simple button.
this is the code for the click event.


Private Sub Comando15_Click()

If DtpCAl.Visible = False Then
DtpCAl.Visible = True
Else
DtpCAl.Visible = False
End If

End Sub
0
 

Author Comment

by:Trowa
ID: 6254084
No, this will make the whole control invisible, i'm using the DTPicker, and just want its checkbox to be visible and invisible. Can i do this? thanks.
0
 
LVL 1

Expert Comment

by:sunset
ID: 6254605
You just need to know what the checkbox is called and then just make is visible or invisible as marcoszorrilla has indicated.

[checkbox1].visible=false or [checkbox1].visible=true

marcoszorrilla, I am really just presenting what you said in a different way is all.

Just trying to help!
0
Free Backup Tool for VMware and Hyper-V

Restore full virtual machine or individual guest files from 19 common file systems directly from the backup file. Schedule VM backups with PowerShell scripts. Set desired time, lean back and let the script to notify you via email upon completion.  

 

Author Comment

by:Trowa
ID: 6254616
Hi marcoszorrilla and sunset,

The checkbox is inside the DTPicker control, you can set this property at design view, how can i change this property at run time? thanks!
0
 
LVL 3

Expert Comment

by:marcoszorrilla
ID: 6255935
That's it.

Try this and the property is changed in ru time.

If DtpCAl.CheckBox = False Then
DtpCAl.CheckBox = True
Else
DtpCAl.CheckBox = False
End If
0
 
LVL 3

Expert Comment

by:marcoszorrilla
ID: 6255939
That's it.

Try this and the property is changed in ru time.

If DtpCAl.CheckBox = False Then
DtpCAl.CheckBox = True
Else
DtpCAl.CheckBox = False
End If
0
 
LVL 3

Accepted Solution

by:
marcoszorrilla earned 80 total points
ID: 6282594
I post that as a comment but is the solution. And I waiting
for your points.....??

That's it.

Try this and the property is changed in ru time.

If DtpCAl.CheckBox = False Then
DtpCAl.CheckBox = True
Else
DtpCAl.CheckBox = False
End If
0
 

Expert Comment

by:costello
ID: 6403568
Force accepting marcoszorrilla's answer.

costello
Community Support Moderator @ Experts-Exchange
0

Featured Post

Vote for the Most Valuable Expert

It’s time to recognize experts that go above and beyond with helpful solutions and engagement on site. Choose from the top experts in the Hall of Fame or on the right rail of your favorite topic page. Look for the blue “Nominate” button on their profile to vote.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Instead of error trapping or hard-coding for non-updateable fields when using QODBC, let VBA automatically disable them when forms open. This way, users can view but not change the data. Part 1 explained how to use schema tables to do this. Part 2 h…
Sometimes MS breaks things just for fun... In Access 2003, only the maximum allowable SQL string length could cause problems as you built a recordset. Now, when using string data in a WHERE clause, the 'identifier' maximum is 128 characters. So, …
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …
Suggested Courses

872 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question