Solved

Code for Do until Loop

Posted on 2008-06-25
5
801 Views
Last Modified: 2013-11-28
I am trying to write a Do Until loop, what I want to know is how to write the if statement, I want the loop to continue until all 14 check boxes are read. Here is what i think it should be the code below.

Is there a way to have the field Day_ InAMTime etc, read inclemently. There are 14 days that have 4 time fields that need to be populated based on weather the corresponding check box is checked.
\thank you.
If WKDay "& = False Then
Me.Day01InAMTime.Value = tbl_EmployeeData.InAMTime
Me.Day01OutAMTime.Value = tbl_EmployeeData.OutAMTime
Me.Day01InPMTime.Value = tbl_EmployeeData.InPMTime
Me.Day01OutPMTime.Value = tbl_EmployeeData.OutPMTime
Else
Me.Day01InAMTime.Value = Null
Me.Day01OutAMTime.Value = Null
Me.Day01InPMTime.Value = Null
Me.Day01OutPMTime.Value = Null

Open in new window

0
Comment
Question by:life42
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 66

Expert Comment

by:Jim Horn
ID: 21868626
Give this a whirl... (air code, so modify to suit your needs)

Dim x as Integer

For x = 1 to 14
  Me("Day" & Format(x, "00") & "InAMTime").Value = goo
  Me("Day" & Format(x, "00") & "OutAMTime").Value = foo
  Me("Day" & Format(x, "00") & "InPMTime").Value = boo
  Me("Day" & Format(x, "00") & "OutPMTime").Value = haachoo
next
0
 

Author Comment

by:life42
ID: 21868672
Simple question why & Format, and how do I test against the check boxes, in the mean time i will play with this thank you.
0
 
LVL 66

Accepted Solution

by:
Jim Horn earned 500 total points
ID: 21868694
>Simple question why & Format
So 1 will be read as 01, 2 as 02, 3 as 03, etc.

>and how do I test against the check boxes,
Not sure what you mean here.
0
 

Author Comment

by:life42
ID: 21868720
Do I need to change format and if so to what.
I only want to populate the days that have been checked on another form but that information is stored in the same table that populates the time fields.

0
 

Author Closing Comment

by:life42
ID: 31470699
thank you
0

Featured Post

Three Reasons Why Backup is Strategic

Backup is strategic to your business because your data is strategic to your business. Without backup, your business will fail. This white paper explains why it is vital for you to design and immediately execute a backup strategy to protect 100 percent of your data.

Question has a verified solution.

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

In Part II of this series, I will discuss how to identify all open instances of Excel and enumerate the workbooks, spreadsheets, and named ranges within each of those instances.
Did you know that more than 4 billion data records have been recorded as lost or stolen since 2013? It was a staggering number brought to our attention during last week’s ManageEngine webinar, where attendees received a comprehensive look at the ma…
Using Microsoft Access, learn some simple rules for how to construct tables in a relational database. Split up all multi-value fields into single values: Split up fields that belong to other things into separate tables: Make sure that all record…
In Microsoft Access, when working with VBA, learn some techniques for writing readable and easily maintained code.

734 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