mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Traduttori automatici!!! HAAAYAAAA!

TROOOOPPO FORTE
traduzione automatica presa dal sitoWINSQUAD.NET
------------------
Prodotti del freeware da Winsquad
[ Tabella Ricaricata ]
Screesaver ricaricato tabella (ufficioso)
Lo screensaver ricaricato tabella è un risparmiatore dello schermo della
tabella del openGL del freeware che allineare captivates lo spirito del
movie della tabella, della tabella ricaricata e dei seguiti di giri della
tabella. Caratterizzando le foto dei heroes & dei foes (neo, Morpheus,
trinità, agente Smith, ecc presentato in uno slideshow freddo), dello
scrolling di emulazione di codice della tabella verticalmente giù il vostro
schermo del calcolatore, di un orologio digitale di stile freddo della
tabella e delle canzoni originali mp3 dalla pellicola, questo screensaver
della caramella dell'occhio è suggerito a tutti i ventilatori della TABELLA.
Facile installi, nessun nags e le opzioni grandi di adattamento rendono a
questo risparmiatore dello schermo della tabella quello ad uso. Liberi La
Vostra Mente!
ALLORA, SIETE ANCHE VOI VENTILATORI DELLA TABELLA?

 ALLORA, SIETE ANCHE VOI VENTILATORI DELLA TABELLA?
ROTFL                    ROTFL
                ROTFL                      ROTFL
ROTFL                     ROTFL
                                                    ROTFL
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: looking for VB programmer

I'm looking for a Visual Basic 6.0 programmer for casual work.  I've
taken on a project that I need help with as I am quickly approaching the
deadline.  The program is relatively simple, however,  I am new to the
world of object oriented programming and have been spending most of my
time creating the forms needed.  I have not yet figured out how to use
modules, functions and subroutines.
If anyone in the Ottawa Ontario area is interested, please contact me at
al_be...@sympatico.ca
 with desired hourly rates.  The project
shouldn't take more that a few hours.  Students welcomed.
Al..

 shouldn't take more that a few hours.  Students welcomed.
If you don't know how to write it yourself then how do you know how long it
is going to take for somebody else to write it for you?
There are probably people who would take this stuff on (if you posted to the
correct Newsgroup) but they would probably insist that they got *all* the
money and you got just a teeny little referral fee! Building the Forms (the
bit that you have done) is the easy bit!
Mike

Roughly rephrased :-
 "non-programmer looking for really inexperienced programmer"

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] CopyMemory

Ciao a tutti,
    guardate un po' qui:
1) Ho una classe (una qualsiasi, anche vuota) userò Class1 con una sola
property Let/Get x() as long
2) Ho una funzione:
Private Function Func(FirstOfArray As Class1, ByVal nCount As Long)
    Dim i As Long
    Dim a As New Class1
    For i = 0 To nCount - 1
        'Copio su a il puntatore dell'elemento FirstOfArray + (i * 4)
        Call CopyMemory(ByVal VarPtr(a), ByVal (VarPtr(FirstOfArray) + (i *
4)), 4)
        Debug.Print a.x
    Next i
End Function
3) Richiamo la funzione (2)
    Dim d(0 To 2) As New Class1
    d(0).x = 100
    d(1).x = 50
    d(2).x = 150
    Func d(0), 3
Func dovrebbe funzionare come l'api Polygon che passando il primo elemento
dell'array ne ricava i successivi.
La copymemory sembra funzionare, prova ne è che il Debug.print è corretto,
ma una volta che si esce dallo scope di Func VB va in crash.
Sembrerebbe il tipico errore da mancato rilasci di risorse, ma non riesco a
capire dove e perchè!
Qualcuno mi sa spiegare cosa mi sfugge?

 dell'array ne ricava i successivi.
Posto che non so risolvere il problema, mi sfugge l'utilitą. Non puoi
passare l'intero array?
Ciao
*Roby*

*Roby*
Certo sarebbe più semplice :)
Ma sto facendo una DLL con le dichiarazioni delle API più comuni in modo da
non dovermele dichiarare ogni volta, ed alcune (es. la Polygon) legge
l'array passandogli il primo vertice, e non l'intera matrice.
Volevo fare in modo da non modificare il concetto.
Comunque ho risolto il problema salvandomi il puntatore e ripristinandolo
prima di uscire dallo scope.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: hyperion - thunder

 
pcle...@ameritech.net

 wrote in message Rcuc4.5452$N1.7...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Quesito: è possibile ruotare un controllo

E' possibile ruotare su se stesso un controllo posizionato su un form?
Esistono eventualmente funzioni dell'API di windows che lo permettono?
Un grazie in anticipo a chiunque possa rispondere al quesito.
Maurizio
hil...@tin.it

Un controllo no; puoi ruotare un'immagine, se vuoi (immagine che rappresenta
il controllo, ovviamente).
Umberto Meroni
umb...@vbp.it
---
Sito Visual Basic: 
http://www.vbp.it
Sito Comune VB: 
http://www.murialdo.it/it_lang_vb
---

Newsgroup: it.comp.lang.visual-basic
Titolo: programmare palmare

ciao
vorrei fare un programma per palmare! si tratta di un grande database con
info di  natura medica.
vorrei utilizzare un software gratuito e semplice...non è che esiste??
non mi intendo di programmazione, ma potrei studiare! m i conviene? o è
meglio rivolgersi ad un programmatore?
ogni consiglio è ben accetto!!
tia

 ha scritto nel messaggio
news:OErk8.22134$1S3.6...@twister1.libero.it...

Per creare programmi per palmari Microsoft PocketPC, esiste la piattaforma
Microsoft eMbedded Visual Tools 3.0 che puoi scaricare (304 MB!)
gratuitamente dal sito Microsoft
http://www.microsoft.com/mobile/developer/downloads/emvt30/
, oppure puoi
ordinare il CD (paghi solo le spese di spedizione). eMbedded Visual Tools
3.0 comprende eMbedded Visual Basic e eMbedded Visual C++.
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)

 ha scritto nel messaggio
news:dUrk8.22227$1S3.6...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda sulla Execute

Salve a tutti.
Secondo voi e' corretto usare sempre la seguente sintassi per eseguire,  
controllare il successo di una query e forzare il refresh del database 
sulla rete?.
<codice>
'dichiarazioni
Set Db = New Connection
Db.CursorLocation = adUseClient
Db.Open Provider
QryAppo = "UPDATE ....."
On Error GoTo Err_Execute
Cn.BeginTrans
Cn.Execute QryAppo, , adExecuteNoRecords
Cn.CommitTrans
On Error GoTo 0
Err_Execute:
   If Db.Errors.Count > 0 Then
      For Each errLoop In Db.Errors
         MsgBox "Errore numero: " & errLoop.Number & vbCr & _
            errLoop.Description
      Next errLoop
   End If
 
   Resume Next
