Newsgroup: it.comp.lang.visual-basic
Titolo: Textbox, multiline.....

Ciao a tutti i programmatori!!!
(sicuramente avrete già dato questa risposta ... percio' scusate :(( )
Vorrei fare in modo che la textbox posizioni automaticamente lo scrollbar
sull'ultima riga di tutto il testo che ha al suo interno.
Ad esempio.
Se avessi un'applicazione che mi aprisse un file, vorrei che lo scroll si
posizionasse alla fine di tutte le righe (però non è l'applicazione che sto'
creando ... )
Vi ringrazio tantissimo per il vostro aiuto
E vi auguro BUON LAVORO!!!!

Questa la so anch'io ...
text1.SelStart = Len(text1)

 wrote


 sull'ultima riga di tutto il testo che ha al suo interno.
TNX 1000 RAGA!!

 forse con sendkeys ^end (non ho provato, mi viene in mente ora).
Non vorrei dire una fesseria, ma non mi pare che i Textbox supportino il
metodo sendekeys... ATTENDO CORREZIONI
Antonio Mirarchi
--
 Visita lo star trek antonio mirarchi club - 
http://StarTrek.freeweb.org
  Visita World On Line - 
http://wol.n3.net
 Visita Star Trek: war! Il nuovo gioco di ruolo su Star Trek -
http://trekwar.n3.net

 metodo sendekeys... ATTENDO CORREZIONI
cosi' e' andato tranquillo e si vede la parte finale del testo:
Private Sub Form_Load()
    Dim txtsql
    txtsql = "aaaa"
    Text3 = "select * from tabella where nome like " _
& Chr(34) & "*" & txtsql & "*" & Chr(34) & _
" or cognome like " & Chr(34) & "*" & txtsql & "*" & Chr(34) & _
" or paese like " & Chr(34) & "*" & txtsql & "*" & Chr(34)
    Text3.SelStart = Len(Text3)
    Me.Show
    Text3.SetFocus
    SendKeys "^{END}"
End Sub

 wrote


direi di no, l'avevo gia' settato a multiline true e scrollbars verticali.
cmq una soluzione l'ho messa nel post precedente.
ciao, a.
The Buc <df...@NOSPAMusa.net> wrote in message


 il testo non ci sta tutto si vede solo l'inizio...
Come ? A me funzia perfettamente !
Scrolla automaticamente fino alla linea dove c'č il cursore; forse
č una questione di versioni. Io ho VB5 SP3 su Win95C OSR 2.5, tu?
In ogni caso, eviterei l'uso della SendKeys$, č una soluzione un po'
sporca...
Prova a usare questa bella "APINA" e fammi sapere se cosě funziona:
_____________________
'In un modulo:
Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As _
Integer, ByVal lParam As Any) As Long
----
Per andare in fondo:
'*Scrollare fino alla linea dove c'č il cursore
Const EM_SCROLLCARET = &HB7
Text1.SelStart = Len(Text1) - 1
SendMessage Text1.hwnd, EM_SCROLLCARET, 0&, 0&
_____________________
Per altri usi della SendMessage, vedi sul sito di Cesare Rizzi.
Bye, G.

 '*Scrollare fino alla linea dove c'č il cursore
SCROLLARE ???
paperino, ho fatto 9 gg in H per cheks vari e sembravo ( relativamente :) a
posto...
se ora mi trovano esanime e non capiscono perche',
sappi che sara' a causa di verbi con:
RADICALE INGLESE + SUFFISSO ITALIANO
-- sappilo !! :)
specie a questi orari che uno starebbe cercando di conciliarsi il sonno...
neanche wes craven... :)
se letti e/o posti un altro vocabolo del genere,
displeialo a chiare lettere...
printalo, se vuoi...
poi deletalo...
te ne pliiso...
:)


 
Già... Si potrebbe chiedere a Stracca di installare un cgi di Chat,
giusto per scambiare quattro chiacchiere senza appesantire il NG...
Ohddio, ho stuzzicato un vespaio? 
Pal... che ne dici di "setuppare"? e di "passwordare"
Ciao
Flavio Ronco
-- 
f.ronco@*NonMiServeNiente*
flashnet.it
http://www.metabrains.com
  [Under Construction]
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]

 :)
ROTFLONE !
Chiedo scusa, non lo faccio piů. :-)
Sai com'č, lavoro in un quotidiano, e quello che vedo passare ti farebbe
"accapponare i congiuntivi", fatalmente si rischia di rimanere contagiati...
Comunque, Buon Natale !
Bye, G.

 Bye, G.
:) :)
ANGLICISM: se lo conosci lo eviti :))
auguroni -- o dovrei dire uiscioni -- di buone feste -- meuui crismas en(d)
'eppi nu i-iar -- anche a te !! (*)
che quotidiano ? ( lo so, non e' beneducato, ma come sono curioso... :)
(*) evito (**) le note a pie' di pagina, come vedi, tipo "op. cit." ...
anche x' non saprei da che op. potrei cit.
(**) no, non le evito (***). rotflone ? mi manca ! -one come medagl-ione,
come one two three, come cosa ?
(***) appunto. ps -- e poi si stupiscono che ze pipol non legge ? :)

 come one two three, come cosa ?
Beh, era una specie di cattiveria e/o provocazione, l'ultima prima di Natale >:->
ROTFL radice inglese (per di pių acronimo) con -ONE suffisso italiano >;->>
Buone feste !