Torna indietro   Hardware Upgrade Forum > Software > Programmazione

ASUS NUC 15 Pro e NUC 15 Pro+, mini PC che fondono completezza e duttilità
ASUS NUC 15 Pro e NUC 15 Pro+, mini PC che fondono completezza e duttilità
NUC 15 Pro e NUC 15 Pro+ sono i due nuovi mini-PC di casa ASUS pensati per uffici e piccole medie imprese. Compatti, potenti e pieni di porte per la massima flessibilità, le due proposte rispondono in pieno alle esigenze attuali e future grazie a una CPU con grafica integrata, accompagnata da una NPU per la gestione di alcuni compiti AI in locale.
Cybersecurity: email, utenti e agenti IA, la nuova visione di Proofpoint
Cybersecurity: email, utenti e agenti IA, la nuova visione di Proofpoint
Dal palco di Proofpoint Protect 2025 emerge la strategia per estendere la protezione dagli utenti agli agenti IA con il lancio di Satori Agents, nuove soluzioni di governance dei dati e partnership rafforzate che ridisegnano il panorama della cybersecurity
Hisense A85N: il ritorno all’OLED è convincente e alla portata di tutti
Hisense A85N: il ritorno all’OLED è convincente e alla portata di tutti
Dopo alcuni anni di assenza dai cataloghi dei suoi televisori, Hisense riporta sul mercato una proposta OLED che punta tutto sul rapporto qualità prezzo. Hisense 55A85N è un televisore completo e versatile che riesce a convincere anche senza raggiungere le vette di televisori di altra fascia (e altro prezzo)
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 24-12-2007, 18:34   #1
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2805
[VB.NET] Creare un ciclo

Devo stampare un foglio dove ci sono molti controlli tutti rinominati in ordine crescente

ad esempio: txtNome01 - txtNome02 - txtNome03 - txtNome04

E cosi via dicendo. in pratica devo riempire un foglio prestampato con dei dati

io volevo creare una ciclo che da solo mi modificava il nome della txt in questione

ad esempio

dim i as integer
i= "1"

(txtnome & i).text = "........valore"

poi incremetare di uno

i = i + 1

mi dite la sinstassi corretta di questa riga:


(txtnome & i).text = "........valore"

devo creare una parte fissa (txtnome) e la parte variabile.

come posso fare??????

Ciao e grazieeeeeee

P.S.: Auguri di Buon Natale!!!!
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 25-12-2007, 01:51   #2
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2805
Spiegazione

Ti faccio un esempio

dichiaro il mio report

dim report as new stampafoglio

report.txtNome1.text = "Valore"
report.txtNome2.text = "Valore"
report.txtNome3.text = "Valore"
report.txtNome4.text = "Valore"
report.txtNome5.text = "Valore"
report.txtNome6.text = "Valore"
.
.
.
report.txtNome60.text = "Valore"


non volevo farlo a mano
quindi cercavo un qualcosa per sostituire il numero txtnome con un contatore che incrementavo

solo che se scrivo

report.txtNome & "i".text = "Valore"
cosi scritta la sintassi è sbagliata

qualcuno sa dirmi come creare questa stringa????

ciao e grazieeeeeeeee
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 25-12-2007, 04:57   #3
^TiGeRShArK^
Senior Member
 
L'Avatar di ^TiGeRShArK^
 
Iscritto dal: Jul 2002
Città: Reggio Calabria -> London
Messaggi: 12112
..ma mettere tutto in un array o in una lista e scorrerti ogni elemento e assegnargli valore?
__________________
^TiGeRShArK^ è offline   Rispondi citando il messaggio o parte di esso
Old 25-12-2007, 09:05   #4
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2805
Si

Quote:
Originariamente inviato da ^TiGeRShArK^ Guarda i messaggi
..ma mettere tutto in un array o in una lista e scorrerti ogni elemento e assegnargli valore?
Si sarebbe bello, per chi lo sa fare!!!!!!!!

ahahahah

Fammi un regalino di natale.....scrivimi un esempio

Ciao e grazieeeeeeee
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 25-12-2007, 15:40   #5
^TiGeRShArK^
Senior Member
 
L'Avatar di ^TiGeRShArK^
 
Iscritto dal: Jul 2002
Città: Reggio Calabria -> London
Messaggi: 12112
...è da una o due vite che non tocco il VB (x fortuna )
..cmq dovrebbe essere qualcosa del genere:
Codice:
Dim textBoxes As Array()
Dim textBox As TextBox
Dim i As Integer

textBoxes = New TextBox(60)  REM sempre se il tipo di txtNomex è textBox.
For i = 1 To textBoxes.length
    textBox = New TextBox()
    textBox.text = "Valore"
    textBoxes(i) = textBox
Questo ovviamente in fase di creazione del report.
In fase di lettura ti fai restituire dal report l'array di textBoxes e fai tutto quello che ti pare iterando elemento per elemento.

