Solved

Separating Variable From Operator

Posted on 2009-07-08
5
251 Views
Last Modified: 2012-05-07
Hi,

I have a variable like :

strFormula = "abc+cde-fgh*1"

I want to separate them into 2 stringbuilder or other variable:

strVariable1 = abc,cde,fgh

strVariable2 = +,-,*

How could I do it?

Thank you.
0
Comment
Question by:emi_sastra
  • 2
  • 2
5 Comments
 
LVL 39

Expert Comment

by:Pratima Pharande
ID: 24801815
try some thing like this
  Dim strFormula, strVariable1, strVariable2 As String

        strFormula = "abc+cde-fgh*1"

        strVariable1 = ""

        strVariable2 = ""

        If (strFormula.Contains("+")) Then

            strFormula = strFormula.Replace("+", ",")

            If (strVariable2 = "") Then

                strVariable2 = "+"

            Else

                strVariable2 = strVariable2 + "," + "+"

            End If

        End If

        If (strFormula.Contains("-")) Then

            strFormula = strFormula.Replace("-", ",")

            If (strVariable2 = "") Then

                strVariable2 = "-"

            Else

                strVariable2 = strVariable2 + "," + "-"

            End If

        End If

        If (strFormula.Contains("*")) Then

            strFormula = strFormula.Replace("*", ",")

            If (strVariable2 = "") Then

                strVariable2 = "*"

            Else

                strVariable2 = strVariable2 + "," + "*"

            End If

        End If

        strVariable1 = strFormula
 

        Response.Write(strVariable1)

        Response.Write(strVariable2)

Open in new window

0
 
LVL 1

Author Comment

by:emi_sastra
ID: 24802196
Hi pratima_mcs,

Is there any other simple way?

You know operator  more than "+-*"

May be using regular expression?

Thank you.

0
 
LVL 39

Expert Comment

by:Pratima Pharande
ID: 24802235
yu need to add
 If (strFormula.Contains("+")) Then
            strFormula = strFormula.Replace("+", ",")
            If (strVariable2 = "") Then
                strVariable2 = "+"
            Else
                strVariable2 = strVariable2 + "," + "+"
            End If
        End If

for each operator
0
 
LVL 85

Accepted Solution

by:
Mike Tomlinson earned 500 total points
ID: 24804222
Maybe something like this will work for you?
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim strFormula As String = "abc+cde-fgh*1"
 

        Dim strVariable1 As New System.Text.StringBuilder

        Dim strVariable2 As New System.Text.StringBuilder

        For Each C As Char In strformula

            If Char.IsLetterOrDigit(C) Then

                strVariable1.Append(C)

            Else

                strVariable1.Append(",")

                strVariable2.Append(IIf(strVariable2.Length = 0, C, "," & C))

            End If

        Next
 

        Label1.Text = strVariable1.ToString

        Label2.Text = strVariable2.ToString

    End Sub

Open in new window

0
 
LVL 1

Author Comment

by:emi_sastra
ID: 24815149
Hi Idle_Mind,

I think your code is what I am looking for.

Thank you very much for your help.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This tutorial demonstrates one way to create an application that runs without any Forms but still has a GUI presence via an Icon in the System Tray. The magic lies in Inheriting from the ApplicationContext Class and passing that to Application.Ru…
Article by: jpaulino
XML Literals are a great way to handle XML files and the community doesn’t use it as much as it should.  An XML Literal is like a String (http://msdn.microsoft.com/en-us/library/system.string.aspx) Literal, only instead of starting and ending with w…
This Micro Tutorial will teach you how to censor certain areas of your screen. The example in this video will show a little boy's face being blurred. This will be demonstrated using Adobe Premiere Pro CS6.
This Micro Tutorial hows how you can integrate  Mac OSX to a Windows Active Directory Domain. Apple has made it easy to allow users to bind their macs to a windows domain with relative ease. The following video show how to bind OSX Mavericks to …

863 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

28 Experts available now in Live!

Get 1:1 Help Now