Visual Basic 6 - Mandare a capo una stringa in una text box

Forum - Visual Basic 6 - Mandare a capo una stringa in una text box

Pagine: [ 1 2 ]

webb (Normal User)
Newbie

Messaggi: 5
Iscritto: 06/09/2008

Postato alle 14:56
Sabato, 06/09/2008

ciao ragazzo sono nuovo del forum e vorrei subito porvi un quesito!!!!!
Volevo per prova iniziare un programma che inserite due stringhe di lunghezza giù prestabilita andassero in una text box una sotto quell'altra...io per ora ho fatto questo pezzo di codice ma mi manca solamente il codice che riguarda le stringhe!!!!

Codice sorgente - presumibilmente VB.NET

Dim Nome As String
Dim Cognome As String
 
Private Sub Command1_Click()
Text1.Text = CStr(Nome) + CStr(Cognome)
'così con il + le concateno ma non riesco a metterle una sotto l'altra in una text box...Sapete se c'è qualche proprieta oppure devo aggiungere alla fine delle stringhe un particolare carattere?????
End Sub
 
Private Sub Form_Load()
Text1.Text = ""
Nome = "Alessandro"
Cognome = "Nistri"
End Sub

help please!!!grazie in anticipo!!
Ciao ciao!

dimenticavo...Ho impostato le proprietà multiline della ext box!!

Ultima modifica effettuata da webb il 06/09/2008 alle 14:57

Overflow (Normal User)
Expert

Messaggi: 334
Iscritto: 11/01/2008

Postato alle 15:05
Sabato, 06/09/2008

prima di tutto la proprietà Multiline della TextBox deve essere = True.
Invece per andare a capo usa vbcrlf.

Codice sorgente - presumibilmente VB.NET

Dim Nome As String
Dim Cognome As String
 
Private Sub Command1_Click()
Text1.Text = CStr(Nome) + vbcrlf + CStr(Cognome)
'così con il + le concateno ma non riesco a metterle una sotto l'altra In una text box...Sapete se c'è qualche proprieta oppure devo aggiungere alla fine delle stringhe un particolare carattere?????
End Sub
 
Private Sub Form_Load()
Text1.Text = ""
Nome = "Alessandro"
Cognome = "Nistri"
End Sub

P4p3r0g4 (Member)
Guru

Messaggi: 1319
Iscritto: 29/12/2006

Postato alle 0:28
Domenica, 07/09/2008

usa gli & invece che i + altrimenti farai un enorme casino quando avrai stringhe unite a numeri.
Ps: cstr(variabile) e` inutile se variabile e` gia una stringa.

webb (Normal User)
Newbie

Messaggi: 5
Iscritto: 06/09/2008

Postato alle 9:55
Domenica, 07/09/2008

grazie mille dell'informazione adesso funziona ma mi manca una cosa....Il codice che posto adesso funziona però ci sono delle imprecisioni ovvero quando io inserisco i compiti tramite la input box succede che le nuove stringhe inserite non vadino una dopo l'altra ma vanno sempre al secondo posto come mai????
vorrei invece che le stringhe andassere una sotto l'altra!!

Codice sorgente - presumibilmente VB.NET

Dim Cognome As String
Dim input1 As String
Dim i As Integer
Dim j As Integer
 
 
 
Private Sub Command1_Click()
j = InputBox("inserisci il numero di materie presenti in un giorno")
For i = 0 To j
'Text1.Text = CStr(Nome) & CStr(Text2.Text) & vbCrLf 'funzonicchia
input1 = InputBox("Inserisci i compiti", "PROVA")
Text1.Text = CStr(Nome) & vbCrLf & CStr(input1)
Next i
End Sub
 
 
Private Sub Command2_Click()
Form2.Show
 
End Sub
 
Private Sub Form_Load()
Text1.Text = ""
Nome = "Alessandro"
Cognome = "Nistri"
Text2.Text = "cia amore mio"
End Sub

grazi in anticipo!!!
ciao ciao

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 10:03
Domenica, 07/09/2008

Non ho capito bene quello che intendi dire...
dimmi se è quello che cerchi:

Codice sorgente - presumibilmente VB.NET

Dim Cognome As String
Dim input1 As String
Dim i As Integer
Dim j As Integer
Dim nome As String
 
 
Private Sub Command1_Click()
j = InputBox("inserisci il numero di materie presenti In un giorno")
For i = 0 To j
'Text1.Text = CStr(Nome) & CStr(Text2.Text) & vbCrLf 'funzonicchia
input1 = InputBox("Inserisci i compiti", "PROVA")
Text1.Text = Text1.Text & nome & vbCrLf & input1 & vbCrLf
Next i
End Sub
 
 
Private Sub Command2_Click()
Form2.Show
 
End Sub
 
Private Sub Form_Load()
Text1.Text = ""
nome = "Alessandro"
Cognome = "Nistri"
Text2.Text = "cia amore mio"
End Sub

antometal (Member)
Guru

Messaggi: 691
Iscritto: 12/09/2007

Postato alle 10:10
Domenica, 07/09/2008

se devi fare una lista, ,xk nn usi una listbox
cmq nella text1 dovresti avre solo un nome e una materia, xk quella precedente la sovrascrivi

cmq fa un esempio di come vorresti sia la textbox piena

()
Newbie

Messaggi:
Iscritto:

Postato alle 11:37
Domenica, 07/09/2008

non ho capito la domanda, ma invece che

Codice sorgente - presumibilmente Plain Text

Form2.Show

metti:

Codice sorgente - presumibilmente Visual Basic 6

Form1.Visible = False
Form2.Visible = True

Comunque non credo fosse questa la domanda :rotfl:

Ultima modifica effettuata da il 07/09/2008 alle 11:38

webb (Normal User)
Newbie

Messaggi: 5
Iscritto: 06/09/2008

Postato alle 11:57
Domenica, 07/09/2008

si essatto hai colpito proprio nel segno...ma come mai hai aggiunto un Text1.Text ????

ciao ciao

()
Newbie

Messaggi:
Iscritto:

Postato alle 11:58
Domenica, 07/09/2008

Testo quotato

Postato originariamente da webb:

si essatto hai colpito proprio nel segno...ma come mai hai aggiunto un Text1.Text ????

ciao ciao

IO???

Pagine: [ 1 2 ]