</codice>
Grazie e saluti a tutti.
Paolo.



 Secondo voi e' corretto (snip)
ripostare lo stesso messaggio dopo 20 minuti?
--
Salutoni
Sergio

 [SNIP]
Postando lo stesso messaggio a distanza di 20 minuti hai
senz'altro perso la possibilita' di ottenere una risposta da
una buona fetta dei frequentatori del newsgroup.
Auguri per la tua questione.
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org

 del database sulla rete?.
NO.
Per due motivi:
1) se l'execute fallisce, devi forzare un rollback. E' vero che alcuni
sistemi (tipo MSDE o Sql-Server), consentono l'auto-rollback, ma altri no,
quindi devi imparare a gestirlo.
Quindi, la cosa migliore è utilizzare due diversi gestori di errore: uno per
errori ovunque nel codice, e uno per errori durante una transaction aperta.
2) Col Resume Next, ti porti su un CommitTrans, che è invece proprio ciò che
occorre evitare.
Qui andrebbe fatta una bella disquisizione sul fatto che gli Update sono in
effetti operazioni atomiche, e in quanto tali per propria natura
transazionali. Tuttavia, un Update che tocchi molte righe, e che si inchiodi
a metà, potrebbe lasciare (soprattutto su sistemi come Access), alcune righe
modificate e altre no. Quindi il RollBak DEVE essere forzato in caso di
errore.
Ciao
Alberto
--
E non so se avrò gli amici a farmi il coro,
o se avrò soltanto volti sconosciuti,
canterò le mie canzoni a tutti loro
e alla fine della strada
potrò dire che i miei giorni li ho vissuti...

Scusate ho ripostato lo stesso messaggio non per pedanteria, ma perche' 
durante l'invio ha crashato il Pc e riscaricando la lista dei messaggi 
dopo 10 minuti non ho visto il mio messaggio nell'elenco.
Cumunque rilassiamoci, c'e' di peggio.
Saluti 
Paolo.


 
Ti ringrazio.
Paolo

Newsgroup: it.comp.lang.visual-basic
Titolo: da matrice a db

Esiste un modo veloce per trasferire i dati di una matrice ad una tabella?
GRAZIE A TUTTI

 tabella? GRAZIE A TUTTI
Cicla la matrice eseguendo le INSERT INTO
ciaociao
Newsgroup: it.comp.lang.visual-basic
Titolo: Software Microsoft

Vendo software Microsoft:
-Windows XP PRO e HOME
-Office XP PRO e STD
-Visual Studio .Net PRO
A metà del prezzo di listino. Sono ancora sigillati e posso attestare che
non sono rubati.
Scrivetemi per maggiori informazioni

E per quale motivo te ne "disfai" alla metà del prezzo
se non sono rubati?
O sei rockfeller che hai investito milioni in un acquisto
di non sò quante licenze fino ad averle ad un prezzo
stracciato tanto da permetterti di rivenderle alla
metà del prezzo con un largo margine ...
o qualche tuo cliente bonario ti ha regalato le licenze
in questione ... (beato te che hai questi clienti)
o chissà da dove diavolo arrivano.
Saluti
Andrea

metà del prezzo con un largo margine ...
Potrebbe aver comprato (quindi non ricevuti come OEM con l'hardware)
detti software e poi aver cambiato
mestiere, ad esempio, e non avrebbe quindi piu' bisogno
di essi.
In passato ho vissuto un duro periodo durante
il quale per sopravvivere ho dovuto disfarmi a poco
di beni di mia proprieta', rimettendoci, ma avevo necessita'
di "fare cassa".
-- 
ciao, hal

 di essi.
oppure č fallito un negozio nella sua zona e lui ha rastrellato le licenze
disponibilia a qualche asta giudiziaria.........
Ciao
Davide


Oppure lavora alla Microsoft o conosce un dipendente.
Se non ricordo male, i dipendenti M$ possono acquistare
a prezzi stracciati i software, credo però in numero limitato...
Saluti,
Pusky

 ha scritto

si', come quello che si e' comprato 9 milioni di dollari di sw per uso
personale.
a parte che poi se l'e' ovviamente rivenduto,
nessuno in ms che si sia chiesto quanti cappero di pc avesse in casa
il tizio...
$9,000,000 ...

Sono ancora sigillati
Il che mi sembra strano che uno fa un certo tipo di acquisto poco prima di
"fallire"...
A meno che lui non avesse un negozio che fallendo ha da svendere.
Al3x
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto! migrazione vb6

Salve. Ho installato 
vs.net
 2003 e ho provato per qualche giorno la
funzione di migrazione da vb6. Fino a ieri si e' comportato bene. Oggi
ogni volta che provo ad aprire un progetto vb6 per convertirlo mi da'
il messaggio: "Lo strumento di migrazione di vb6 non e' installato in
questo computer". Ho provato il 'ripristino' del 
vs.net
,  ma non ho
risolto niente. Come devo fare? Grazie.
Baguette

 ha scritto nel messaggio 
news:43ad60c0...@powernews.libero.it...



Grazie. L'avevo in parte capito vedendo il risultato delle prime
conversioni con roba come 150 messaggi di errore. Ma che addirittura
lo 'strumento' sparisse dal sistema, oddio, stavo per dire che non me
l'aspetttavo. Invece purtroppo ormai ci si deve aspettare di tutto.
In aggiunta, il sistema operativo (win xp) si rifiuta di
disinstallare. Ho capito che succede qualcosa dopo alcuni interventi
con un "reg cleaner". Bah, devo ricorrere a una serie di backup e
restore del sistema.
A parte le notizie della MS, si sa se per caso il vs 2005 ha uno
strumento di conversione che funzioni un po' meglio?
Baguette

 strumento di conversione che funzioni un po' meglio?
Lascia perdere questo tipo di wizard, assomigliano a quel merraviglioso e 
eccitante  partener che ti molla a due dita dall'obbiettivo.
Gli errori e le correzioni suggerite dalla conversione, se non si sanno 
interpretare ti bloccano, se li sai, la conversione è una perdita di tempo.
Ave
giuseppeD
---
CCR 

 strumento di conversione che funzioni un po' meglio?
vedi tu, arrivato adesso il mail
http://blogs.msdn.com/brad_mccabe/archive/2005/12/19/505692.aspx
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] ContextMenu

