•
•
•
•
What is DaniWeb IT Discussion Community?
You're currently browsing the MS Access and FileMaker Pro section within the Web Development category of DaniWeb, a massive community of 375,222 software developers, web developers, Internet marketers, and tech gurus who are all enthusiastic about making contacts, networking, and learning from each other. In fact, there are 2,187 IT professionals currently interacting right now! Registration is free, only takes a minute and lets you enjoy all of the interactive features of the site.
Please support our MS Access and FileMaker Pro advertiser:
Views: 1083 | Replies: 7 | Solved
![]() |
•
•
Join Date: Mar 2008
Posts: 17
Reputation:
Rep Power: 1
Solved Threads: 0
I am to create a form with 2 text boxes to receive numbers as input and 1 command button that displays a message box containing the larger of the two numbers. To do so, I need to write code in the Click event of the command to call a user-defined function named FindLargestNumber. Pass it 2 arguments(textboxvalues) and display the result in a message box. Write code in the FindLargestNumber function to determine the larger number and return result to the calling procedure(command button Click event).
Can anyone help me out on this? Here's my code thus far, which isn't working:
Can anyone help me out on this? Here's my code thus far, which isn't working:
Option Compare Database Private Sub cmdCompare_Click() If Number1 > Number2 Then MsgBox "txt.Number1.value" ElseIf Number2 > Number1 Then MsgBox "txt.Number2.value" End If End Sub Public Function FindLargestNumber(Number1 As Double, Number2 As Double) End Function
This is roughly what you want. Don't know what you want for the result so I returned the value that was the largest.
Option Compare Database
Private Sub cmdCompare_Click()
MsgBox "The largest number is " & FindLargestNumber(Me.Text1,Me.Text2)
End Sub
Public Function FindLargestNumber(dblNumber1 As Double, dblNumber2 As Double) As Double
If dblNumber1 > dblNumber2 Then
FindLargestNumber = dblNumber1
End If
If dblNumber2 > dblNumber1 Then
FindLargestNumber = dblNumber2
End If
End Function Bob Larson
____________________________________
Access MVP
Administrator, Access World Forums
For Quick Tutorials and Samples for Microsoft Access: BTAB Development
____________________________________
Access MVP
Administrator, Access World Forums
For Quick Tutorials and Samples for Microsoft Access: BTAB Development
I guess you'd have to add an:
or you can assign it whatever value you want.
If dblNumber 1 = dblNumber2 Then FindLargestNumber = dblNumber1 End If
Bob Larson
____________________________________
Access MVP
Administrator, Access World Forums
For Quick Tutorials and Samples for Microsoft Access: BTAB Development
____________________________________
Access MVP
Administrator, Access World Forums
For Quick Tutorials and Samples for Microsoft Access: BTAB Development
Bob Larson
____________________________________
Access MVP
Administrator, Access World Forums
For Quick Tutorials and Samples for Microsoft Access: BTAB Development
____________________________________
Access MVP
Administrator, Access World Forums
For Quick Tutorials and Samples for Microsoft Access: BTAB Development
![]() |
•
•
•
•
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
•
•
•
•
•
•
•
•
DaniWeb MS Access and FileMaker Pro Marketplace
Similar Threads
- Would like to pass two parameters to a function that is outside of a web page. (JavaScript / DHTML / AJAX)
- Function calls in C++ (C++)
- Handling unicode values in python. (Python)
- trouble understanding widget commands (Python)
- Help with arrays (C++)
- arguments in function (C)
- How do I pass the multiple parameters to arglist of _beginthread? (C)
- Default values for STL container function arguments? (C++)
- Arguments of a function (JavaScript / DHTML / AJAX)
Other Threads in the MS Access and FileMaker Pro Forum
- Previous Thread: Access 2003
- Next Thread: Creating data files


Linear Mode