Selectare text din string
Last Updated: May 31 2012 16:21, Started by
ovi_boss2009
, Mar 06 2012 16:20
·
0

#1
Posted 06 March 2012 - 16:20

Salut
Am si eu nevoie de un cod care de ex din textbox1 la apasarea lui button1 sa imi dea in textbox2 textul din textbox1 care este asociat intre 2 semne. Sa zicem ca in textbox1 introduc 1234(textlaintamplare:567 si as dori sa imi ia dintre ( si : textul. Multumesc |
#2
Posted 06 March 2012 - 16:31

Si daca introduci: "1234(textdajsd(d:al(djlada::567" ce trebuie sa ia?
|
#4
Posted 31 May 2012 - 16:21

ce este aflat intre "(" si ":" Functia Split() din VB te ajuta sa accesezi bucati din propozitii folosindu-te de un delimitator sau foloseste-o pe asta la tava: 'Returneaza un text aflat intr-e doua delimitatoare (functia returneaza 0 daca 'strDelim1 sau 'strDelim2 nu exista in parametrul strText) Public Function TextExplodeaza(byval strText as string, strDelim1 as string, strDelim2 as string) as string dim buf as string if instr(1, strText, strDelim1) > 0 and instr(1, strText, strDelim2) > 0 then buf = split(strText, strDelim1)(1) TextExplodeaza = split(buf, strDelim2)(0) else TextExplodeaza = 0 endif End Function Private Sub Command1_Click() Dim cuvant As String cuvant = TextExplodeaza("1234(textlaintamplare:567", "(", ":") If Not IsNumeric(cuvant) Then MsgBox cuvant 'returneaza "textlaintamplare" End Sub Edited by horohoro, 31 May 2012 - 16:27. |
Anunturi
Bun venit pe Forumul Softpedia!
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users