Ho bisogno di aggiungere un contextmenù (già creato) ad un controllo
mantenendo però le voci di menù standard (taglia, copia, incolla...), come
si fa?
forse devo usare "MergeMenu" con un menù di sistema?
Grazie
    Nadir

"Nadir" <s.n...@NOSPAMlibero.it> ha scritto nel messaggio
news:LnRkb.50909$vO5.1...@twister1.libero.it...

NomeOggetto.ContextMenu = ContextMenu1
Ave
giuseppeD

 ha scritto nel messaggio
news:hMRkb.317514$R32.10...@news2.tin.it...


"Nadir" <s.n...@NOSPAMlibero.it> ha scritto nel messaggio
news:S7Skb.51027$vO5.1...@twister1.libero.it...

Dovresti rispondere alla fine del post.
Ho tre ContextMenu
Se eseguo il MergeMenu, come segue:
ContextMenu1.MergeMenu(ContextMenu2)
ContextMenu1.MergeMenu(ContextMenu3)
Me.DataGrid1.ContextMenu = ContextMenu1
Ottengo in fila, nel ContextMenu1, tutti i menu dei tre ContextMenu
Ave
giuseppeD

 ha scritto nel messaggio
news:NBSkb.317853$R32.10...@news2.tin.it...

E dove vado a prendere il ContextMenù riginale? mi spiego meglio:
Se leggo la proprietà Me.DataGrid1.ContextMenu mi restituisce il valore
Nothing, questo controllo però utilizza il contextMenù standard.
Come faccio ad effettuare il merge tra quello standard e il mio
personalizzato?
Grazie
   Nadir

"Nadir" <s.n...@NOSPAMlibero.it> ha scritto nel messaggio
news:7KSkb.51151$vO5.1...@twister1.libero.it...

Non capisco.
Hai costruito un ContextMenu personalizzato che la proprietà del componente:
NomeComponente.ContextMenu =nomeContextMenu
rifiuta ?
Ave
giuseppeD

 ha scritto nel messaggio
news:eyVkb.319157$R32.10...@news2.tin.it...

Toglie le voci che avresti se non selezioni il contextMenu (Taglia, Copia,
Incolla.....)

 Copia, Incolla.....)
e tu, per favore, "taglia" qualche pezzettino del post a cui rispondi :-)
--
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo
Newsgroup: it.comp.lang.visual-basic
Titolo: Chi ha fatto il login?

Ciao a tutti!
Come si fa a sapere qual'è l'utente attuale di Windows?
In parole povere, premendo il pulsante Start di Windows, subito sopra a
"Chiudi sessione.." c'è scritto "Disconnetti.." e poi il nome. Ebbene, io
vorrei sapere come si fa ad ottenere quel nome.
In anticipo, GRAZIE.
ZaZà

 ha scritto nel messaggio
news:Hdw77.13245$Pb6....@news1.tin.it...

API GetUserName
ciao
ugo

leggi la variabile di ambiente %USERNAME% (quantomeno, io la ho...prompt di
dos e digita set, vedi se compare)

 ha scritto nel messaggio
news:9jm4fq$6p8$1...@lacerta.tiscalinet.it...


 wrote in message
news:Hdw77.13245$Pb6....@news1.tin.it...

Set x = CreateObject("wScript.Network")
Debug.Print x.UserName
Ciao
Enrico

Newsgroup: it.comp.lang.visual-basic
Titolo: Tasto destro del mouse su un command button

Ciao a tutti,
sapreste indicarmi come far apparire, cliccando con il tasto destro su un
command button,
una tendina con un testo da me scritto?
Grazie per gli eventuali aiuti

 Grazie per gli eventuali aiuti
ciaociao

Newsgroup: it.comp.lang.visual-basic
Titolo: valore random

vorrei che qualcuno mi spiegasse come posso attribuire un valore random a un
label.
grazie

 ha scritto nel messaggio
news:8g35s9$b58$1...@news.mclink.it...


...


Newsgroup: it.comp.lang.visual-basic
Titolo: ADO. COME LO CONNETTO ALL'MDB?

APRO UN MDB CON CODICE (OPENDATABASE). POI INSERISCO UN ADO CONTROL SU UN
FORM E ANDANDO A IMPOSTARE LA PROPERIETA' CONNECTIONSTRING(CON MASCHERA
GUIDATA) MI ACCORGO CHE PRATICAMENTE L'MDB L'HO APERTO DUE VOLTE (LA PRIMA
CON IL CODICE, LA SECONDA CON L'ADO). COME POSSO IMPOSTARE L'ADO IN MANIERA
CHE MI VADA A LEGGERE L'MDB CHE HO PRECEDENTEMENTE APERTO?.
GRAZIE PER LA RISPOSTA. CIAO A TUTTI.

 wrote in message
8f0pks$lj3$1...@lacerta.tiscalinet.it...

Ciao,
prima di tutto una preghiera: NON URLARE  :-)
riguardo al problema, controlla meglio i metodi dell'Adodc, c'č l'open che
ti consente di utilizzare una connessione giŕ attiva.
Es:
    Adodc.open "Select * From Tabella", [tuo db], ecc.
Ciao. A.D.


