Re: SYNC Form to listbox



I revised the program to "Call_Click7" and execute
"Me.[List7].Selected(1)". In theory it should have taken care of the
double clidk problem, but now I get an error message that the operation
was canceled by an associated object.
---------------------------------------------------------------------------------------------------------------
Private Sub Frame33_Click()
Select Case Frame33
Case 0 'show all records
Me![List7].RowSource = "SELECT [projectnum], [projectname] FROM
projectnumqry; "
Case Else 'show limited (filtered) list
Me![List7].RowSource = "SELECT [projectnum], [projectname] FROM
projectnumqry where [type]=[frame33];"
End Select
[Text29] = [List7].ListCount - 1
DoCmd.GoToControl "[List7]"
frame33ran = True
Call List7_Click
End Sub

Private Sub List7_Click()
Rem Pulls-up the summary form information for the selected project
If Frame33 Then Me.[List7].Selected(1) = True: frame33ran = False
Me.Recordset.FindFirst "[projectnum] = " & Me.[List7]
Call setcontrols
End Sub

.



Relevant Pages

  • RE: On Form Error: MsgBox
    ... just the form) I want it to prompt the first prompt in the code below then ... Can you help me modify the below code to prevent the above error message from ... Private Sub Form_Error(DataErr As Integer, Response As Integer) ...
    (microsoft.public.access.formscoding)
  • Re: Custom error message for Runtime error 3022
    ... The standard error message was triggered as soon as the ... Private Sub Form_Error ... Dim strMsg As String ... I don't think the Form Error triggers by runtime errors, ...
    (comp.databases.ms-access)
  • Re: Where to put my Error handling Code
    ... Private Sub Form_Error ... My error message popped up but then I think ... focus needs to be returned to that control so that the user can change it. ... Error event to display the Error number generated when the user violates your ...
    (microsoft.public.access.formscoding)
  • Re: Modify the Default Error Msg
    ... Private Sub Form_Error(DataErr As Integer, Response As Integer) ... "CASELOAD Error Message" ... continue!", vbCritical, "Caseload Type Error Message" ...
    (microsoft.public.access.forms)
  • RE: Nested Datagrid spanning columns of Parent Datagrid
    ... The code you posted does not seem like the cause of the error message. ... Public Property CompanyPrimaryKey() As Integer ... Private Sub Page_Load ... "Phillip Williams" wrote: ...
    (microsoft.public.dotnet.framework.aspnet.webcontrols)