help in choosing from list

[Nokia N93]

Hello, i need ur help
i have one table:
Telephone
Name
Type of call (personal, question, problem)
and other information (problem , solution, notes ... )



I want when i choose Personal ,, just the To which Depratment field
if i choose Question ,,, just the to whom an d notes fielsd to appear
if i choose Problem,,, other fields to appear

the issue is that i want all of them in one form
I tried the hidden Attributes,, but i didn't figure out what code should i write

[maximus]

Hi Nokia 93 well what is the actual issue here. can u pls attach a demo database in Access 2000 format so that I can see it nd do the needful if necessary. I think you had posted another problem regarding opening different forms based on the value selected in a combobox Is that problem solved if yes mark it solved.

[Nokia N93]

Hi maximum
I attached a sample File and a sample image explaining what i mean
and i already marked it as SOLVED

[maximus]

I have modified the mdb file and now you will get the following:

1) when you select Personal in the CallType Combo only ToDeparment TextBox is Visible.
2) When You select Question in the CallType Combo Text Boxes Department, Solution and Problem is Visible.
3) When You select Problem in the CallType Combo Text Boxes Department, Solution and Problem is Visible.

I have used two Codes one in the AfterUpdate event of the ComboBox and the other in the OnCurrent even of the from. The Second code in the on current event ensures that the correct Textboxes are displayed when u navigate through records according to the value entered in the CallType Combobox.

Private Sub CallType_AfterUpdate()
Select Case Me.CallType
Case Is = "Personal"
Me.ToDepartment.Visible = True
Me.Solution.Visible = False
Me.Problem.Visible = False
Case Is = "Question"
Me.ToDepartment.Visible = True
Me.Solution.Visible = True
Me.Problem.Visible = True
Case Is = "Problem"
Me.ToDepartment.Visible = True
Me.Solution.Visible = True
Me.Problem.Visible = True
End Select
End Sub

Private Sub Form_Current()
If Me.NewRecord Then
Me.ToDepartment.Visible = False
Me.Solution.Visible = False
Me.Problem.Visible = False
Else
Select Case Me.CallType
Case Is = "Personal"
Me.ToDepartment.Visible = True
Me.Solution.Visible = False
Me.Problem.Visible = False
Case Is = "Question"
Me.ToDepartment.Visible = True
Me.Solution.Visible = True
Me.Problem.Visible = True
Case Is = "Problem"
Me.ToDepartment.Visible = True
Me.Solution.Visible = True
Me.Problem.Visible = True
End Select
End If
End Sub

refer to the mdb file attached. If this solves your problem mark this thread solved

[Nokia N93]

Really thanx a lot

you helped me