Scusandomi con l'uditorio per l'evidente errore nella risposta [la fretta è
cattiva consigliera :-( ]
IO ho controllato MEGLIO i metodi dell'Adodc standard ed il metodo Open
ovviamente non compare. Che figura di m...!
Passo quindi alla soluzione B (questa volta testata e funzionante)
Il problema nasce dall'esigenza di popolare un dbGrid senza utilizzare il
controllo Adodc.
'Inserire nella sezione dichiarazioni del Form
Dim WithEvents adoPrimaryRS As Recordset
Private Sub Form_Load()
  Dim db As Connection
  Set db = New Connection
  db.CursorLocation = adUseClient
  db.Open "PROVIDER=[...];dsn=[...];uid=[...];pwd=;"
  ' Qui viene definito l'insieme di records che popolerà il controllo
  Set adoPrimaryRS = New Recordset 'Ma che fantasia!
  adoPrimaryRS.Open "SELECT Campo1, Campo2, Campo3, ecc. FROM MiaTabella",
db, ecc.
  ' Ed ecco l'esempio di popolamento del grid senza uso di Adodc
  Set [miodbGrid].DataSource = adoPrimaryRS
End Sub
Ciao. A.D.
P.S.: Chi non fa, non sbaglia!!! scusate :-(
Newsgroup: it.comp.lang.visual-basic
Titolo: db password

Salute amici
Vorrei avere chiarimenti su come proteggere un db fatto in access e poi come
passargli con vb5 i parametri
GRAZIE A TUTTI

 wrote in message
news:9egdrv$bj4$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: TextBox

Come fare una TextBox a lunghezza variabile?
Ossia che la lunghezza si adatti al numero di caratteri inseriti.
Tanti saluti Ric

 Ossia che la lunghezza si adatti al numero di caratteri inseriti.
http://makeashorterlink.com/?T23832407

 Ossia che la lunghezza si adatti al numero di caratteri inseriti.
Come prova al volo ho inserito nell'evento Change di un TextBox (Text1)
questa riga di codice:
Text1.Width = TextWidth(Text1.Text) + TextWidth("W")
Questo però obbliga ad usare per il TextBox lo stesso font del Form.
TextWidth("W") l'ho aggiunto perché altrimenti il primo carattere della
stringa veniva spostato a sinistra per far posto al cursore.
L'effetto migliore lo ottieni sicuramente usando caratteri non
proporzionali.
Ciao!
Esteban

 Questo però obbliga ad usare per il TextBox lo stesso font del Form.
Piu' che altro, ti obbliga ad usare per la Form lo stesso font del TextBox;
messa in questi termini e' un po' diverso, perche' l'unico scopo di
Form.Font e' per l'uso del metodo Form.Print, che in genere e' raro, e
quindi la limitazione e' per lo piu' ininfluente... e' sufficiente una
funzione del tipo:
Function GetTextWidth(T As TextBox) As Single
    'se dovesse servire, qui e' possibile salvare il font della form
    'e ripristinarlo in fondo
    Set Me.Font = T.Font
    'questo e' un po' empirico, ma serve appunto per il problema
    'gia' evidenziato dello spostamento del testo, la IF aggiunta e'
    'per sistemare i font piccoli, anche se in realta' sono quelli "stretti"
    'che danno problemi
    If T.Font.Size < 10 Then
        GetTextWidth = TextWidth(T.Text) + = TextWidth("Wa")
    Else
        GetTextWidth = TextWidth(T.Text) + = TextWidth("W")
    End If
End Function
e quindi
Text1.Width = GetTextWidth(Text1)
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

[*Luca Dormio* = 
lucaFaV...@tin.it
 in
news:btokgi$9q6hm$
1...@ID-138791.news.uni-berlin.de
] ha scritto:

A parte quel "+ =" che andrebbe modificato in "+" (retaggi C?), intervengo
non tanto per criticare il codice, che funziona, ma per chiedere (a
Riccardo, più che a Luca) quanto non ha avuto risposta nell'altro topic
(link nel post sopra):
Quale può essere la necessità di dimensionare dinamicamente una casella di
testo?
Perchè appare utile/necessario farlo piuttosto che predimensionare la
casella stessa a livello di progetto, anche a costo che, specialmente se si
usa un font non proporzionale, non sia sufficientemente capiente, pur
limitando (per esempio con MaxLength) il numero max dei caratteri?
Che accade se alla destra della casella vi sono altri controlli?
Che accade se la casella supera la larghezza del form?
Davvero vorrei capire. Ho la sensazione che gli svantaggi (o il codice
necessario per controllarli) siano ben più pesanti degli eventuali vantaggi,
che in ogni caso non vedo, nemmeno uno.
Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: Diritti Proprietà Intellettuale - Registrazione Software - VB6 - Informazioni.

Salve,
sto sviluppando da anni ormai un gestionale presso un cliente che ora mi 
domanda come accordarci x eventualmente rivenderlo ad altri clienti.
Come comportarsi in questi casi x una registrazione del software, sui 
diritti di proprietą intellettuale o altro?.... (visto che poi ancora non č 
terminato).
Qualcuno sa quali passi dovrei fare ed a chi informarmi?... Forse tramite la 
Camera di Commercio?.
Grazie mille.

 ha scritto nel messaggio 
news:4807053c$0$41653$4faf...@reader4.news.tin.it...


 Camera di Commercio?.
Andiamo per step
1) Commercializzazione
La camera di commercio devi considerarla quando hai deciso la forma
professionale con cui vendere il software. Ora cosa sei ? Un libero
professionista ? Hai già una tua società ?
2) Proprietà intellettuale
Questo aspetto è dipendente dal contratto che hai con il tuo cliente. Ci
sono diverse ipotesi: sviluppo custom ma senza cessione sorgenti e p.i.
(proprietà intellettuale), sviluppo custom con cessione sorgenti ma senza
cessione p.i. (il cliente può eventualmente proseguire nello sviluppo con
un altro consulente partendo dai sorgenti in possesso), sviluppo custom con
cessione di tutto
Senza particolari clausule contrattuali è già "tutto tuo", non hai bisogno
di registrare nulla, tanto meno alla SIAE.

 ha scritto nel messaggio 
news:1jgueasvolvni$.1iua3euy9hl7q.dlg@40tude.net...


Il Fri, 18 Apr 2008 15:59:17 +0200, S&C ha scritto:
[cut]
Per esempio puoi fare un contratto Fornitore -> Distributore, per ogni
copia venduta da te tu gli riconosci una provvigione se lui ti passa solo
il contatto. 
Oppure il tuo cliente compra da te la "licenza" che poi rivende ai suoi
clienti, eventualmente impachettando l'offerta commerciali con altri
servizi (es. installazione, training, etc).
Il fatto che tu sviluppi "da lui" non implica assolutamente una
pregiudiziale sulla *tua* proprietą intellettuale.
Dal punto di vista commerciale siamo nel campo della libera trattativa tra
privati, di forme contrattuali ce ne sono parecchie.
PaF

 ha scritto nel messaggio 
news:1w49b0q9etwsi.joitgv0qn9x1$.dlg@40tude.net...


 dell'azienda o come?
Di automatico non c'é niente, vale quello che avete stabilito
contrattualmente. Il software è tuo e rimane tuo anche se vai a fare il
ristoratore, a meno che *tu* non abbia stabilito qualcosa di diverso.
PaF

Newsgroup: it.comp.lang.visual-basic
Titolo: emulatore di rs-232

Ciao a tutti
Qualcuno saprebbe indicarmi dove scaricare un programma di
emulazione/simulazione rs-232?
In particolare mi interessa vedere in hex i dati che ricevo e inserire in
hex i dati da inviare a singolo byte.
Grazie

per 50$ ti invio un software che grabba la trasmissione seriale sia in TX
che in RX e la visializza in Hex, Bin e Ascii

 ha scritto nel messaggio
news:KTXw6.3421$Oz4....@news2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Form sempre attivo

 anche quando se ne usa un altro ?
Se intendi dire "mantenere un form in primo piano", puoi trovare la soluzione
nel Sito Comune, (URL nella firma di questo messaggio); altrimenti, per definizione,
solo un form alla volta può essere "attivo", cioè ricevere l'input dell'utente.
P.S.: per favore, evita di postare con "caratteri definiti dall'utente" e/o in HTML,
poiché la cosa potrebbe creare problemi ad alcuni NewsReader. Grazie. ;-)
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com




 complicare troppo il programma ?
Se non ho capito male, vuoi creare un form MDI (quello principale) e uno MDIchild
(quello secondari), cerca MDIChild nell'help in linea e fammi sapere...


Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Ma news.libero.it funziona?

Č da venerdě che non riesco ad aprire le news.
Ma 
news.libero.it
 funziona?
--
GbC
http://www.chiappori.net
http://www.gbcweb.com
--
-- 
Posted from 
mail1.webmessenger.it
 [193.70.193.50] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ma 
news.libero.it
 funziona?
No: Libero sta facendo proprio schifo. Io sono passato a 
News.CIS.DFN.DE
: č gratuito ma devi
registrarti. E' ottimo.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 registrarti. E' ottimo.
Un po' lento negli ultimi giorni, ma tutto sommato molto valido!
--------------------------------------------
             ASSA
http://assatarram.yohoo.it
Napster: Assatarram3
it.comp.lang.visual-basic: Assatarram
--------------------------------------------


News.CIS.DFN.DE
: è gratuito ma devi registrarti. E' ottimo.
un giorno o l'altro lo faremo schiattare, 'sto server...

 registrarti. E' ottimo.
Allora non hai mai provato 
news.dfncis.de
!! :-))) oltretutto puoi usare
anche le stesse pw :-))))
Ciao, M.

Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda molto banale

Ciao a tutti,
sto terminando un programma abbastanza lungo e complesso.
Mi sono accorto di aver usato molte variabili, anche per memorizzare
percorsi sul disco.
Ma quanto "pesa" una variabile?
Mi conviene limarne un po' oppure, visto che e' comodo, usarne quante
me ne servono?
Bye,
   Ricky

 wrote in message
38fd8fe7...@news.supernews.com...


    Ricky
Se le variabili sono state create dentro a routine non c'è problema, poiché
alla fine della routine vengono eliminate, altrimenti avrai molto spazio in
memoria occupato e potresti ridurne il numero, soprattutto se non le usi per
tutto il periodo dell'esecuzione del prg.
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Lapsus!

Dove posso trovare l'editor xml di microsoft (....mi sembra si chiama xml
notepad) ?
Grazie 1000
--
Ciao Maurik
mauro#SPAM#.buccioli#SPAM#@
tiscalinet.it
maurik77#SPAM#@
hotmail.com
Levare #SPAM# per inviare messaggi :-)

:-P
ECC, imparate a cercare, ragazzi ! Non chiedete sempre la pappa fatta...
Bye, G.

 E poiché io sono un VBI adesso devi _lo stesso_ cercare sul sito MS.
mago.cut
mago.poof()
Cosa è un VBI?????
mago.poof()

 Cosa č un VBI?????
Siccome sono un BOFH, mi verrebbe da dire "cerca su google" >:-P
Vabbe', spiego. Fa parte della gerarchia dei BI, che si articola cosě:
BI = Bastard Inside
VBI = Very Bastard Inside
FBI = Full Bastard Inside
....
e via dicendo, fino a:
FQVITPT&ABI = Fully Qualified, Verified, Independently Third-Party Tested
    and Approved Bastard Inside
E prima che qualcuno chieda cos'č un BOFH...
http://bofh.ntk.net/Bastard.html
 <------ fondamentale
http://members.iinet.net.au/~bofh/
http://www.theregister.co.uk/content/30/
http://www.cs.wisc.edu/~ballard/bofh/
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: mailto: with body from textbox

I'm writing a "contact/bugreport form" in my program, Events Horizon.
When pressing the send button"Send" button a mailto command is beeing
executed, with subject and body parameters.
I've alot of this figured out. Even the newlinje indicator in the mail
body; %0A
This is some of the code in the Send button:
#####################################
    Dim Body As String
    Dim Hlink As New clsHlink
    Body = "Bug Report" & "%0A" & "%0A" & "%0A" & _ 
    "Events Horizon version: " & App.Major & "." & App.Minor & "." & _
     App.Revision & "%0A" & frmMain.gReg & "%0A" & _
    "Windows version: " & comWindows.Text & "%0A" & "%0A" & _
     comRequest.Text & ":" & "%0A" & txtBugReport.Text
    Hlink.URL = "mailto:
rika...@c2i.net
?subject=Events Horizon Bug
Report?body=" & Body
#####################################
The mail body contains this
- Bug Report
- <registration info>
- <program version>
- <Windows version>
- <content of textbox>
#####################################
The problem is this:
       All the textbox content comes in ONE line in the mail body!
How can I add a "%0A" at the end of each line of the textbox content?
I could 
    dim Txt as String
    Txt = txtBugReport.Text
And then replace all the vbCrLf in the string with %0A, but how do i
find the vbCrLf's in the string?
-> SO, is there a smart way to send the textbox content to the mail
body with "%0A" at the end of each line?
--
Rikard Bø
Events Horizon: 
http://home.c2i.net/rikardbo/eventshorizon.html

 Events Horizon: 
http://home.c2i.net/rikardbo/eventshorizon.html
[declare shellexecute somewhere]
Option Explicit
Private Sub Command1_Click()
    Dim j As Long
    For j = 1 To 10
        Text1 = Text1 & "new line: " & CStr(j) & vbCrLf
    Next
End Sub
Private Sub Command2_Click()
    If Len(Trim(Text1)) = 0 Then Exit Sub
    Dim sTo As String, sBody As String
    sBody = Replace(Text1, vbCrLf, "%0A")
    sTo = "mailto:
postm...@sundaysw.com
?subject=this is the sub&body=" &
sBody
    ShellExecute Me.hWnd, vbNullString, sTo, vbNullString, "C:\", _
        SW_SHOWNORMAL
End Sub
hth
--
ciao, j.
www.sundaysw.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema di adattamento dinamico delle form alla risoluzione dello schermo...

Allora, ragazzi, il mio problema e' il seguente.
Ho implementato un programma MDI in VB6. Vorrei che le form fossero
"sensibili" alle impostazioni dello schermo, ovvero alla risoluzione.
Per il momento, le form vanno bene per una risoluzione minima di
1024X768, ma se scendo a 800X600 non ci stanno piu' nello schermo.
Come posso risolvere il problema?
Un grazie a chiunque mi dara' suggerimenti. Ciao!!