...certo che però fare un programma in VB senza avere idea di array e cicli....
__________________
^TiGeRShArK^ è offline   Rispondi citando il messaggio o parte di esso
Old 25-12-2007, 16:50   #6
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2805
Errore

Quote:
Originariamente inviato da ^TiGeRShArK^ Guarda i messaggi
...è da una o due vite che non tocco il VB (x fortuna )
..cmq dovrebbe essere qualcosa del genere:
Codice:
Dim textBoxes As Array()
Dim textBox As TextBox
Dim i As Integer

textBoxes = New TextBox(60)  REM sempre se il tipo di txtNomex è textBox.
For i = 1 To textBoxes.length
    textBox = New TextBox()
    textBox.text = "Valore"
    textBoxes(i) = textBox
Questo ovviamente in fase di creazione del report.
In fase di lettura ti fai restituire dal report l'array di textBoxes e fai tutto quello che ti pare iterando elemento per elemento.

...certo che però fare un programma in VB senza avere idea di array e cicli....
Mi da errore

textBoxes = New TextBox(60) REM sempre se il tipo di txtNomex è textBox.
For i = 1 To EserciziTotale
textBox = New TextBox()
textBox.Text = "Valore"
textBoxes(i) = textBox
Next

Impossibile convertire il valore di tipo "System.Windows.Form.TextBox" in "System.Array"
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 25-12-2007, 17:04   #7
^TiGeRShArK^
Senior Member
 
L'Avatar di ^TiGeRShArK^
 
Iscritto dal: Jul 2002
Città: Reggio Calabria -> London
Messaggi: 12112
Quote:
Originariamente inviato da OrcaAssassina Guarda i messaggi
Mi da errore

textBoxes = New TextBox(60) REM sempre se il tipo di txtNomex è textBox.
For i = 1 To EserciziTotale
textBox = New TextBox()
textBox.Text = "Valore"
textBoxes(i) = textBox
Next

Impossibile convertire il valore di tipo "System.Windows.Form.TextBox" in "System.Array"
perchè ovviamente ho sbagliato nel Dim
Codice:
Dim textBoxes As TextBox()
Dim textBox As TextBox
Dim i As Integer

textBoxes = New TextBox(60)  REM sempre se il tipo di txtNomex è textBox.
For i = 1 To textBoxes.length
    textBox = New TextBox()
    textBox.text = "Valore"
    textBoxes(i) = textBox
__________________
^TiGeRShArK^ è offline   Rispondi citando il messaggio o parte di esso
Old 26-12-2007, 01:37   #8
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2805
Ok

Domani mattina provo poi ti faccio sapere
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 26-12-2007, 09:01   #9
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2805
Niente

textBoxes = New TextBox(60) REM sempre se il tipo di txtNomex è textBox.
For i = 1 To textBoxes.length
textBox = New TextBox()
textBox.text = "Valore"
textBoxes(i) = textBox

La classe "System.Windows.Form.TextBox" non può essere indicizzata perchè non contiene proprietà predefinite.


Basta me so stufato.......rinuncio!!!!!!!!!


Ciao e grazieeeeeeeeeeeee

Anche perchè ragionando sul codice, non mi sembra adatta a quello che mi serve.....perchè una volta creato l'array che ci faccio, lo devo asseggnare ai controlli, sono proprio quelli dove ho il problema. cioè tutti controli diversi che differenziano solo per il numero finale.
Io il mio array ce l'ho già....è un dataset da passargli.

Ciao e grazie lo stesso
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


ASUS NUC 15 Pro e NUC 15 Pro+, mini PC che fondono completezza e duttilità ASUS NUC 15 Pro e NUC 15 Pro+, mini PC che fondo...
Cybersecurity: email, utenti e agenti IA, la nuova visione di Proofpoint Cybersecurity: email, utenti e agenti IA, la nuo...
Hisense A85N: il ritorno all’OLED è convincente e alla portata di tutti Hisense A85N: il ritorno all’OLED è convi...
Recensione Borderlands 4, tra divertimento e problemi tecnici Recensione Borderlands 4, tra divertimento e pro...
TCL NXTPAPER 60 Ultra: lo smartphone che trasforma la lettura da digitale a naturale TCL NXTPAPER 60 Ultra: lo smartphone che trasfor...
Steelseries Arctis Nova Elite: le prime ...
30 anni di PlayStation da indossare: arr...
Amazon lancia gli Echo più potent...
Amazon rinnova la gamma Fire TV: ecco le...
Ring lancia le sue prime videocamere con...
Blink amplia la gamma di videocamere di ...
Jaguar Land Rover riprende (gradualmente...
HONOR inaugura il primo ALPHA Flagship S...
Yamaha: ecco il brevetto del 'finto moto...
'Console obsoleta e utenti ingannati': u...
Stop al ransomware su Google Drive, graz...
L'IA è la nuova interfaccia utent...
Battlefield 6: confermata la dimensione ...
Windows 11 porta il Wi-Fi 7 alle aziende...
Logitech MX Master 4 subito disponibile ...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 21:02.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Served by www3v