Results 1 to 2 of 2

Thread: functions

  1. #1
    Join Date
    May 2009

    Unanswered: functions

    I have created a function
    Public Function VOLUMEROUND(RMQD As Double, RMQH As Double)
    VOLUMEROUND = (3.14 * RMQD ^ 2 / 4) * RMQH
    End Function

    now in a form I have done this
    Private Sub QSRMNO_afterupdate()
    if me.form.value = "round bar" then
    me.volume.value = volumeround(rmqd,rmqh)end sub

    it gives me a compile error.

    " expected variable or procedure... not module"

    please help


  2. #2
    Join Date
    Mar 2009
    Provided Answers: 15
    You cannot give the same name to both a procedure and a module. Rename the module.
    Have a nice day!

Posting Permissions

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