...


Qualche giorno fa ho postato la soluzione al tuo problema...
Dacci un'ochiata...
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

ho avuto lo stesso problema, se controlli qualche messaggio precedente
(?) RESIZE
credo che toverai la risposta!!


...

Grazie, Fabrizio, ottimo suggerimento! Ciao!!
Newsgroup: it.comp.lang.visual-basic
Titolo: SP VB5.0

Salve.
Dove posso trovare l'ultimo SP di VB5.0?
--------------------------
Marco Comite
http://www.comite.it/marco
ma...@comite.it
--------------------------

> Dove posso trovare l'ultimo SP di VB5.0?
Qui:
http://www2.armaditaggia.com/marco/
Clic su "Service Pack".
ALOHA !
-- 
Rogis
* ANTI-SPAM:
Rimuovi "ABC" dall'indirizzo per rispondermi
Remove "ABC" from my address to reply.

Newsgroup: it.comp.lang.visual-basic
Titolo: Caricare Grid con molti Record

Salve a tutti,
ho un piccolo problema.
Il mio programma deve caricare una SSOleDBGrid con il risulatato di una
select.
In pratica una cosa del genere...
Adors = SELECT * FROM FCOMUNI (quindi >8000 record)
do until adors.eof
    Griglia.add item "adors"
    adors.MoveNext
loop
Solo che impiega circa 5/8 secondi, inoltre ad ogni operazione di
inserimento/modifica/cancellazione ne impiega altrettanti perchč cancello la
griglia e la ricarico.
Come mi consigliate di fare? Mi consigliate di non aggiornare la Grid alle
operazioni e quindi il caricamento di 8 secondi ce l'ho solo all'avvio?
Grazie :)

Invece di usare grid prova con un altro controllo
tipo true dbgrid pro
creado sia molto piu veloce
Ciao
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Sostituire mdb al volo

Ho aperto una connection e dei recordset con ADO verso un mdb, il programma
ad un certo punto ripristina una vecchia versione del db Access. Il fatto è
che le requery sui recordset non hanno alcun effetto e solo dopo aver
modificato un record il successivo requey mi mostra i record del db
sostituito.
Si può fare in modo che il programma 'si accorga' subito della sostituzione
del db senza dover chiudere e riaprire la connection?
Ciao
Giovanni
 
http://www.cactofilia.com


Fammi capire bene... tu -sostituisci- il file tenendo -aperte- delle
connection dati...?
Dě giuro...   :-P
ciao
ugo

 Dě giuro...   :-P
Mi piace sfidare ADO ed ridurre al massimo il codice.
Dopo un update il tutto funziona.
Magari qualcuno ha un metodo migliore.
Ciao
Giovanni

 ha scritto nel messaggio
news:QJHx7.10752$YC3.2...@news1.tin.it...

semplicemente dovresti chiudere le connection e riaprirle dopo aver fatto la
copy del file.
Cosě rischi parecchio...
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: VB e Access2000

Ciao a tutti so che vi rompo per cose banali, ma sono agli inizi:
Ho Vb6 Enterprise, non riesco a collegarmi a un database access2k dalla
finestra add-ins.
Ho scaricato il service pack 4
                       service pack 5
                        madc 2.6
                        Jet 4
e malgrado tutto non funziona niente cosa devo fare? dove sbaglio ?
Aiutatemiiiiiii

 Aiutatemiiiiiii
- nell'add-ins manager seleziona data form wizard o come si chiama in
italiano. digli di caricarlo all'avvio
-- dal menu add-ins seleziona il data form wizard e segui il modello.
dovresti avere almeno uno spunto per continuare.
buon lavoro, j.

 ha scritto nel messaggio
news:hB7j9.124499$ub2.2...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: lista dei valori possibili di un argomento

Buongiorno,
avrei piacere di sapere come implementare quella funzione che permette di
sapere mentre si programma in ambiente microsoft l'elenco possibile dei
valori di un parametro da passare ad una sub o function
Per spiegarmi bene, se avete usato non so, ado mentre scrivete le linee di
codice necessarie ad esempio per aprire un recordset l'ambiente di sviluppo
di microsoft vi mette a disposizione dei piccoli elenchi di valori possibili
per alcuni argomenti ad esempio
        adopenkeyset
       adopenforweardonly
    ....    ecc eccc
sapete dirmi come dotare di questa possibilità alcune funzioni o metodi di
una classe da me creata?
Grazie

 ha scritto nel messaggio
news:4O2W6.555$uE.1...@news2.tin.it...

devi crearti una Enum :
Public Enum Colore
Giallo=&H0000FFFF&
Verde=&H0000FF00&
End Enum

 valori di un parametro da passare ad una sub o function
[SNIP]
Come ti ha detto "Utente WIN2K" devi creare un Enum, puoi considerarlo come
un raggruppamento di costanti di tipo Long; a questo punto dichiara la tua
funzione con
Sub Prova(Param As <nome enum>)
Se prevedi di rendere pubblica la tua classe in un Exe/Dll ActiveX ricorda
di dichiarare l'enum com Public *nella classe*; puoi addirittura metterlo in
una classe diversa, l'importante e' che non sia in un modulo .bas
Ciao
--
Luca Dormio
luca....@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Sono un princiapiante AIUTO!!!

Aiutatemi vorrei iniziare a programmare con il Visual Basic 5 ma non so da
dove iniziare non č che avreste voglia di aiutarmi?
Grazie!!

Ciao.
Per essere brevi: leggi la mia risposta al messaggio "Vorrei imparare a programmare in Visual Basic ma..." di CheKKo,
postato il 22/05/1999 alle 20:27
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: PROBLEMI DI STAMPA Urgentissimo (per favore)

Sto programmando via OLE con VB5 un cad 3d (SolidWorks) sotto Win NT.
Non riesco a fargli stampare fogli + grandi di A3 su un plotter che
permette di stampare fino alla dimensione di A0.
L'unica possibilita' e' quella di cambiare i settaggi del driver di
stampa utilizzando le API di windows.
Tutto molto bello... ma come si fa?
Qualcuno sa dirmi come risolvere il problema?
(se uso l'oggetto printer in vb non vado a cambiare il driver di
stampa, quindi non risolvo il problema)
SONO DISPERATO!
Ringrazio in anticipo e saluto
Michele

...


Newsgroup: it.comp.lang.visual-basic
Titolo: *.vbw

