Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: usuwanie łańcucha
AFRO




Typ: neutral
Postów: 60
Zarejestrowany: Mar 2003
usuwanie łańcucha

Pewnie okaże się to banalnym pytaniem, lecz trudno...nie wiem wiec pytam


mam TextBox'a, bardzo dużego (cały screen) i na nim mam tekst (bardzo dużo . Chciałbym zaznaczyc text i ten text usunąć. Nie wiem tylko jak

może (przykład z książki "Poznaj VB":

    Dim strTemp As String  'Text from clipboard
    Dim strLeft As String  'Variable to hold text from left of cursor
    Dim strRight As String  'Variable to hold text from right of cusort
    Dim strFull As String  'Full text
   
    'Get the text from the clipboard
    strTemp = Clipboard.GetText(vbCFText)
    'Get the position of the cursor within the
    'text box
    intGFCursorPos = txtMain.SelStart
    'Get all the text within the text box
    strFull = txtMain.Text
   
    'Determine the text on the left side fo the cursor
    strLeft = Left(strFull, intGFCursorPos)
   
    'Determine the text on the right side of the cursor excluding
    'the selected text.
    strRight = Right(strFull, Len(strFull) - (intGFCursorPos + txtMain.SelLength))


to u góry to część kodu na Wycinanie, tylko bez pobierania łańcucha wycietego do bufora cofniećia i do schowka...

bardzo jednak wierze ze jest cos krotszego, ktore korzystałoby tylko z SelText, a potem wykonywałoby jakąś komende w stylu działania klawisza Delete i tyle...

proszę o pomoc....

19-06-2003 16:49
Pokaż profil AFRO  Wyślij email do AFRO   
losmac
"profesorek"




Typ: neutral
Postów: 758
Zarejestrowany: May 2003
...to było tak...


TextBox1.SelText
TextBox1.Text = ""


... lub coś w tym stylu...


_____________________________________________
POSTULATY STARUSZKA:
1) Ludzie, dbajcie o polszczyznę!!!
2) Ludzie, zadawajcie kompletne pytania, a nie rzucacie ochłapy i trzeba się domyślać o co chodzi!!!

Powodzenia
Maciej Łoś

19-06-2003 20:38
Pokaż profil losmac  Wyślij email do losmac   Odwiedź stronę losmac  
AFRO




Typ: neutral
Postów: 60
Zarejestrowany: Mar 2003

rzecziwiście - banalne, wręcz nadzwyczajnie proste...

txtText.SelText = ""

i to wszystko

19-06-2003 22:18
Pokaż profil AFRO  Wyślij email do AFRO   
Wszystkich odpowiedzi: 2 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1