Torna indietro   Hardware Upgrade Forum > Software > Programmazione

Peugeot Polygon Concept: ecco il futuro delle utilitarie
Peugeot Polygon Concept: ecco il futuro delle utilitarie
Polygon è la concept car di Peugeot che mostra il futuro delle soluzioni del segmento B: tra design compatti e innovativi affiancati da dimensioni compatte uno scherzo dalla manovrabilità incredibile per le manovre a bassa velocità
Reno16 Pro: il compatto di OPPO punta su fotocamera da 200MP e il nuovo Bubble! La recensione
Reno16 Pro: il compatto di OPPO punta su fotocamera da 200MP e il nuovo Bubble! La recensione
OPPO ha portato in Italia, dal 1° luglio 2026, Reno16 Pro: display AMOLED da 6,32 pollici a 144Hz, tripla fotocamera con sensore principale da 200 megapixel, chip Dimensity 8550 Super e batteria da 6000mAh, al prezzo di lancio di 899 euro. Lo abbiamo provato per due settimane insieme al nuovo accessorio Bubble, per capire se la formula compatta della serie regge ancora di fronte a un listino da 1099 euro
 Hisense 55U7SE: tuttofare e accessibile, il MiniLED per film, sport e gioco
Hisense 55U7SE: tuttofare e accessibile, il MiniLED per film, sport e gioco
MiniLED di fascia media con local dimming a 192 zone, 144 Hz nativi e audio firmato Devialet. La prova strumentale riscontra colori affidabili e gaming reattivo, per un prodotto molto accessibile e convincente. Ma la soundbar aggiuntiva è quasi d'obbligo
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 19-05-2006, 18:48   #1
calabar
Senior Member
 
L'Avatar di calabar
 
Iscritto dal: Oct 2001
Messaggi: 14739
[VB6] Difficoltà a passare un controllo alla funzione

Il problema all'apparenza è semplice, ma non riesco a far funzionare una semplice funzione che deve prendere come parametro un datagrid.

Il nocciolo del codice è questo (ovviamente la funzione è più complessa):
Codice:
Private Sub Form_Load()
    setColumnWidth(DataGrid1,1000,1)
End Sub

Private Sub setColumnWidth(dataGr As Control, baseValue As Integer, col As Integer)
    dataGr.Columns(col).Width = baseValue - 220
End Sub
Ho provato ad impostare dataGr come Object, come Control, come dataGrid, ma nulla...

Se provo costruire la funzione così come la vedete, l'analizzatore sintattico di VB mi da errore (riga rossa per il codice di richiamo), pretendendo un = dopo il richiamo della funzione (per esempio con
Codice:
setColumnWidth(DataGrid1,1000,1) = variabileacaso
non da più l'errore).

Se invece costruisco la funzione con solo dataGr come parametro,
Codice:
Private Sub setColumnWidth(dataGr As Control)
nessun errore viene segnalato in scrittura, ma in compilazione mi segnala "Type mismatch".
Da notare che per sicurezza ho anche provato a controllare che il datagrid passato come parametro reale fosse effettivamente un oggetto (tramite la funzione isObject, e il risultato è positivo).

La documentazione e il manuale non mi hanno aiutato granchè...
Dove sta la magagna?

Grazie!

Ultima modifica di calabar : 19-05-2006 alle 18:51.
calabar è offline   Rispondi citando il messaggio o parte di esso
Old 20-05-2006, 08:27   #2
mynos79
Senior Member
 
Iscritto dal: Jun 2005
Città: Mestre (VE)
Messaggi: 1415
La sub nell' evento Load ... richiamala così, senza le parentesi tonde:

Codice:
setColumnWidth DataGrid1, 1000, 1
__________________
IN WIN 909 / AMD Ryzen 9 3950X / Gigabyte X570 Aorus Xtreme / 4x8gb G.Skill 3200 / Gigabyte Aorus RTX2080Ti Xterme / 2x Gigabyte Aorus NVMe M.2 1Tb / Corsair AX1200i / full liquid EK - Bitspower / circa 160 trattative nel mercatino
mynos79 è offline   Rispondi citando il messaggio o parte di esso
Old 20-05-2006, 10:29   #3
calabar
Senior Member
 
L'Avatar di calabar
 
Iscritto dal: Oct 2001
Messaggi: 14739
non ci credo... l'avevo anche provato O_o
Sai per caso spiegarmi in quali casi usare questo tipo di sintassi e perchè?
Non ho trovato nulla a riguardo...

comunque... Grande!! stavo ormai perdendo la speranza!!



Se ti va di darmi un altro piccolo aiutino, ho un'altra questione abbastanza semplice.
Volevo dichiarare un array globale.
- creo un modulo bas
- dichiaro al suo interno l'array come public
e fin qui tutto bene.

