Subscript out of range

Question

1.00/5 (1 vote)

See more:

VB

Private Sub Combofullname_LostFocus()
Dim temp As Variant
If Text2.Text = Empty Then Exit Sub
temp = Split(Combo14.Text, " ")
   If temp(0) <> Empty Then
   
   If UBound(temp) Then
        Text2.Text = temp(0)
 Else
 If UBound(temp) Then
       Text3.Text = temp(1)
 Else
 If UBound(temp) Then
        Text4.Text = temp(2)
    End If
    End If
    End If
    End If
End Sub

When I run this code it shows error subscript out of range.
Please help

Posted 4-Jan-13 20:17pm

surkhi

Updated 4-Jan-13 20:21pm

Mehdi Gholam

v2

Add a Solution

Comments

Sergey Alexandrovich Kryukov 5-Jan-13 2:21am

Any specific reason to use VB6? This is a complete lame which Microsoft tried to get forgotten, working hard for it. And Variant is extreme lame, also long gone, pretty much. Do you like the dead? :-)
—SA

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Sergey Alexandrovich Kryukov · Accepted Answer · 2013-01-04T20:23:00

Solution 1

Variant… Oh, gosh!

Anyway, here is your bug:

The call to Split may give an array with just one element. Than temp(1) or temp(2) will address non-existing array element.

—SA

Posted 4-Jan-13 20:23pm

Sergey Alexandrovich Kryukov

Comments

surkhi 5-Jan-13 2:43am

Should I use string instead of variant data-type?

Sergey Alexandrovich Kryukov 5-Jan-13 19:38pm

Certainly, you should use strings, integer types, floating-point types, and so on; always the types which represent the data in the best ways for its purpose.
—SA

Sandeep Mewara · Accepted Answer · 2013-01-04T20:27:00

Solution 2

You need to make sure that the index is correct and in range. Make sure, post split, you do have 0,1,2 indexes. Just DEBUG and see where and when it fails.

Here, have a look at these:
MSDN: Subscript out of range (Error 9)[^]
MSDN: Subscript out of range (Visual Basic) [^]

Posted 4-Jan-13 20:27pm

Sandeep Mewara