Hi, VBman
una semplice curiosità cosa contiene il file Progetto.vbw
ho provato ad aprirlo con NotePad e mi da:
Form1 = 57, 57, 463, 380, , 19, 19, 425, 342,
Modulo1 = 38, 38, 444, 361,
Modulo2 = 114, 114, 558, 437, Z
cosa sono?
Ciaooooooo
(--o--)
BARK
(--o--)

Modulo2 = 114, 114, 558, 437, Z
si ricorda lo stato delle finestre dell' ide al momento della chiusura del progetto.
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report

Come posso visualizzare un gruppo su due colonne affiancate tipo:
        ITALIA
            ABBRUZZO
Salerno                                            11321
                    Chieti                                          454354
CAMPANIA
                    Teramo                                        23132
Potenza                                            21321
            BASILICATA
ALBANIA
                    Napoli                                         213232
Tirana                                                1223
dove il campo provincia e il campo numerico sono nella sezione dettagli
ringrazio anticipatamente

 ha scritto nel messaggio
news:8p5qrt$2rf$1...@pluto.sm.dsi.unimi.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Errore CR 8.5 --> Pacchetto istallazione

Salve a tutti,
   ho creato un'applicazione utilizzando CR 8.5. La cosa alquanto
strana avviene al momento dell'autocomposizione pacchetti di
istallazione di VS 6.
Dopo aver selezionato i componenti, la cartella di Setup, si avvia la
creazione del file cab e dopo un po' sparisce il tutto senza warning.
Se nella stessa applicazione utilizzo CR 4.6, quello free di VS
6,tutto ok.
Nel progetto (Riferimenti) utilizzo solo l'oggetto Crystal Report 8.5
anche se ne vedo altri elencati.
Qualcuno di voi ha avuto lo stesso problema con soluzione?
Grazie 1000

 ha scritto nel messaggio
news:4d0f12c4.02082...@posting.google.com...

Io utilizzo Visual basic 6.0 con CR8.5, ma in fase di installazione di vb,
non installo mai il CR di VB, e mi funziona tutto.
Con autocomposizione pacchetti, non riesci ad installare tutto il motore di
CR 8.5, a meno chè non selezioni tutti gli altri componenti a mano, sono
circa 80.

 ha scritto nel messaggio
news:Hmsb9.16$En5.494@psinet-eu-nl...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Gestione magazzino su terminalini.

Questo messaggio è rivolto a chi abbia già disponibile una procedura del
genere (anagrafiche, giacenze, carico/scarico di magazzino).
Non ho nessuna intenzione di farla io.
Io potrei eventualmente fare da tramite tra chi l'avesse già disponibile ed
una piccolissima azienda che mi ha chiesto se potevo realizzarla o comunque
informarmi in merito.
Preciso che ho solo una vaga idea di cosa siano i terminalini e di come
funzionino.
Sono stato indeciso prima di inviare questo messaggio ma alla fine ho
pensato:
in fondo che male c'è? ..qualcuno del NG potrebbe ricavarci qualcosa e
l'azienda (di un amico) risolverebbe il suo problema.
Grazie, Sauro

 funzionino.
Puoi essere più preciso sui terminalini???
di cosa si tratta?
Sono terminali batch o wireless con access point?
leggono codici a barre?
etc....
Datalogic,Symbol etc...?
con S.O. DOS o WinCE??
ciauz
Fabio

 Fabio
L'Hardware deve ancora essere acquistato e probabilmente verrà deciso in
base al software disponibile.
Tu cosa consigli?
Grazie, Sauro

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiornare DataRepoert con DataEnvironment

Qualche post fa chiedevano come fare per aggiornare un report con crystal
report dopo aver modificato i dati da stampare.A me servirebbe fare la
stessa cosa; modificare i dati del database collegato al Dataenvironment e
rilanciare il report aggiornato.Come posso fare?
Grazie

 ha scritto nel messaggio
news:kri5d.4787$O9.4...@news4.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione

Salve a tutti, chi mi puo aiutare a fare una conversione da esadecimale a
decimale
mi spiego :
numero esadecimale : 11 in formato decimale mi deve dare 17 (il valore lo so
perchè ho provato a farlo con excel).
Ma provando con VB mi da la lettera B perchè ?
ex. label1.caption= hex (text1.tex).
Qualcuno mi puo aiutare dove sbaglio!!!!!!
Ringrazio a tutti quelli che mi aiuterano con consigli ed esempi.
grazie


Hex converte un numero decimale nel corrispondente esadecimale, per cui 11 --> B
č esatto
Per raggiungere il tuo scopo, puoi usare una funzione tipo questa che si basa
sulla regola di conversione da esad. a dec.:
Esad. 11 --> 1 * 16^1 + 1 * 16^0 = 17 Dec.
Function daEsaaDec(ByVal NumEsa As String) As Long
Dim i, NumeroCifre As Integer
NumeroCifre = Len(NumEsa)
daEsaaDec = 0
For i = NumeroCifre To 1 Step -1
    daEsaaDec = daEsaaDec + Val(Mid(NumEsa, i, i)) * 16 ^(NumeroCifre- i)
Next i
End Function
nel tuo esempio, richiami la funzione cosě:
label1.caption= daEsaaDec(text1.text)
ciao
maurizio

 Ringrazio a tutti quelli che mi aiuterano con consigli ed esempi.
vedi sotto ....
Dim valhex$, valhex2&
'Da decimale a esadecimale:
valhex$ = Hex$(17)          ==> 11
'Da esadecimale a decimale:
valhex2& = Val("&H" & valhex$)  ==> 17
 Ciao
 Valter

 ha scritto nel messaggio
news:a5qq7q$vd$1...@serv1.albacom.net...


 Qualcuno mi puo aiutare dove sbaglio!!!!!!
Sbagli nell'usare la funzione Hex.
Questa funzione serve per convertire un valore decimale
in un valore esadecimale; infatti 11 in decimale equivale a "B"
in esadecimale.
Per fare la conversione da esadecimale a decimale
devi usare il prefisso &H, come ti ha suggerito valter:
    label1.caption = Val("&H" & text1.text)
vedrai che funziona.
--
Er Roscio.

Newsgroup: it.comp.lang.visual-basic
Titolo: impedire l'andare a capo in un campo di testo multiline ?

E' possibile impedire l'andata a capo tramite tasto invio in un campo di
testo su cui la proprietà multiline sia stata impostata a True ??
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:157Z29Z81Z46Y1...@usenet.libero.it...
...
Gestisci l'evento KeyUp (o KeyDown) e se il parametro è vbKeyReturn lo
imposti a 0


