Results 1 to 3 of 3
  1. #1
    Join Date
    Apr 2004
    Posts
    66

    Unanswered: Tab Control and VB...

    I have a form with several tabs... On the tabbed section, when I update a record, I want several other records to be changed. (Status, status date, etc.). These fields are on the form, but not on the tabbed section. The code looks like this:

    Private Sub ActualCourtDate_AfterUpdate()
    Me!SPSFee = 30
    Me!SFee = 46
    If [StoreID] Like "P*" Then
    SPSFeePd = 2
    ElseIf [StoreID] Like "EC*" Then
    SPSFeePd = 2
    Else
    SPSFeePd = 1
    End If
    SFeePd = 2
    [Final Resolution] = "In Progress"
    [Status1] = "SCA"
    End Sub


    It does work, but only after I tab through those fields. It does not change them automatically. Does anyone know why that would be??

    Thanks, as always!!

    Susie

  2. #2
    Join Date
    Jan 2002
    Location
    At the Edge of America!
    Posts
    55
    Try This

    Private Sub ActualCourtDate_AfterUpdate()
    Me!SPSFee = 30
    Me!SFee = 46
    If [StoreID] Like "P*" Then
    Me!SPSFeePd = 2
    ElseIf [StoreID] Like "EC*" Then
    Me!SPSFeePd = 2
    Else
    Me!SPSFeePd = 1
    End If
    Me!SFeePd = 2
    Me![Final Resolution] = "In Progress"
    Me![Status1] = "SCA"
    End Sub

  3. #3
    Join Date
    Apr 2004
    Posts
    66

    Wink

    That works - YEAH!!!!!!!!!

    Thank you so very much!!!

    Susie

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •