Esercizi VISUAL BASIC

[matpez]

NO!

Voglio che mi crei un vettore già mischiato (che poi lo tramuterai in record) ma per adesso fai il vettore!

Voglio che mi controlli che in caso di randon dello stesso numero lui nn lo metta e cmq i numeri da randomizzare nn sono da 1 a 32 ma solo da 7 a 13 (dal 7 al rè)

[matpez]

Originariamente inviato da leadergl
ma come diamine si dichiarano i record in VB?? qui mi parla solo di array e che cavolo!!!

Così lo crei:

Private Type RecordMazzoCarte
  nSeme           As Integer
  nNumero         As Integer
End Type

E così lo dichiari...

Dim recMazzo(32)    As RecordMazzoCarte

[leadergl]

ahah.....e no....e no....e no!!!!

ora è ok MA.....non è scalabile.....non posso scegliere se averla più grande o più piccola.......

so k ti rompo le palle, ma come te voglio che anche tu dia il massimo nelle cose.....


cmq per i record...??

[leadergl]

ah ecco...stavo pensando ad una cosa del genere ma non sapevo se era ok...thanks

[matpez]

Originariamente inviato da leadergl
ahah.....e no....e no....e no!!!!

ora è ok MA.....non è scalabile.....non posso scegliere se averla più grande o più piccola.......

Ma infatti nn deve essere scalabile....altrimenti la carta si sfalda...hai mai visto un gioco della M$ con la carte + grosse di quelle dimensioni?

Se utilizzi la 1280x 1024 come risoluzione nn è colpa mia

[leadergl]

si lo so....PERO' devi dare la possibilità alla gente "malata" e "bastarda" di poter anche rimpicciolire a dismisura o ingrandire a dismisura, eheh..............dai che non credo sia difficile.......almeno per te....

[leadergl]

allora il meglio che son riuscito a fare per il DISORDINAMENTO è:

For i = 1 To 32
__a = Int((32 - i + 1) * Rnd + i)
__temp = vettore(i)
__vettore(i) = vettore(a)
__vettore(a) = temp
Next


non è il massimo ma fa il suo dovere

[matpez]

Originariamente inviato da leadergl
si lo so....PERO' devi dare la possibilità alla gente "malata" e "bastarda" di poter anche rimpicciolire a dismisura o ingrandire a dismisura, eheh..............dai che non credo sia difficile.......almeno per te....

Non è questione di farlo o nn farlo...è questione che ti sei fissato su una cosa scorretta
E' stata una mia disattenzione quella cosa li, però poi mi sono reso conto che quando uno crea la carta (come hai fatto tu nel tuo progetto) diventa orribile soprattutto a chi nn ha la tua stessa risoluzione!
Dato che la carta ha una determinata dimensione, questa deve rimanere tale!

Poi un altra cosa , la smetti di fissarti sulle cose grafice, che in VB vengono per ultime, prima abbozzi il progetto...poi ti fai il c...o nel codice ed infine pensi a tutte le cose belle da mettere

Molte persone pensano che VB sia molto facile e poi che messe le cose sui form il resto è una bazzeccola!
Ma si tratta sempre di scrivere del codice e per esempio nel mio programma che faccio nel tempo libero da circa 6 mesi sono arrivato ad circa 480 pagine di codifica , per cui nn è tutto facile

Queste parole sono per dirti che a volte sei molto dispersivo su cose che a volte non sono utili al fine dello scopo di questo 3d, cioè imparare VB!
Io sono disposto a insegnarti quello che ti serve per camminare da solo però vorrei che ti contrenti + sul codice e meno sull'aspetto (quello come ho già detto arriverà dopo)....

...non tutti hanno avuto la fortuna di avere un "insegnante" di VB


DAAAAAAAAAAAAAAAAAAAAAIIIIII che ti voglio battere a poker!

[leadergl]

che programma stai realizzando???

fichissimo.........quante pagine ................mi esaltano ste cose.................ok MI METTO D'IMPEGNO SUL CODICE VERO E PROPRIO, il fatto è che in tanti anni di pascal ho visto e stravisto miliardi di linee di codice, allora mo che posso usare un po di grafica mi esalto e perdo tempo...........so che è sbagliato, ma anche un tizio che non ha mai assaggiato la NUTELLA, una volta provata non può farne a meno...........ed io ..... beh, sto diventando grafica dipendente.....