Beh, diciamo che in realtà questo è molto parziale (basta un copia incolla
con un testo e sei fregato).
Direi di mettere, nell'evento change, un replace di vbnewline con
vbnullstring o con uno spazio.
Però occorre memorizzare il punto di digitazione e poi rimettere il cursore
nello stesso punto.
Per testi molto lunghi è un problema...
Ciao
Alberto

 Direi di mettere, nell'evento change,
Magari nel change lasci correre, e fai questa (lunga) operazione in fase di
validazione, così elimini quello era sfuggito al controllo precedente.
Newsgroup: it.comp.lang.visual-basic
Titolo: Baco di vb5 ??? o sono io arrugginito ??

C'e modo di intercettare su una form la pressione del tasto invio o e'
impossibile senza ricorrere alle solite DLL.
Mi spiego.
Se costruisco una form ed imposto KeyPreview = true riesco ad intercettare
la pressione di qualsiasi tasto, compreso l'invio.
Ma appena sulla mia form metto un pulsante, intercetto tutti i tasti tranne
quello in questione.
Ho provato a mettere Default = false (sul pulsante) ma il risultato non
cambia.
Grazie in anticipo a quanti vorrano rispondermi.

Grazie in anticipo a quanti vorrano rispondermi.
Prego
Aurelio
----------------------------------------------
Rimuovere xxx dall'e-mail per rispondere


Mi autorispondo in parte ! Non e' un baco , questo e' quanto scritto
sull'help :
Note   Some controls intercept keyboard events so that the form can't
receive them. Examples include the ENTER key when focus is on a
CommandButton control and arrow keys when focus is on a ListBox control.
Resta il dilemma......... sono arrugginito ??
Ma siamo in molti viste le risposte.........
Ven.

Qualcosa, ma non molto, sono riuscito a fare con la chiamata alle API di
WINDOWS. Inserisci questo
codice in un modulo
Option Explicit
Public Const GWL_WNDPROC = (-4)
Public Const WM_KEYDOWN = &H100
Public Const WM_KEYUP = &H101
Public Const WM_QUIT = &H12
Public hWinProc As Long
Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal
hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal
hwnd As Long, ByVal nIndex As Long) As Long
Declare Function DefWindowProc Lib "user32" Alias "DefWindowProcA" (ByVal
hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As
Long) As Long
Declare Sub PostQuitMessage Lib "user32" (ByVal nExitCode As Long)
Public Function CallbackFunction(ByVal hWind As Long, ByVal hMsg As Long,
ByVal wParam As Long, ByVal lParam As Long) As Boolean
Select Case hMsg
Case WM_KEYDOWN
   If wParam = 13 Then Debug.Print "Il tasto Invio è stato premuto "
Case WM_QUIT
  PostQuitMessage wParam
Case Else
  DefWindowProc hWind, hMsg, wParam, lParam
End Select
End Function
Nel Form invece:
Private Sub Form_Load()
    hWinProc = GetWindowLong(Me.hwnd, GWL_WNDPROC)
    SetWindowLong Me.hwnd, GWL_WNDPROC, AddressOf CallbackFunction
End Sub
Ora quando il Form si carica intercetta qualsiasi messaggio, ma stai attento
se usi
  DefWindowProc hWind, hMsg, wParam, lParam
Windows implementa la WinProc di default, quindi starà a te preoccuparti
della gestione dei msg.
Tuttavia in questo modo il Form si comporta come se avesse il focus e quindi
apparirà nella finestra immediata la scritta: "Il tasto Invio è stato
premuto ", ogni volta tu lo premi.
Se sposti il focus perdi il subclassing, che dovresti richiamarlo in qualche
altro evento, comunque potresti avere tutto sotto controllo.. ma il testing
risulterà molto più laborioso.
Se invece utilizzi
    SetWindowLong hWind, GWL_WNDPROC, hWinProc
Puoi implemetare la WinProc di default di VB, ma in questo caso il problema
si ripresenta.
Ciao
Mario
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP!

Ciao a tutti!
Chi può darmi una mano (della serie: sono ai rudimenti del VB e non riesco a
tirarmi d'impiccio ...)?
Il problema è questo: supponiamo di avere una funzione del tipo:
Y=f(X) e data x dovrei riuscire a trovare y.
Prendiamo invece il caso del problema inverso: data y dovrei riuscire a
trovare x.
Se però la funzione ha una forma per cui non si riesce ad esplicitare in
maniera adeguatamente semplice x, allora la soluzione migliore dovrebbe
essere andare per tentativi, buttando dei valori casuali alla variabile x in
mado che mi si avvicini il più possibile alla soluzione (con un errore per
esempio del 1/1.000).
(NB: oppure ci sono delle "strategie" ottimizzanti per raggiungere la
soluzione senza buttare alla cieca dei valori?).
E se la soluzione fosse più di una?
Tutto semplice vero?
ma a livello di routine, dichiarazioni di variabili, sintassi ... come mi
devo comportare?
Chi sarà mai quell'anima pia che mi darà una mano?
AIUTOOOOOOOOOOOOOOOOO!
:-)
grazie
Paolo

Allora... per trovare le soluzioni di una equazione del tipo y=f(x) anche
quando y<>0 (basta porre g(x)=f(x)-y1 dove y1 è il valore assunto per y che
ci interessa) ci sono più algoritmi, sia semplici (metodo dicotomico) che
complessi (metodo di Newton-Raphson).
Per quanto riguarda le routine per implementare uno di questi metodi, esse,
come complessità, vanno di pari passo a quelle del metodo stesso.
Comunque, con i computer di oggi, restando sempre nel campo di funzioni non
"spaziali", il metodo dicotomico è più che sufficiente.
Se ti servono maggiori informazioni fammi sapere.
Ciao
--
Stefano Zamboni
----------------------------------------------------------------------------
----------------
sz...@XXXtin.it
zam...@XXXfreemail.it
Togliere "XXX" per rispondere
----------------------------------------------------------------------------
----------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Richiesta di aiuto

Esiste in VB un comando che mi converta un numero in formato esadecimale in
decimale ?
Se si qual'è
Se non esiste come posso ovviare a questa mancanza ?
Grazie anticipatamente.

 ha scritto nel messaggio
news:edX87.23255$0Z1.8...@news.infostrada.it...


 Se non esiste come posso ovviare a questa mancanza ?
Forse non ti sei spiegato bene, spero di aver inteso cosa vuoi dire.
Se hai un numero in esadecimale, significa che hai una stringa,
altrimenti forse stai facendo confusione tra numero e sua rappresentazione.
Comunque, supponendo che hai una stringa con "4F", per ritrovare il numero
equivalente, puoi usare questa:
valore = Val("&H" & "4F")
Ciao
Sir Jo