Click here to Skip to main content
11,805,316 members (65,816 online)
Rate this: bad
Please Sign up or sign in to vote.
See more: VB VB.NET
Dim s As String
        Dim a, b, c As Long
        a = CLng(Val(TxtBoxInput.Text))
        s = TxtBoxInput.Text
        For i = 1 To Len(s) Step 1
            b = CLng(Mid(s, i, 1))
            c = Len(s) - i
            b = CLng(Val(b) * (2 ^ c))
            TxtBoxInput.Text = CStr(Val(TxtBoxInput.Text) + b)

        Next i
Posted 18-Apr-13 14:58pm
Edited 18-Apr-13 15:05pm
ThePhantomUpvoter at 18-Apr-13 22:33pm
Not a question or any description of a problem
_Maxxx_ at 19-Apr-13 0:33am
What "answer"? The function manipulates the textbox and puts the results back in the textbox as far as I can see - so MessageBox.Show(TxtBoxInput.Text) would do what you ask - but I can't believe that's what you mean!

1 solution

Rate this: bad
Please Sign up or sign in to vote.

Solution 1

do u really want a messege box to show ur answer inspite it is shown in a text box

write this"+TxtBoxInput.Text+","Your Answer ")

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

  Print Answers RSS
0 OriginalGriff 3,265
1 Maciej Los 1,990
2 KrunalRohit 1,907
3 CPallini 1,855
4 Richard MacCutchan 1,227

Advertise | Privacy | Mobile
Web02 | 2.8.151002.1 | Last Updated 19 Apr 2013
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100