کار با متن

[AghaMohsen]

من یه مقداری رو از ریجستری دریافت کردم به این شکل :

"C:\Program Files (x86)\app\app.exe" %1

حالا من میخوام آدرس فایل رو در یک متغییر دیگه ذخیره کنم و کارکتر های اضافی رو پاک کنم ، چطور باید این کار رو بکنم .

ممنون میشم کمکم کنید.

[hosein320]

منظورتون از کارمترهای اضافی چیه
یکی از راه هاش اینه که اون کارکتر رو با کارکتر خالی جایگزین کنین!

[AghaMohsen]

میخوام بدون هیچ کارکتره اضافه ای آدرس رو به من بده یعنی به جای این :

"C:\Program Files (x86)\app\app.exe" %1

این رو به من بده :

C:\Program Files (x86)\app\app.exe

[hosein320]

MsgBox("C:\Program Files (x86)\app\app.exe %1".Replace(" %1", ""))

[AghaMohsen]

کدی هست که بگیم متن بین "" رو برای من برگردون ؟

[hosein320]

dim a as string="رشته مورد نظر"
dim S() as string=a.split(""")
dim b as string=s(0)

[maxvel]

Dim rslt As String

rslt = TextBox1.Text.Substring(TextBox1.Text.IndexOf("C") - 0)
rslt = rslt.Substring(0, rslt.IndexOf(" %1") - 1)
MsgBox(rslt)