Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 247
  • Last Modified:

simple edit string question

i have a variable....

Testies = '99876'

i need to simply get rid of the ' and just have 99876

what is the easiest way to do this???
0
Thermos
Asked:
Thermos
1 Solution
 
Mike TomlinsonMiddle School Assistant TeacherCommented:
If your asking how to convert a string to a number then:

Private Sub Form_Load()
    Dim Testies As String
    Testies = "99876"
   
    Dim Balls As Double
    Balls = CDbl(Testies)
   
    Dim Nads As Long
    Nads = CLng(Testies)
   
    Dim Nuts As Single
    Nuts = CSng(Testies)
   
    MsgBox Testies & " < " & (Balls * Nads * Nuts)
End Sub

Idle_Mind
0
 
bingieCommented:
lol!
0
 
Arthur_WoodCommented:
when you say you want to get rid of the ' and only have 99876, do you mean you have a STRING value, and you want to convert it to a NUMBER?

How do you ge the value as Testies = '99876'  ?  since the ' character acts as a Comment

What exactly are you trying to accomplish, as your explanation is VERY confused.

AW
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
bad_seedCommented:
if the ' character is only at the beginning and end of the string then the code below will do the trick

    Dim test As String
    Dim test2 As String

    test = "'123456'"
   
    test2 = Mid(test, 2, (Len(test) - 2))
----------------------------------------------------------------

However if the ' can be anywhere in the string then try this

    Dim test As String
    Dim test2 As String

    test = "'1'23'456'"
   
    test2 = Replace(test, "'", "")

hope this helps :o)
   
0
 
bad_seedCommented:
oh, bear in mind the value will still be a String and NOT a number

for that, extract the ' using the code i mentioned and then use the conversion techniques by Idle_Mind
0
 
burningmaceCommented:
I know what he means. He wants to convert a String to an Integer

Balls = Val(Testies)

That's it.
The power of the single lined code reveals itself.

Hope it works,
Burningmace
0
 
Mike TomlinsonMiddle School Assistant TeacherCommented:
> I know what he means. He wants to convert a String to an Integer
>
> Balls = Val(Testies)

> That's it.
> The power of the single lined code reveals itself.
>
> Hope it works,
> Burningmace

Except that an Integer can only hold from -32,768 to 32,767.  

So in your case burningmace, the Val() function would return a Long, not an Integer like you said.

Dim Testies As String
Testies = "99876"
Balls = Val(Testies) ' <----- Balls was not declared, so it implicitly becomes a Long

< versus >

Dim Testies As String
Testies = "99876"
Dim Balls As Integer
Balls = Val(Testies) ' <---- Overflow Error

"The power of the single lined code reveals itself."  ---> Translation: Lazy coding causes unexpected results.

Idle_Mind
0
 
ThermosAuthor Commented:
sorry for the late reply.  something came up.

and sorry i didnt explain my question better guys.  i am pulling the info with an array from a .log file.  what i pull out is '9987' (which is how it shows in the .log file) i simply needed to get rid of the 's.

bad_seed.  Mid(test, 2, (Len(test) - 2)) is exactly what i needed.  thank you.  i had been trying to use replace, len, etc but was not using them properly.

thanks again for the help guys.
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Tackle projects and never again get stuck behind a technical roadblock.
Join Now