Ora però voglio anche inizializzare l'array con certi valori, e sul modulo BAS non è possibile (almeno così mi è parso!)
Devo inizializzarlo prima che gli altri form vengano caricati, e non ho ben capito dove ed eventualmente come questa inizializzazione dovrebbe essere fatta.
calabar è offline   Rispondi citando il messaggio o parte di esso
Old 20-05-2006, 12:31   #4
mynos79
Senior Member
 
Iscritto dal: Jun 2005
Città: Mestre (VE)
Messaggi: 1415
In genere le sub che richiedono parametri si chiamano in 2 modi.
1) usando CALL e le parentesi tonde:
Codice:
Call nomeSUB(par1, par2, par3)
2) usando semplicemente il nome della sub senza parentesi tonde:
Codice:
nomeSUB par1, par2, par3
Il perchè? eeehhhh, chiedilo a quelli che hanno inventato sto linguaggio

Per quanto riguarda l' array, lo dichiari nel modulo bas ad esempio così:
Codice:
Public vettore() as string
Poi nel form d' avvio (presumo Form1), nel suo evento Load, ridimensioni l' array con l' istruzione ReDim (ad esempio così):
Codice:
Private Sub Form_Load()
    ReDim vettore(5) As String
    vettore(0) = "a"
    vettore(1) = "b"
    vettore(2) = "c"
    vettore(3) = "d"
    vettore(4) = "e"
End Sub
Nei moduli in genere si fanno le dichiarazioni delle variabili (globali se usate anche in altri moduli o classi ... oppure private se vengono usate internamente nel modulo dalle funzioni o sub presenti) e la stesura delle sub e funzioni; le inizializzazioni si fanno solamente internamente a delle classe o a funzioni o sub ...
__________________
IN WIN 909 / AMD Ryzen 9 3950X / Gigabyte X570 Aorus Xtreme / 4x8gb G.Skill 3200 / Gigabyte Aorus RTX2080Ti Xterme / 2x Gigabyte Aorus NVMe M.2 1Tb / Corsair AX1200i / full liquid EK - Bitspower / circa 160 trattative nel mercatino
mynos79 è offline   Rispondi citando il messaggio o parte di esso
Old 20-05-2006, 15:52   #5
calabar
Senior Member
 
L'Avatar di calabar
 
Iscritto dal: Oct 2001
Messaggi: 14739
Grazie!

Per il richiamo delle funzioni, l'avevo sempre fatto con le parentesi, senza Call...
Fino a quando non ho provato ad usare un oggetto, non mi aveva mai dato problemi!!

Per l'array globale. al momento ho un MDI Form e 4 form generici, inizializzo nell'MDI?
Mi pare farlo però mi avesse dato problemi, e avessi problemi ad accedere ai dati dagli altri form... ma era una delle prime prove, potrei sbagliarmi.

PS: in effetti l'uso dei moduli BAS è ancora un po' oscuro... non ho ancora trovato nella guida un paragrafo che lo spegasse bene.
Quindi posso usarli per:
- dicharare variabili globali
- dichiarare variabili provate, solo se utilizzate da funzioni anch'esse dichiarate nel modulo BAS
- dichiarare funzioni (ma se queste hanno al loro interno valori da inizializzare? O_o )
calabar è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


Peugeot Polygon Concept: ecco il futuro delle utilitarie Peugeot Polygon Concept: ecco il futuro delle ut...
Reno16 Pro: il compatto di OPPO punta su fotocamera da 200MP e il nuovo Bubble! La recensione Reno16 Pro: il compatto di OPPO punta su fotocam...
 Hisense 55U7SE: tuttofare e accessibile, il MiniLED per film, sport e gioco Hisense 55U7SE: tuttofare e accessibile, il Min...
Kindle Scribe Colorsoft: riduce le cornici e diventa a colori, ma il prezzo è alto Kindle Scribe Colorsoft: riduce le cornici e div...
L'IA cambia tutte le regole della sicurezza tra vulnerabilità e sorveglianza. Intervista al CEO di Proofpoint L'IA cambia tutte le regole della sicurezza tra ...
Apple potrebbe aver sospeso il progetto ...
Nintendo non seguirà l'esempio di...
Motorola ha lanciato un'app dedicata all...
Cyberpunk 2077 non si ferma e raggiunge ...
Samsung alza ancora i prezzi delle memor...
4 sconti tutti nuovi riscrivono la TOP 1...
Portatile HP con Intel Core Ultra 7 155H...
Smart TV Haier 50'' 4K crolla a 225,99€ ...
Google Pixel 10a a 399€ o 497€ (256GB) c...
Compare dal nulla e blocca lo schermo: c...
Tornano i super prezzi Nikon su Amazon, ...
Compatto, leggerissimo (1,2Kg), ma con 3...
Privacy Display per tutti i Galaxy S: Sa...
Le migliori cuffie in offerta su Amazon ...
SpaceX Starship: Ship 40 ha eseguito un ...
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: 06:39.


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