Results 1 to 4 of 4

Function returning null value instead of string value

Threaded View

  1. #1
    Registered User
    Join Date
    06-06-2006
    MS-Off Ver
    2010, 365
    Posts
    39

    Question Function returning null value instead of string value

    Hi,

    I have a combo box with some values in it. Now, I want to make a function wherein I pass the value of the combo box as a string parameter and return a specific string value corresponding to the string parameter passed. I am able to pass the parametric value, but the value returned is "blank" or "null" instead of the string value that the function should be returning. Why is this happening? Below is the code that I am using for the function and how I am passing the value into it. Please help.

    Function convertDiv(oDiv As String) As String
    Dim wDiv, oDivID As String
    wDiv = oDiv
    If wDiv = "A" Then
        oDivID = "1"
    ElseIf wDiv = "B" Then
        oDivID = "2"
    ElseIf wDiv = "C" Then
        oDivID = "3"
    ElseIf wDiv = "D" Then
        oDivID = "4"
    ElseIf wDiv = "E" Then
        oDivID = "5"
    ElseIf wDiv = "F" Then
        oDivID = "6"
    ElseIf wDiv = "G" Then
        oDivID = "7"
    End If
    convertDiv = oDivID
    End Function
    Sub init()
    Dim a As String
    a = convertDiv(Trim(combo1.Value))
    lblType.Caption = a
    End Sub
    Peace,

    Shivboy
    Last edited by shivboy; 07-07-2006 at 01:18 AM.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

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

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1