I;m almost there!!! I see the finish flag!!!!

piedpiper

Registered User.
Local time
Today, 18:13
Joined
Aug 5, 2009
Messages
42
[Before people get upset - I'm hoping to post this here, as to get more poeple to help me, I really wanna wrap this up]

---this is copied and pasted from a previous post---

Man I feel stupid... I'm such a noob and a non-programmer that I'm just not getting this stuff... I was also embarrassed about my poorly designed database. :( - I have been working hard all week on it, and many design choice were based on what was requested of me. I did learn a lot, and I thank everyone that has helped me make this happen. However, there is only 2 pieces left that I would love to learn and implement.


First (puzzle #1)

How to autofill formulated fields that are hidden but deposits their results in the data table? (Again, because of SPSS it needs to function this way...) is it possible?

Here is the scenario (see attachment)

In this form “p1_Form3_Special_Order” at the bottom highlighted by a big red box (near footer) there are 10 text boxes linked to the main data table. I.e. I plan on hiding these boxes when calculations work.
What I would like to have happen is:

Part one,

When a user enters a numeric figure in this field “fp1_f3_1a_Special_Order” the hidden field “p1_f3_1b_Special_Order” does the following calculation, and the Main_Database captures the result
The calculations for the field “p1_f3_1b_Special_Order” needs to perform are:
________

IF “p1_Form2a_Special_Order”, “Frame84” = a value of “1” (Simple quote (5 or less)) AND field “p1_f3_1a_Special_Order” = <5 (5 or less) then, field “p1_f3_1b_Special_Order” should calculate and result a “1” ß or “True” otherwise if sum is greater than ”5” then it should calculate and result in a “2” ß “False”

AND/OR

IF “p1_Form2a_Special_Order”, “Frame84” = a value of “2” (Complex quote (6-12) AND field “p1_f3_1a_Special_Order” = >5 but <12 (12 or less) then, field “p1_f3_1b_Special_Order” should calculate and result a “1” ß or “True” otherwise if sum is greater than ”12” then it should calculate and result in a “2” ß “False”
_______


Part Two,

When a user enters a numeric figure in this field “p1_f3_2a_Special_Order” the hidden field “p1_f3_2b_Special_Order” does the following calculation, and the Main_Database captures the result
The calculations for the field “p1_f3_2b_Special_Order” needs to perform are:
________

“p1_f3_2a_Special_Order” = 1 then, field “p1_f3_2b_Special_Order” should calculate and result a “1” ß or “True” otherwise if sum is greater than ”1” then it should calculate and result in a “2” ß “False”
________



Second (puzzle #2)

The following forms (listed below) all have optional text boxes based on a response…

Example
Yes
No –> if no, please specify: ____________________

Is there any way to hide the “please specify” text box and label for it until they select “No” from the Yes/No options. This would eliminate clutter on the form, and would prevent false data, incase user click on “Yes” then proceed to enter data in the “if no, please specify:” text box.

I think this is basic questionnaire practice, but I do not see any options to make this happen?

This situation happens in the following forms

· p1_Form1_Stock_Order
· p1_Form2b_Special_Order
· p1_Form5_Special_Order
· p1_Form6_Special_Order
· p1_Form7_Special_Order
· p1_Form8_Special_Order
· p2_Form1_Special Order

Again, I’m a noob, and ignorant to VB and database design principles. I think it’s not too bad for my very first database.

Please do not think I’m not helping myself, I have been working on this since Monday, and I’m sure most of you could have done this in a couple of hours… my plan is to finish this one quick, as it’s needed right away… then rebuild it from the ground up with a better understanding of design or normalization, and I will most definitely pick up a book or two and get right into this, although, it has got me a few headaches, I really enjoyed this… again thanks for your help!
 

Attachments

On part two I used the following code to hide the txt box when the options were yes and unhide when no.

Private Sub Frame77_BeforeUpdate(Cancel As Integer)
If Me.Frame77 = 1 And Me.Frame93 = 1 Then
Me.Text88.Visible = False
Else
Me.Text88.Visible = True
End If
End Sub

Private Sub Frame93_BeforeUpdate(Cancel As Integer)
If Me.Frame77 = 1 And Me.Frame93 = 1 Then
Me.Text88.Visible = False
Else
Me.Text88.Visible = True
End If
End Sub


if you right click the txt box go to properties and format tab you can hide anything by selecting visible to No then use code like above to manipulate when it hides its self.
 
Last edited:
On part two I used the following code to hide the txt box when the options were yes and unhide when no.

Private Sub Frame77_BeforeUpdate(Cancel As Integer)
If Me.Frame77 = 1 And Me.Frame93 = 1 Then
Me.Text88.Visible = False
Else
Me.Text88.Visible = True
End If
End Sub

Private Sub Frame93_BeforeUpdate(Cancel As Integer)
If Me.Frame77 = 1 And Me.Frame93 = 1 Then
Me.Text88.Visible = False
Else
Me.Text88.Visible = True
End If
End Sub


if you right click the txt box go to properties and format tab you can hide anything by selecting visible to No then use code like above to manipulate when it hides its self.

Thanks, how would I go around with part 1?
 
On part two I used the following code to hide the txt box when the options were yes and unhide when no.

Private Sub Frame77_BeforeUpdate(Cancel As Integer)
If Me.Frame77 = 1 And Me.Frame93 = 1 Then
Me.Text88.Visible = False
Else
Me.Text88.Visible = True
End If
End Sub

Private Sub Frame93_BeforeUpdate(Cancel As Integer)
If Me.Frame77 = 1 And Me.Frame93 = 1 Then
Me.Text88.Visible = False
Else
Me.Text88.Visible = True
End If
End Sub


if you right click the txt box go to properties and format tab you can hide anything by selecting visible to No then use code like above to manipulate when it hides its self.

Works great on radios (frame) but how to make it work for check boxex?

Heres what I tried...did not work of course!

Private Sub Check92_Click()
If Me.Check92_Click = 1 And Me.Check92_Click = 1 Then
Me.Text88.Visible = False
Else
Me.Text106.Visible = True
End If
End Sub
 
Works great on radios (frame) but how to make it work for check boxex?

Heres what I tried...did not work of course!

Private Sub Check92_Click()
If Me.Check92_Click = 1 And Me.Check92_Click = 1 Then
Me.Text88.Visible = False
Else
Me.Text106.Visible = True
End If
End Sub


First of all i only used the And because there were two radio frames, here you use only one Checkbox so the And isnt necessary. Also check boxes evaluate to either -1 or 0 or you can use true or false in this case.


If Me.Check92 = True Then
'What happens if the box is checked'
 
First of all i only used the And because there were two radio frames, here you use only one Checkbox so the And isnt necessary. Also check boxes evaluate to either -1 or 0 or you can use true or false in this case.


If Me.Check92 = True Then
'What happens if the box is checked'

Here is the code I tried
Private Sub Check92_Click()
If Me.Check92_Click = -1 Then
Me.Text106.Visible = False
Else
Me.Text106.Visible = True
End If
End Sub

Did not work! said: Method or data member not found
Check92_Click is highlighted in debugger
 
First of all i only used the And because there were two radio frames, here you use only one Checkbox so the And isnt necessary. Also check boxes evaluate to either -1 or 0 or you can use true or false in this case.


If Me.Check92 = True Then
'What happens if the box is checked'

My mistake... I used the following code and it worked...thank you so much...

Private Sub Check119_Click()
If Me.Check119 = True Then
Me.Text110.Visible = True
Else
Me.Text110.Visible = False
End If
End Sub

Any thought on PART 1 - Love to get this done by Monday if possible!
 
The first part is a little confusing. Explain the process that needs to happen step by step for me including what the user will do.
 
The first part is a little confusing. Explain the process that needs to happen step by step for me including what the user will do.

No problem I will explain the best I can...would it be possible if you can look at the attachment... all the form name correspond to the attached. would be easier to explain while you look at the forms? what do you think?
 
I sent you a private message with my email info be easier to walk through it that way.
 
http://www.access-programmers.co.uk/forums/showthread.php?p=874762#post874762

http://www.access-programmers.co.uk/forums/showthread.php?t=177406

How very nice to ask the same question over and over again...

My friend, what you see is a mirrage, your trapped in the dessert without anywhere to go. :(

Sorry about that, I was in a rush to finish for Monday meeting.

Again sorry!

The task is complete now.... Thank you so much WireMonkey!!!!


And everyone else who helped.
 
Before people get upset - I'm hoping to post this here, as to get more poeple to help me, I really wanna wrap this up

For future reference, this tactic is considered EXTREMELY rude. I'm glad you are good to go with your project, but please be aware that this tactic is considered as "hogging" - as in, trying to hog resources. Or it is an indication that you think your problem is more desperate than that of others.

It is the nature of the bulleting board s/w that it will move your post back up near the top of the list if someone updates it. And if none of us updates it, perhaps we were helping others. (Which is why I didn't get involved, by the way.)
 
For future reference, this tactic is considered EXTREMELY rude. I'm glad you are good to go with your project, but please be aware that this tactic is considered as "hogging" - as in, trying to hog resources. Or it is an indication that you think your problem is more desperate than that of others.

It is the nature of the bulleting board s/w that it will move your post back up near the top of the list if someone updates it. And if none of us updates it, perhaps we were helping others. (Which is why I didn't get involved, by the way.)

Ok... I will change my behaviour.
 

Users who are viewing this thread

Back
Top Bottom