Chirurgia endoscopică a hipofizei
"Standardul de aur" în chirurgia hipofizară îl reprezintă endoscopia transnazală transsfenoidală. Echipa NeuroHope este antrenată în unul din cele mai mari centre de chirurgie a hipofizei din Europa, Spitalul Foch din Paris, centrul în care a fost introdus pentru prima dată endoscopul în chirurgia transnazală a hipofizei, de către neurochirurgul francez Guiot. Pe lângă tumorile cu origine hipofizară, prin tehnicile endoscopice transnazale pot fi abordate numeroase alte patologii neurochirurgicale. www.neurohope.ro |
Intrebare simpla
Last Updated: Jun 20 2008 14:54, Started by
Champy0n
, May 06 2008 09:19
·
0
#1
Posted 06 May 2008 - 09:19
Salut ! Vreau sa fac un programel In VB si m-am inpotmolit la o chestie : Vreau sa se introduca un cuvant intr-un text box, iar daca acesta este diferit de cele specificate de mine, atunci sa se afiseze mesaj cu eroare..Ce gresesc in cod ?
If TextBox2.Text <> "heroina" & " opiu " & "hasis" & "Acid lisergic dietilamid" & "Codeina" & "DMT" & "Metamfetamina" & "Morfina" & "Opiate" & "Opioide" & "Pervitin" & "THC" & "Tebaina" & "marijuana" Then MsgBox("Atentie! Nu este drog") Exemplu: in textbox scriu "marijuana", va afisa pagina ceruta, daca tastez "calculator" afiseaza msg. de eroare Eu cand execut chestia asta imi afiseaza tot timpul mesajul de eroare, indiferent daca acel cuvant se afla in lista. Edited by Champy0n, 06 May 2008 - 09:21. |
#2
Posted 06 May 2008 - 13:16
De ce te complici? Dacă tot ai un set de valori prestabilite, de ce nu folosești un dropdown?
|
#3
Posted 06 May 2008 - 15:37
Champy0n, on May 6 2008, 10:19, said: Salut ! Vreau sa fac un programel In VB si m-am inpotmolit la o chestie : Vreau sa se introduca un cuvant intr-un text box, iar daca acesta este diferit de cele specificate de mine, atunci sa se afiseze mesaj cu eroare..Ce gresesc in cod ? If TextBox2.Text <> "heroina" & " opiu " & "hasis" & "Acid lisergic dietilamid" & "Codeina" & "DMT" & "Metamfetamina" & "Morfina" & "Opiate" & "Opioide" & "Pervitin" & "THC" & "Tebaina" & "marijuana" Then MsgBox("Atentie! Nu este drog") Exemplu: in textbox scriu "marijuana", va afisa pagina ceruta, daca tastez "calculator" afiseaza msg. de eroare Eu cand execut chestia asta imi afiseaza tot timpul mesajul de eroare, indiferent daca acel cuvant se afla in lista. If TextBox2.Text <> "heroina" and TextBox2.Text <> " opiu " and TextBox2.Text <> "hasis" and TextBox2.Text <> "Acid lisergic dietilamid" and TextBox2.Text <> "Codeina" and TextBox2.Text <> "DMT" and ..... |
#4
Posted 06 May 2008 - 19:02
zaboss, on May 6 2008, 14:16, said: De ce te complici? Dacă tot ai un set de valori prestabilite, de ce nu folosești un dropdown? Fac chestia asta de putin timp, deci notiunea mi-e straina (acum imi dau seama ca varianta asta este una bruta si nerentabila), deci imi poti da un exemplu ?... Multumesc foarte mult Manu Edited by Champy0n, 06 May 2008 - 19:05. |
#5
Posted 06 May 2008 - 19:40
#6
Posted 06 May 2008 - 19:58
ManuV, on May 6 2008, 15:37, said: If TextBox2.Text <> "heroina" and TextBox2.Text <> " opiu " and TextBox2.Text <> "hasis" and TextBox2.Text <> "Acid lisergic dietilamid" and TextBox2.Text <> "Codeina" and TextBox2.Text <> "DMT" and ..... Varianta lui ManuV o poti simplifica asa If InStr(1,",heroina,opiu,hasis,.....,", ","+Trim(TextBox2.Text)+"," )=0 Then .... Endif Valoarea din textbox am delimitat-o cu 2 virgule la extremitati deoarece functia Instr intoarce pozitia unui subsir intr-un sir,asa ca orice subsir din valorile tale,ar fi fost valid. Mi se pare cat de cat ok si varianta lui zaboss,atata timp cat se poate alege un nr finit de articole,le poti incarca intr-un combo caruia ii pui la Style=2 Dropdown List Edited by ionut_y, 06 May 2008 - 20:00. |
#7
Posted 20 June 2008 - 14:54
Nu sunt sigur dar cred ca ChampyOna a uitat sa pui End If .
Edited by silviubogan, 20 June 2008 - 14:55. |
Anunturi
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users