need help with string functions

[kewlcoder]

i am using vb6, i am new to programming so need some help with String functions

I am converting a string value into double using the

x=val(str)

and now, i increment it

x = x + 1

now, i want to convert it back to string (i.e, str)

so suppose my string is 0001
i want to get my string back as 0002
and for 0009
i want it as 0010

something like the double x = 1
should be converted into string as 0001 (str ="0001")

please tell me how to do it, is there any seperate function to allow the string to be generated as i want i mean to return in 4 digits

thank you

 

[SkipVought]

    s = "0001"
    n = CInt(s)
    n = n + 1
    MsgBox String(Len(s) - Len(CStr(n)), "0") & CStr(n)

Skip,

_{[red]A palindrome gone wrong?[/red]
A man, a plan, a ROOT canal...
PULLEMALL!}

 

[MakeItSo]

msgbox Format(Cstr(Cint(n)),"0000")

Should also do the trick.
;-)

Cheers,
Andy

[blue]Speak out against Human Rights violations in China/Tibet

http://www.thepetitionsite.com/takeaction/323661827

[/blue]