cmq dai che mi impegno, domani mattina non devo neanche andare all'univ, così avrò tanto tempo per programmare seriamente..................

[matpez]

Originariamente inviato da leadergl
allora il meglio che son riuscito a fare per il DISORDINAMENTO è:

For i = 1 To 32
__a = Int((32 - i + 1) * Rnd + i)
__temp = vettore(i)
__vettore(i) = vettore(a)
__vettore(a) = temp
Next


non è il massimo ma fa il suo dovere

Mi piacerebbe (per questioni di tempo) che tu lo creassi questo vettore già mischiato

[matpez]

Originariamente inviato da leadergl
che programma stai realizzando???

fichissimo.........quante pagine ................mi esaltano ste cose.................

480 Pagine al massimo che sono riuscito ad ottimizzare il codice!

E' un programma nato per me ed utilizza una dll che ci sto lavorando da circa un anno!!
Questa dll racchiude il mio sapere di VB!
Cmq il programma sembra piccolino ma è dotato di tante cose che almeno a me ed ad alcuni è utile

Originariamente inviato da leadergl
cmq dai che mi impegno, domani mattina non devo neanche andare all'univ, così avrò tanto tempo per programmare seriamente..................

BRAVOOOOOOOOOOOOOOO!!

[leadergl]

ora vado a dormire, ci si vede domani......ancora grazie e ciao!!

un'ultima domanda.......in un linguaggio come il VB, come fai prescindere dall'interfaccia grafica durante la programmazione??

[matpez]

Cioè intendi come si fa a creare un progetto in VB senza grafica...

Se è così è semplice, basta che crei un modulo e ci metti una bella procedura chiamata Sub Main(), nella proprietà del progetto anzichè dire che parta dalla formmain parta dalla Sub Main ed il gioco è fatto! Hai un programma in VB che nn si vede

[leadergl]

senti ma avendo un file di VB già compilato senza i codici sorgenti, c'è un modo di risalire a questi ultimi????

ovvero ad esempio il mio programma della chat, se perdessi i sorgenti c'è una specie di "decompilatore" VB che mi permetterebbe di recuperarli dal mio EXE???

[matpez]

Originariamente inviato da leadergl
senti ma avendo un file di VB già compilato senza i codici sorgenti, c'è un modo di risalire a questi ultimi????

ovvero ad esempio il mio programma della chat, se perdessi i sorgenti c'è una specie di "decompilatore" VB che mi permetterebbe di recuperarli dal mio EXE???

Qui siamo al limite dei regolamente del forum, per cui ti prego di nn insistere...

Per VB5/6 nn esiste perchè la complessita di codifica di un EXE da un file p-code è impossibile da tornare alla sorgente!
Per VB3 il compilato nn era così complesso per cui esistono decompilatori per VB3!

PS: una domanda del genere mi puzza , non vorrai mica prendere un EXE e vedere cosa c'è sotto vero? e nn farlo tu da capo?

[leadergl]

no, assolutamente! è che la cosa era sfiziosa!!!

i programmi mi piace farli da me, magari con qualche piccolo aiuto (il tuo).............ma non COPIARLI........è un cosa brutta ed indegna per un programmatore!!!

è che è una cosa molto fica fare il percorso all'indietro dei propri programmi!

[leadergl]

ho trovato un file su come si gioca al poker..............è un casino

[matpez]

Originariamente inviato da leadergl
no, assolutamente! è che la cosa era sfiziosa!!!

i programmi mi piace farli da me, magari con qualche piccolo aiuto (il tuo).............ma non COPIARLI........è un cosa brutta ed indegna per un programmatore!!!

è che è una cosa molto fica fare il percorso all'indietro dei propri programmi!

lo so , ma è ILLEGALE!

[matpez]

Originariamente inviato da leadergl
ho trovato un file su come si gioca al poker..............è un casino

Un problema alla volta

Incomincia nel fare il gioco senza i casi particolari, cioè il vedo nn vedo e cose varie, fai che tutti i giocatori hanno diritto a cambiare le carte una volta e quelle che hanno saranno le loro definitive!

Poi man mano metti altre cosine dentro!

[leadergl]

ho un problema nella gestione del modulo..........help