mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: come si fa per leggere e assegnare un icona ?

come si riesce a leggere un icona personalizzata di un eseguibile e poi 
assegnarla ad un eseguibile diverso
il tutto da codice ?

il tutto da codice ?
se fossi stato più preciso con "assegnarla",
e se avessi specificato vb 6 o net
sarebbe stato meglio
il tutto è fattibile,
ma occorrono 3-4 passaggi distinti
per estrarre un icona da una dll o exe
ci sono molti esempi sul web
(devi conoscere la sua posizione se ce ne sono piu' di una)
non mi dilungo
a quel punto puoi salvarla su disco
se per assegnarla intendi
metterla dentro ad un file exe,
cioè aprire il file exe in maniera binaria
e metterla dentro, è fattible
(creaci prima uno spazio con una icona
fasulla ed al posto di quei byte ci andrai a mettere
quelli della nuova icona, dopo averli letti
dalla icona salvata,) ma è una operazione chirurgica
se per assegnarla intendi associare un icona 
ad un file in Esplora risorse, devi andare a istruire il Registro
che poi ti associ tale file con tale icona
(il posto esatto nel reg non ricordo dove è, 
ma ci sono molti esempi sul web)
ammesso che abbia interpretato bene la tua esigenza....

Newsgroup: it.comp.lang.visual-basic
Titolo: installare un OCX ???

ciao, ho scaricato un ocx che è contenuto in un sile .cab che contiene oltre
al controllo una .dll e un .inf che serve per l'installazione ...... si ma
come faccio comunque ad installarlo ?? cioè il file .inf a chi lo do in
pasto ?? Devo prima scompattarli ??

esplora risorse, click dx sul file inf...
trovi 'installa' nel menu
se non c'è il file inf non è un installatore...
-> GbC
http://www.gbcweb.com

Newsgroup: it.comp.lang.visual-basic
Titolo: Riempimento GRID con immagini.

Ciao, sto cercando di riempire una griglia con circa 200 immagini.
A fare ciň impiego circa 3-5 secondi. Conoscete un sistema piů rapido, non
dico 1 ms ma migliorare?
Ciao Grazie.

 Ciao Grazie.
Penso che puoi fare ben poco se le immagini le leggi da disco (secondo me il
90% del tempo lo impiega per leggere le immagini dall'hdd e non per
inserirle sulla griglia) e comunque il tempo mi sembra accettabile. Che tipo
di controllo grid stai utilizzando? E soprattutto quanto sono grosse queste
immmagini? (sono 200 icone o 200 foto a 3 Megapixel?)
____________________________________________________________________________
_________________ Fabio
http://www.codice.it

Sono piccole GIF 32x32. Tipo Icone.
Utilizzo la MHGRID. Certo non è tanto. Però è il controllo che perde tempo.
Se provo a modificare lo sfondo di ogni singola cella, impiego +/- lo stesso
tempo. Quindi , secondo me, dipende dallo spostamento del puntatore della
griglia.
Newsgroup: it.comp.lang.visual-basic
Titolo: Prove

Sul vecchio progetto vb5 le seguenti righe vanno bene.
MA se apro un progetto vb6 nuovo e comincio con queste 4 righe mi da errore
"tipo non corrispondente" sulla 4 riga. Nei riferimenti ho spuntato la
libreria DAO 3.5
Greg
Dim dib As Database
Dim rs As Recordset
Set dib = DBEngine.OpenDatabase("d:\vb61\db97.mdb", , True)
Set rs = dib.OpenRecordset("select * from comuni")

 Dim rs As DAO.Recordset


 libreria DAO 3.5
....
Usi anche ADO ?

 ha scritto nel messaggio
news:Wt1ja.72536>
Usi anche ADO ?
==============
Si....
Non dirmi che non posso usare DAO+ADO :(((


Lupo ha gia postato la sintassi giusta , aggiungo che se avevi refenziato
prima DAO e poi ADO non avresti avuto errori.
Carlo Alberto

 ha scritto nel messaggio
news:CW1ja.72729$i26.2...@news2.tin.it...

=================
Purtroppo del messaggio di Lupo vedo solo il quoting...
In ogni caso, mettendo prima il dao nella lista del "refenziatore" va tutto
bene. Grazie
Greg

 bene.
Appunto.

 Appunto.
... ma che accadrà quando userai ADO? Scruta bene in quel quoting...

 ha scritto nel messaggio
news:b6iccv$5fhfe$1...@ID-174464.news.dfncis.de...

============
Scusa Lupo, non avevo guardato il... pelo :))
Grazie ancora, è un sollievo sapere che non devo mollare il dao di colpo, e
che posso cominciare a mettere un po di ado qua e la, quando riesco e quando
mi funziona.
Comunque non so se è una mia impressione ma mi pare, ad occhio che non sia
male come velocita di apertura di grossi recordet, ed a compilare mi da un
exe molto piu magro.
Greg

 exe molto piu magro.
Chi? ADO? madonnina, rispetto a DAO č di una lentezza mostruosa
Per il resto (ho i miei dubbi sulla "magrezza") pensa solo (ed anche) al
MDAC_TYP.EXE che devi distribuire...

 MDAC_TYP.EXE che devi distribuire...
========
No no ADO, intendevo DAO in vb6 + veloce di  DAO in vb5
Mi sa che ho molto da studiare, e forse ho fatto un errore ad accantonare
vb6 nel 98, forse....
'notte Lupo e grazie
greg

 'notte Lupo e grazie
'notte.
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema [DataReport + DataEnvironment]

Ciao a tutti.
Il problema č sorto scrivendo un piccolo programma per stampare che fa uso
di un controllo DataReport collegato ad una fonte dati di un oggetto
DataEnvironment.
Mi spiego piů in dettaglio: il DataEnvironment legge da un DataBase (fatto
in Access97) dei dati, crea un semplice oggetto gerarchico e lo passa al
DataReport.
Nel frattempo, il databese puň essere modificato da un'altra connessione, ma
il DataEnvironment non se ne accorge!
Come posso far sě che il recordset creato dal DataEnvironment contenga dati
aggiornati?
Esiste qualche metodo appropriato? qualcosa tipo "Reload","Refresh",...?
oppure sto sbagliando tutto?
Grazie.
  Giovanni


E' un problema di apertura e chiusura delle connection
prova questo....
DataEnvironment1.Connection1.Open
DataEnvironment1.Command1
DataReport1.Refresh
DataReport1.Show'<------------ qui visualzzo il report
DataEnvironment1.Connection1.Close

Newsgroup: it.comp.lang.visual-basic
Titolo: Tre Perline Api32

1. 
http://www.mvps.org/vbnet/
2. 
http://www.vbapi.com/
3. 
http://www.allapi.net/
Non saranno come la mitica bibbia "Win32 Programmer's Reference" ma
descrivono benissimo tutte le api32 con tanto di esempi pratici e sono
gratis.
In mezz'ora (i siti contengono molto testo e poca grafica) ho scaricato i
tre siti per consultarli offline.
Se ho scoperto l'acqua calda scusatemi, ciao a tutti, Roby.

>BadBoy:

Tranquillo!... Nessuno si e` scottato. Eppoi: giova ripetere
le cose perche' se e` vero che non c'e` nulla di nuovo sotto
il sole e` anche vero che ogni giorno e` un nuovo giorno.
--
Ciao.
Maurizio

 


 ha scritto nel messaggio
news:01bfe511$48c15de0$7a471497@hdtzrgrk...

Newsgroup: it.comp.lang.visual-basic
Titolo: interfacciare vb con disp. elettronici??

Spero che in seguito a questa missiva non mi ridiate in faccia (si fa per
dire) per giorni!!!!!!!!!
Ho un sogno......(ogni tanto mi lascio andare a manie di grandezza)
E' possibile interfacciare vb a dispositivi elettronici? (o dico grandiose
cazzate???)
Spiegazione......
Abito in una zona dove c'è una fiorente attività florovivaistica.....
La mia ambizione sarebbe realizzare un programma che possa gestire eventi
legati alla gestione di un sistema automatizzato di florovivaismo.....ovvero
- se piove o c'è vento un tale evento viene letto costantemente dal prg che
invia un output ad una interfaccia la quale chiude gli sportelli delle
serre.....
- impostare orari di irrorazione (all'ora x il mio prg manda segnale di
apertura num x "saracinesche" (rubinetti automatici per capirci) i quali
rimangono aperti il tempo scelto dall'utente...
- etc. etc (gestendo anche tramite modem ad es.)
Posto che:
- in commercio esistono elementi elettronici di questo tipo (es. sensore
pioggia, sensore ventolina eolica etc.
- non sono un ingegnere elettronico
- in commercio trovi sistemi "tutto compreso", ovvero programma+interfaccie
I/O+servo meccanismi+sensori e che sembra sia impossibile districare
l'offerta "tuttocompreso"
Chiedo:
- troppo?
- vb gestisce bene le com?
- qualcuno conosce implementazioni software (e/o convertitori
analogico-digitali) per coniugare il tutto?
- sono forse pazzo?
Saluti.

Ciao Sid...
Ti posso garantire che non sei pazzo... anzi ti posso dire che io ho gia
realizzato gia parecchie cose simili ed ho interfacciato il pc con il mondo
esterno in molti modi diversi...
Se ti posso essere utile fai un fischio....
Ciao Danilo 
Ki...@usa.net

 
Come gia detto Non Sei Pazzo,
Si piu' fare anche in VB.
Per dirtela tutta se devi interfacciarti con le schede attuatrici eseguendo
IN e OUT a
dati indirizzi.... Ti conviene usare il C (ma solo per questo, tutto il
resto continui a farlo in VB),
ma se devi unicamente usare le seriali sei gia in groppa al cavallo... devi
((solo)) cavalcarlo...
Io ho fatto spesso ((stupidate)) come questa, Interfacciandomi sia a PLC
(via seriale ma non solo),
sia a schede interne.
Ti tico: Non e' facile... ci vule tanto lavoro e tante prove e le
interfaccie giuste.
Per dirtela tutta, secondo me se ti compri un PLC risolvi gia piu' di meta'
dei problemi, il casino
e' interfacciarlo al PC.....
So di essere stato molto pocco utile, ma visto il tipo di domanda ed il
tipo di argomento,
 non esiste una risposta del tipo "si fa cosi'".....
Hi, Ciao
Ettore       By -MES-


wrote:


hai mai pensato di usare un plc anziche un pc ?
parla con un qualsiasi perito elettrotecnico (
Gi...@mail.dex-net.com
)
alla prossima!
Newsgroup: it.comp.lang.visual-basic
Titolo: RichTextBox e prima riga

Ciao,
non so se qualcuno ha già fatto la stessa domanda, in ogni
caso a me servirebbe sapere se (e come) è possibile
posizionare come prima riga visibile nella RichTextBox
quella dove è posizionato il cursore.
Per spiegarmi meglio, sto simulando il classico 'FindNext'
e quando mi posiziono sulla parola cercata vorrei che la
riga in questione della RichTextBox venisse messa vicino al
margine superiore del controllo.
Se qualcuno sa come fare, mi aiuterete a risolvere un problema (forse semplice, non so !!!) ma che non riesco proprio a risolvere.
Grazie a tutti e ciao Stefano.
_________________________________________________________________________
la tua email gratuita e per sempre su 
http://www.freemail.it
 (anche POP3)
-- 
Posted from 
qma...@freemail.it
 [195.110.99.215] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Alla fine sono riuscito a risolveree il problema, ho trovato
l' Api (quasi per caso) che fa al caso mio. Ecco il codice
se dovesse servire a qualcuno:
'-------------------------------------------------
   Dim ll_Riga As Long
   Dim ld_OldPos As Double
   Dim ll_OldLenght As Double
   ' Riga sulla quale sono posizionato
   ll_Riga = rtbFileError.GetLineFromChar(rtbFileError.SelStart)
   ' Memorizzo l'eventuale selezione del testo
   ld_OldPos = rtbFileError.SelStart
   ll_OldLenght = rtbFileError.SelLength
   ' Azzero il SelStart cosě da far tornare la RichTextBox alla prima riga
   rtbFileError.SelStart = 0
   ' Scrollo in giů di ll_Riga righe
   Call SendMessage(rtbFileError.hwnd, EM_LINESCROLL, 0&, ll_Riga)
   ' Ripristino la selezione del testo
   rtbFileError.SelStart = ld_OldPos
   rtbFileError.SelLength = ll_OldLenght
'-------------------------------------------------
Ciao Stefano
--
TiscaliNet, libero accesso ad Internet.
http://www.tiscalinet.it
-- 
Posted from 
mail-4.tiscalinet.it
 [195.130.225.150] 


Newsgroup: it.comp.lang.visual-basic
Titolo: Come ricavare la risoluzione dello schermo?

Brevemente, come faccio a sapere la risoluzione dello schermo?
Credo la si possa conoscere tramite le opportune API; ho cercato nell'MSDN,
ma non ci capisco nulla... :-(
Qualcuno potrebbe gentilmente illustrarmi un pezzetto di codice che va a
prendere la risoluzione dello schermo?
Il tutto dovrà funzionare in VBA (è roba per Access).
Grazie infinite, Max

 Il tutto dovrà funzionare in VBA (è roba per Access).
non uso VBA e non so se funzioni :(
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #26 delle Mitiche Brigate Takahashi sezione Sud

 non uso VBA e non so se funzioni :(
Non funge :-(
L'oggetto screen del VBA non ha quelle funzioni :-(((((((((
Grazie comunque.
Altre idee?
Max

prova a guardare sul sito comune, sicuramente trovi qualcosa............
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

 prova a guardare sul sito comune, sicuramente trovi qualcosa............
ho già trovato, grazie :-)
Max
Newsgroup: it.comp.lang.visual-basic
Titolo: Vb.NET come creare e modificare un SQL

Salve a tutti.
ho un piccolissimo problema :-)
vorei creare con 
VB.NET
 un database SQL
oppure crearlo con un software specifico ( esempio MDB con ACCESS)
aver la possibilita con 
VB.NET
 di eseguire le classiche operazioni (
Lettura, Srittura nuovo rigo , Eliminazione rigo, ecc)
Ho eseguiti vari tentativi ma non sono mai riuscito ad ottenere nulla che
funzionasse.
Mi chiedo:
1) esiste un esmpio in rete del mio problemino?  ( esempio Agenda con
VB.NET
)
2) se si indicarmi il sito
3) se no .... AIUTO!!!!!!!!!!!!!!
Saluti a tutti.
IoIoIS

 vorei creare con 
VB.NET
 un database SQL
101 esempi in 
VB.NET
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnvssamp/ht
ml/vb_VBSamplesTop.asp
Mi sembra ci sia un esempio che puņ aiutarti.
giuseppeD


se può interessarti, qui trovi un paio di capitoli estratti da libri su ADO
.NET: potrebbe essere un punto di partenza...
http://www.ugidotnet.org/books/books_category.aspx?ID=4
.A
UGIdotNET - 
http://www.ugidotnet.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Scelta Database: MySQL o Interbase

Ciao a tutti,
un consiglio: devo cominciare a sviluppare con VB 6 Enterprise un software
client-server che si interfaccia ad un database server gratuito.
Io avevo pensato a MySQL oppure Interbase, entrambi freeware. L'applicazione
dovrà essere usata da un max di 30 utenti concorrenti e il mio sw si
collegherà al db mediante ODBC. Non conoscendo nessuno dei due voi quale mi
consigliate di usare e perchè? Vorrei sapere anche della 'compatibilità' con
VB, fino ad ora ho usato SQL Server/ Oracle e Access: questa volta però il
cliente richiede espressamente un db free.
Non è escluso il fatto che successivamente si sviluppi anche una interfaccia
basata su web server, in questo caso verrebbe utilizzato apache e php (che
pare si integrino estremamente bene con MySQL)...quindi io sarei orientato
verso MySQL.
Aspetto comunque il vostro prezioso parere e vi ringrazio tantissimo per
tutto il supporto.
Ciaoo

 verso MySQL.
Non conosco molto Interbase (pensa però che noi l'abbiamo scartato persino
quando utilizzavamo i prodotti della stessa Borland come Delphi) ma se non
ricordo male è gratuito o funziona solo con un numero limitato di utenti
(5?), ma potrei sbagliarmi.
Comunque, se la tua intenzione è quella di spianarti la strada per un uso
nel web... non ho mai sentito parlare di Interbase come motore per i DB in
internet.
Non mi sembra che ci sia nemmeno qualcosa da parte di PHP per
l'integrazione.
Con ASP potresti cavartela se Interbase consente l'uso di OLEDB, ma anche
qui... non ho mai visto un provider che lo supporti.
PHP e MySQL per quel pochissimo che ho provato si integrano benissimo e
sembra essere molto veloce.
Ciao

[CUT]
Occhio che Mysql non è veramente gratuito
leggetevi bene la licenza.
                                            danilo


Verissimo, ma a quanto mi risulta non esistono motori DB client-server
completamente gratuiti. Nemmeno Interbase.
Ciao

 ha scritto nel messaggio
news:3c7a1f49$1...@news.cis.it...

Msde.
(Sempre considerando che le sue prestazioni decadono "by design"
dopo i 5 users)
ciao
ugo

 dopo i 5 users)
Appunto :)
Si legge: "con più di 5 utenti compra MSSQL (facendo un mutuo)".
Ciao

 sembra essere molto veloce.
comunque, pure io ti consiglio di usare mysql e in seguito apache/php, ma prima
valuterei come è fatto il db e come in genere utilizzi il db da codice. Mi
riferisco ai problemi di integrità referenziali che ti costringono a cancellare
a mano i record nelle tabelle collegate
Saluti,
--
demis
Newsgroup: it.comp.lang.visual-basic
Titolo: fine del file

scrivo ?
Non lo devi scrivere (comunque l'eof mi sembra sia Chr$(26)) la funz. eof()
rende true quando reggiungi/passi la fine fisica del file.
Tant'č che l'esempio della guida č:
Dim InputDataOpen "MIOFILE" For Input As #1   ' Apre il file per l'input.
Do While Not EOF(1)   ' Cerca la fine del file.
   Line Input #1, InputData   ' Legge la riga di dati.
   Debug.Print InputData   ' Scrive nella finestra Immediata.Loop
Close #1   ' Chiude il file
Ciao

scrivo in un file di testo informazioni di vario tipo,
quando lo apro in lettura
while not eof(1)
...
il problema è che probabilmente quando scrivo il file, in questo non metto


":-) msmile" ha scritto:

    Non ho capito bene qual'è il tuo problema, comunque per saper quando sei
alla fine di un file va bene l'EOF, se invece vuoi controllare se il file è
vuoto puoi usare     Open "file.txt" For Input As #1
     bait = LOF(1) 'per controllare il file è vuoto
    if bait=0 then
        'il file e vuoto
    end if
close
ciao - Forza Ferrari -

Allora vediamo se riesco a chiarire tutto...
in origine ho un file creato da un sistema unix all'interno del quale
ovviamente i "vai a capo" sono scritti alla unix ovvero solo CR.
Ora siccome il file deve essere letto da un programma vb de ovviamente
essere convertito.
Per la conversione mi affido ad una mia routine che sintetizzo-
Open file unix for BINARY as 1
Open file forVB for APEND as 2
while not eof 1
get 1,,a
if a <> chr(13) then
    print 2,a;
else
    print 2, VBCRLF
endif
wend
quindi alla fine il file 2 contiene tutto quello che mi serve solo che...
non contiene EOF (neanche se provo a scriverlo con CHR(26) )
Ecco il problema.
O meglio... quando apro il file 2 in lettura con
while not eof 2
...
wend
ho errore di lettura in quanto non trova EOF.
Spero di essere stato chiaro... se non lo sono stato allora mando il codice
che non funziona

Non puoi usare EOF con un file aperto FOR BINARY (questa condizione si
applica ai file aperti FOR INPUT). Un file BINARY può estendersi oltre la
fine del file.
Mi viene anche il dubbio che VB sia in grado di gestire la line input su
file con linee terminate solo da CR (in qualche BASIC avrebbe funzionato,
perlomeno).
Mi sembra che l'approccio sia sbagliato, oltre che decisamente poco
ottimizzato, ma se devi testare la fine del file su un binary, puoi testare:
dim fs as long
fs = lof(1)
while seek(1) <= fs
...
wend
Sarebbe comunque meglio leggere il file a blocchi (visto che cerchi un solo
carattere è anche facile).
----------------------------------------------------------------------
Stefano Minardi
Zetesis: 
zet...@mclink.it
----------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Hello world!

Ciao a tutti!!!
;)
Mi chiamo Alessandro e visito spesso questo gruppo anche se mi limito a
osservare.Sbaglierò?(Rimedio appena mi faccio adsl a casa,adesso sto in
ufficio)
Come un pò tutti, penso, ho iniziato a scoprire adesso Vb.net in tutto e
per tutto e devo dire che MI PIACE.
Sto divorando la guida, ho scaricato i 101 esempi presenti sul sito della
microsoft, si trovano qui: 
(
http://msdn.microsoft.com/vbasic/downloads/samples/default.asp
)
vorrei chiedervi: conoscete altri link su esempi,Tutorials,Guide,libri
ecc..(in inglese li preferisco anche perchè mi sto sforzando di leggere
solo in inglese)
un'altra piccola mi impegnerò nel partecipare attivamente ad un gruppo di
discussione vivace come questo,meglio se it.comp.lang.VB-Net,quindi spero
di essere di aiuto.
grazie.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 solo in inglese)
Beh se ti accontenti di un sito italiano c'e' l'ottimo sito dello User Group
Italiano dedicato a .NET (in calce sotto la firma).
In inglese consiglio:
www.gotdotnet.com
hth,
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org

 
www.gotdotnet.com
io conosco questo:
http://www.codeproject.com/
Grazie Lokar,
è facile accontentarmi visto che adesso non ho esigenze lavorative,le
avrei ma uso vb6 impiego meno(diciamo pure che vado + spedito) !!!Sigh!!! 
:(
inoltre adesso vorrei imparare quindi tutto fa brodo.


 _it.comp.lang.VB-Net_,quindi spero di essere di aiuto.
Nel caso in cui la votazione avesse esito positivo,
it.comp.programmare.dotnet non andrebbe bene? ;-)
Quando si dice "Cicero pro domo sua" :-p
-- 
Ale
E` in corso la CFV per per
*it.comp.programmare.dotnet*,
Si può leggere il manifesto su
_it.news.annunci_ o _it.news.votazioni_

Newsgroup: it.comp.lang.visual-basic
Titolo: API

Quali manuali spiegano il funzionamento delle funzioni api ed il significato
delle variabili parametro?
Magari la domanda è mal posta ma io non ci campano molto su questo
argomento.
Grazie dell'interessamento
--
Luca Paganelli
bio...@XXXalinet.it
Togli XXX

Grazie dell'interessamento


...

Newsgroup: it.comp.lang.visual-basic
Titolo: PER ESPERTI

Ho un problemino con i thread!!!!
Riesco a creare diversi thread utilizzando le API, ma non riesco a crearli
indipendenti. Cioè ... se lancio due thread, il primo che ho lanciato si
blocca e non finisce di eseguire i comandi finchè non ha finito il secondo
...
Qualcuno sa il motivo ???? qualcuno sa dove posso trovare un qualche
esempio,.... qualcuno sa ???
Grazie 1000 a tutti ....
                                                                    Jack!

Jack wrote:

Non vorrei sbagliarmi , ma mi sembra che il multithreading non è supportato da
VB6 o inferiori .   Da quanto ho sentito nel nuovo VB 7 ( o VB 2000 , non so'
come lo chiameranno) ( forse a sett. uscirà ) questa opzione verrà
implementata, come altre novità : sempre piu' vicino a C++( OOP yeahhhh) !

 ha scritto nel messaggio news:390F45CC...@f.it...


sii più specifico
ciao
"Jack" <a@b.c> ha scritto nel messaggio news:8emit3$ove$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Tormentone MDIForm

'Ngiorno a tutti,
mi chiedevo se in una toolbar di un MDI posso trattare una TextBox
valorizzandola da un form child.
Come fare?
ciao
Cristina

 wrote in message
news:91v5kh$59lif$1...@ID-61090.news.dfncis.de...

mdiForm.Text1.Text = "Ciao"

 mdiForm.Text1.Text = "Ciao"
il concetto e' quello, ma forse la nostra cris si sta chiedendo come mettere
il textbox nella barra ?

 wrote in message
news:91v8q9$5il2u$1...@ID-51318.news.dfncis.de...

forse... ma in fondo basta mettercela per provare... :-))

 wrote in message
IdF06.158477$hk4.5...@news.infostrada.it...



dipende cosa devi fare...
dal child form puoi utilizzare tutti i metodi e tutte le proprietà
della textbox indicando anche il form di appartenenza
e, nel form di appartenenza, puoi gestire tutti gli eventi della text box
come in un qualsiasi altro form...

 wrote in message
eOF06.158612$hk4.5...@news.infostrada.it...



childform.Command1.Value = true
semplice, no ? :-))
ciao
Enrico

 > Lo sò che faccio domande sceme, ma come faccio a generare dall'MDI un


Newsgroup: it.comp.lang.visual-basic
Titolo: Listbox e domanda

Come faccio a sapere se un certo nome "davide" č contenuto in una listbox?
Come faccio a cancellare un determinato nome "davide" da una lista!?!
Grazie in anticipo!!!

 Come faccio a sapere se un certo nome "davide" è contenuto in una listbox?


 Come faccio a sapere se un certo nome "davide" è contenuto in una listbox?


 Come faccio a sapere se un certo nome "davide" è contenuto in una listbox?


 Function LBFind(ByRef ListBox As ListBox) As Long
[cut]
deve essere:
Function LBFind(ByRef ListBox As ListBox, sFindString As string) As Long
 
Ri-Ciao
    	Adriano

 Come faccio a cancellare un determinato nome "davide" da una lista!?!
Dim lngIndex As Long
lngIndex = ItemByString(List1, "davide")
If lngIndex <> -1 Then _
    List1.RemoveItem lngIndex
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Come stampo la form attiva ?

vorrei mettere nel menu file di un mio programma il pulsante stampa per
stampare la form attiva, ma non lo so fare, in particolare non so come
individuare la form attiva.
Mi aiutate prego ?
Grazie Tuareg


puoi mettere in ciascuna form il pulsante "Stampami" con evento click...
Me.PrintForm
oppure dal menù "Stampa la Form" del  Mdi...... MDI.ActiveForm.PrintForm
bye

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Nomi tabelle e DSN

Ho scritto un po' di righe di codice che mi permettano, dato il nome del
DSN, di trovare il nome delle tabelle.
Ecco il codice:
        Set wrkODBC = CreateWorkspace("", "admin", "", dbUseODBC)
        Set Db = wrkODBC.OpenDatabase(StringaConn)
        For Each Td In Db.TableDefs
            If (Td.Attributes And dbSystemObject) = 0 Then
                Combo1.AddItem Td.Name
            End If
        Next Td
        Db.Close
        Set Td = Nothing
non capisco xche arrivato a "For Each" dica "Operazione non supportata da
questo tipo di oggetto" e se vado in debug non va avanti. In StringaConn
c'e' il nome del DSN che mi serve.
Esiste un altro modo che mi permetta, sempre dato il DSN, di accedere ai
nomi delle tabelle???
Grazie!

"francy" <aaa...@llll.jj> ha scritto nel messaggio
news:bhfqsc$c3i$1...@grillo.cs.interbusiness.it...
: Ho scritto un po' di righe di codice che mi permettano, dato il nome del

Ho provato e mi da lo stesso errore.
Il tutto funziona normalmente se mi connetto ad un qualsiasi database ma non
creando un WorkSpace via ODBC.
Non so, non capisco, anche il banale TableDefs.Count da errore, sempre lo
stesso.
A questo punto credo che il problema stia proprio nel workspace...o chissà
dove.
Ah, hai percaso referenziato DAO 3 e qualcosa o qualcos'altro?
La cosa mi ha incuriosito, se risolvo ti faccio saprere.
Ciao, Luca.

Forse proprio non si può:
Cito da 
http://archive.baarns.com/access/faq/ad_DAO.asp
You cannot create or modify tables through the DAO object model when using
ODBCDirect. You must use Data Definition Language (DDL) operations to
perform those functions. This is because ODBCDirect doesn't provide a
TableDef object. You can, however, perform DDL operations by using
ODBCDirect to execute SQL DDL statements.
Non sono molto ferrato in DAO e ODBC...
Ciao, Luca.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?OT?] Che bello...

Che bello quando un frequentatore del NG ti risponde dicendoti che la tua
soluzione funziona.
E' bello anche quando dice che la tua soluzione non funziona.
perchč:
1) Hai il piacere di sapere di essere letto ed ascoltato.
2) Puoi avere il piacere di essere stato utile dispensando le tue
conoscienze.
3) Hai un riscontro sulle tue tecniche.
Secondo me sarebbe buona norma dare un parere sui consigli ricevuti, anche
se questo riempirebbe il NG di messaggi "inutili".
Ovviamente non č il caso di replicare a tutti i msg. indiscriminatamente per
ogni cavolata.
Cosě, tanto per cominciare bene... qual'č la vostra opinione su quanto
sopra?
Ciao a tutti


Non inviare messaggi HTML.
Lo hai letto il manifesto del NG???
Kickaha

Si l'ho letto!
Scusami!!!
ciao!
Kickaha ha scritto:


Newsgroup: it.comp.lang.visual-basic
Titolo: Setup Wizard ??

Hi
I have created a program in Visual Basic 5.0. I have created a setup program
from it using setup-wizard. When I run setup on other machine I get this
message
" The File 'C:\Windows\System\$(DLL SelfRegisterEx)' could not be registered
because it was not found."
After this message it starts unstalling the components.
I found that this problem is due to a file dao350.dll.
Here is the code which i found in file "St5unst.000".
ACTION: DllSelfRegister: "C:\Program Files\Common Files\Microsoft
Shared\DAO\DAO350.dll"
*** ERROR: The file 'C:\WINDOWS\SYSTEM\$(DLLSelfRegisterEx)' could not be
registered because it was not found. *** ERROR: (User Responded with 'OK')
Please help me.
Pankaj Rawat
rawat...@usa.net
raw...@yahoo.com
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

...

Newsgroup: it.comp.lang.visual-basic
Titolo: [API] non capisco...

Qualcuno mi dice cosa non va nel codice seguente?
grazie, ciao
'***************************************
Dim ret, ret2, rwnd, ltipo, valore, sizz As Long
Dim nome_val As String * 255
'****HKEY_CURRENT_USER\Software\prova   esiste...
ret = RegOpenKeyEx(HKEY_CURRENT_USER, "Software\prova", 0, KEY_ALL_ACCESS,
rwnd)
'****... e infatti ret = 0  cioč ERROR_SUCCESS e rwnd contiene l'handle
'******Il valore DWORD "numero" esiste
nome_val = "numero"
ret2 = RegQueryValueEx(rwnd, nome_val, 0, ltipo, valore, sizz)
'******considerando quindi che rwnd contiene un handle valido, perche ret2 =
2 cioč come dice '******winerror.h 'ERROR_FILE_NOT_FOUND
'****************************************

 '****************************************
direi che ha ragione ;-)
dichiara la funzione cosi':
Public Declare Function RegQueryValueEx Lib "advapi32.dll" Alias
"RegQueryValueExA" ( _
   ByVal hKey As Long, _                  ' Handle to open registry key
   ByVal lpValueName As String, _   ' Name of value
   ByVal lpReserved As Long, _        ' Reserved, must be 0
   lpType As Long, _                         ' Registry data type constant
   lpData As Any, _                          ' By reference variable for
data
   lpcbData As Long _                     ' Number of bytes of data written
) As Long
quindi la potrai richiamare cosi':
ret2 = RegQueryValueEx(rwnd, "numero", 0, ltipo, valore, sizz)
o cosi'
Dim nome_val As String
...
nome_val = "numero"
ret2 = RegQueryValueEx(rwnd, nome_val, 0, ltipo, valore, sizz)
HTH
bye
r

Newsgroup: it.comp.lang.visual-basic
Titolo: ?Tendina combobox

Alla pressione di un command button, dovrei visualizzare del testo nella
tendina di un combobox con style (simple combo)
Ma senza il pulsante a destra, che io sappia non è possibile.
Mi piacerebbe essere smentito.
Esiste qualche modo?
Grazie Carmelo

Carmelo wrote:

Quale sarebbe lo scopo?
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca


Intanto voglio un bottone descrittivo e non la freccia e poi che non scateni
l'evento dropdown alla pressione del tasto freccia.
Ciao Carmelo

 scateni l'evento dropdown alla pressione del tasto freccia.
Insomma, Carmelo, non vuoi una ComboBox :)
A questo punto, prendi una TextBox e posizionagli accanto un pulsate... 
tanto difficile???


 tanto difficile???
ho l'impressione che voglia tipo un listbox alto come il pulante, che pero'
alla pressione del pulante scenda a tendina, cioe' aumenti la sua altezza.

 ha scritto nel messaggio
news:3tdl95F...@individual.net...

Esatto. Vorrei la ComboBox con la tendina senza il pulsante.
Carmelo

 Esatto. Vorrei la ComboBox con la tendina senza il pulsante.
appunto. come dice gianluca, non vuoi un combo :)
dato che il combo = txtbox + lstbox + pulsante
metti solo un listbox che visualizzi una riga
quando uno preme il tuo cmd aumenti l'altezza del lstbox (se vuoi piu'
items), o mostri un txt sotto (se devi visualizzare un solo item
multilinea), o quello che ti serve.
se uno nel tuo 'combo' ci deve scrivere, sovrapponi al combo un txt.
ecc. ecc.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: pacchetto installazione

Salve a tutti!
Devo acquistare un software per creare pacchetti di installazione
professionale. Quale mi consigliate di quelli attualmente in commercio?
Vi ringrazio anticipatamente!

 professionale. Quale mi consigliate di quelli attualmente in
commercio?
Wise o InstallShield
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Intercettare spegnimento Windows

Buongiorno a tutti!
Come da oggetto volevo sapere se esiste un modo di intercettare lo
spegnimento di Windows (nel mio caso sempre 98) ed eventualmente bloccarlo
per eseguire delle procedure prima di riprenderlo e quindi lasciare che il
pc si spenga. Ringrazio tutti per le risposte.
Ciao,
Mattia

Mattia ha scritto:

puoi usare il controllo sysinfo
-- 
Samuele Battarra
prova il mio newsreader:
http://news-navigator.sourceforge.net

Newsgroup: it.comp.lang.visual-basic
Titolo: Importare rubrica di Outlook

Come da oggetto, vorrei importare nella mia applicazione la rubrica di
outlook express o 2000.
Non so neanche da dove cominciare, veramente dovrei anche sapere prima se
uno di questi due programmi è installato e non so fare neanche questo.
Mi date qualche dritta ?
Grazie a tutti.
Ciao, Claudio.

 ha scritto

http://warjo.cjb.net
j.

Newsgroup: it.comp.lang.visual-basic
Titolo: [.net] Fill DataSet

Ho un dataset composto da una tabella fittizia, č composta dall'unione di
due tabelle
es:
Tab1 -> campi a1,a2,...,codice
Tab2 -> campi codice, b1,b2,...
Tabella -> a1,a2,....,b1,b2,.....,codice
come faccio a riempire il dataset di "Tabella"?
se utilizzo
OleDbDataAdapter1.Fill(objDataSet,"Tabella")
OleDbDataAdapter2.Fill(objDataSet,"Tabella")
non mi combina le colonne! (il campo codice funge da collegamento)

 non mi combina le colonne! (il campo codice funge da collegamento)
e lui, poverino, come farebbe a saperlo?
--
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 ha scritto nel messaggio
news:botkoe$1gvech$1...@ID-173193.news.uni-berlin.de...

dalla struttura del dataset?
mi serve per visualizzare in un datagrid il nome della provincia e non il
codice, però non mi va bene utilizzare il +, voglio visualizzare il nome
della provincia come una normale colonna, stò provando in mille modi ma
senza risultato, non ci credo che non è possibile!

 visualizzare il nome della provincia come una normale colonna
se non ho capito male, hai a disposizione due strade: caricare il datatable
utilizzando a monte una istruzione di join tra le due tabelle, oppure andare
a leggere qui
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q319082

Newsgroup: it.comp.lang.visual-basic
Titolo: Telnet e dati di ritorno ( come leggerli ..)

Salve, sto sviluppando un applicazione che effettua il telnet a delle
macchine di rete , una volta connesso devo impartire dei comandi e catturare
l'output.
Il mio problema é la macchina su cui effettuo il telnet ( dei nodi di rete
Frame-relay ) mi risponde con caratteri strani, che visualizzati in una text
box o in una richtext, mi danno solo una marea di caratteri illegibili.
Invece connettendomi tramite un client telnet ( per l'esattezza CRT ) la
visualizzazione della schermata mi ritorna correttamente.
Sono riuscito ad inserire la username e la password, oltre al comando da me
desiderato, ma a questo punto non riesco più a recuperare le informazioni da
me cercate, perchè l'output é illeggibile.
Avete dei suggerimenti o delle routine già fatte che possano aiutarmi a
venirne fuori.
Grazie in anticipo.
Marco.


Subito dopo aver inviato il messaggio mi si é illuminata la lampadina e mi
sono ricordato che in altri esempi veniva utilizzato il componente VT, ho
inserito quello ed ora la schermaat che mi appare é identica a quella che mi
aspetto.
Scusate ancora per il disturbo.
Marco.

 aspetto.
Scusa, cos'e' il "componente VT"?
-- 
Ciao!
    -DocDoc-
--- Per scrivermi: docdoc()
sertel.net
Sei anche tu stanco dei messaggi spam? Usa Terminator, il programma
anti-spam italiano FREEWARE!     
http://www.spamterminator.it/

Newsgroup: it.comp.lang.visual-basic
Titolo: Data Report

Come faccio a creare un data report che mi permetta di fare una cosa simile
Società1
                Studente1
                ................
                StudenteN
Società2
                Studente1
                ................
                StudenteN
Intendo realizzare una sorta di raggruppamento in base alla società poichè 
nel modo in cui lo faccio ora per ogni studente viene ripetuto il nome della 
società. Io invece vorrei che la società venisse ripetuta una sola volta per 
tutti gli studenti che vi si recano a fare los tage.
Spero d essere stato abbastanza chiaro.
Grazie,
Alessandro 

 tutti gli studenti che vi si recano a fare los tage.
E' una cosa di cui si è già discusso tantissimo.
- Se il numero di record è limitato, puoi pensare di inserire a 
desing-time, in sezione 1, una batteria di RptLabel, e poi a runtime, 
ciclando sul recordset, posizioni e popoli le RptLabel stesse. E' la 
soluzione più rapida, e semplice.
- La soluzione più bella, però, è quella di utilizzare i gruppi del 
datareport (vedi MSDN), e di collegare un recordset gerarchico (cerca 
su google RECORDSET SHAPE DATAREPORT).
Ciao
Alberto
-- 
I have a dream that my four little children
will one day live in a nation where they
will not be judged by the color of their skin
but by the content of their character.
Newsgroup: it.comp.lang.visual-basic
Titolo: Software che si blocca... o forse no!

Ho scritto un programmino che mi effettua in automatico delle copie di 
backup, semplicemente adoperando la funzione FileCopy. Ho anche fatto in 
modo da avere una progressbar (che evolve ogni volta che una filecopy č 
stata effettuata).
Se lancio la copia e non muovo la finestra del programma il software 
funziona benissimo, ma se invece muovo la form sul desktop mentre la copia č 
in corso in pratica ho un "freeze" della visualizzazione: la form si fa 
tutta bianca e resta cosě sino alla fine della copia (che avviene 
correttamente), quando poi torna normale. Da cosa puň dipendere? 

 dipendere?
Tra un FileCopy ed un altro, metti una chiamata a DoEvents
Inoltre, dai un'occhiata alla sezione 'Copying' di questo sito...
Ciao
http://vbnet.mvps.org/index.html?code/fileapi/index.html
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

> Tra un FileCopy ed un altro, metti una chiamata a DoEvents
Provato. Il "freeze" si risolve, ma la progressbar smette di aggiornarsi! 

TomSawyer wrote:

Ci fai vedere un po' di codice?
Ciao


 correttamente), quando poi torna normale. Da cosa può dipendere?
Vediamo...
FileCopy e' una funzione SINCRONA. In pratica, quando tu dai il comando
di FileCopy l'intero software si blocca in attesa che la funzione
finisca il suo lavoro. Quindi, se tutto il sw e' in attesa, non c'e'
nessuno che aggiorna la visualizzazione della finestra ed il risultato
e' quello che hai detto tu: form bianca fino alla fine della copia.
Ora, come ti ha detto qualcuno, puoi inserire un
doevents
me.refresh
doevents
Alla fine di ogni filecopy, in modo da avere un aggiornamento della
finestra ogni volta che finisce una copia.
Alternativamente, puoi usare un timer (ma non garantisco che funzioni):
metti un timer disabled sulla form, nel codice del timer ci metti il
filecopy, e via.
Oppure usi l'opportuna API di copia file di windows, quella che ti
mostra il progressbar standard, ma non me ne ricordo, il nome ^_^;;;

 Ciao
Il tutto avviene in un ciclo fordi questo tipo:
 For k = 1 To CopyNames.Count 
            Label4.Text = "Copia del file " + k.ToString + "di " +
CopyNames.Count.ToString + "in corso..."
            Label4.Refresh()
                FileCopy(TextBox1.Text + CopyNames(k),
ComboBox1.SelectedItem + "backupfolder\" + CopyNames(k))
            ProgressBar1.Increment(CInt((k / CopyNames.Count) * 100) -
currentpercentage)
            currentpercentage = ProgressBar1.Value
        Next
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Help me! Aiuto

Qualcuno può dirmi come fare con VB a caricare i file .avi?
E' da poco tempo che studio come programmare.
Grazie anticipatamente a chi vorrà rispondermi.


---------
Ciao!
Sul mio sito Internet, nella sezione "Dichiarazioni API", trovi un progetto
di esempio, "Multimedia.zip", che ti mostra come aprire diversi elementi
multimediali, tra cui i file AVI, utilizzando l'interfaccia MCI di Windows.
Spero che possa risolvere il tuo problema. Fammi sapere
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] oggetto Data + mdb con password

Ho fatto un lavoro con un database di Access collegato ad un form attraverso
il controllo Data su cui visualizzo in alcune Label i campi del database.
Vorrei distribuire il tutto, ma vorrei anche sapere se esiste il modo di
proteggere il file MDB per evitare che qualcuno possa impadronirsene. Ho
provato ad impostare una password su Access, ma così il programma non riesce
ad accedere al DB. C'é un modo magari di comunicare ad Access la password
attraverso VB(6)  od altro?
Grazie mille

hai provato a cercare nell'help...:)))
azz... è spiegato benissimo...
p.s: comunque è una straFAQ
ciaoz
Obese Dwarf

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Generare un exe separato

Ciao
avrei bisogno di implementare in un mio programma vb6
la possibilita' di creare un exe  separato premendo un pulsante di creazione
exe.
Lo so che da codice non e' una cosa semplice ma magari c'e' un ocx oppure
una libreria gia pronta
ciao

Nel suo scritto precedente, IOL ha sostenuto :

Intendi 'ricompilare un progetto e generare un exe', o semplicemente 
'copiare l'exe corrente generandone uno identico'?
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.

 creazione exe.
Dipende da che compilatore vuoi usare.
Creare un eseguibile VB6 penso sia difficilissimo se non completamente 
impossibile in quanto non č possibile usare il compilatore da altre app.
In .net č moooooooooooolto piů semplice grazie alla Reflection.
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site 4 : 
http://www.thetotalsite.it
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS
"Un problema non č un problema se puň essere risolto" 

 usare il compilatore da altre app.
Sei sicuro di quello che scrivi?
Se selezioni un .VBP o un .VBG sul menů visualizzato dal
tasto destro del mouse compare la voce "Crea" (o "Make").
La voce Crea corrisponde ad un riga di comando del tipo:
C:\Programmi\Visual Basic\vb6.exe "%1" /make
Ti chiedo: tu per caso sai per certo che č impossibile
lanciare lo stesso comando da una shell?
Ciao.
Mauro 

 lanciare lo stesso comando da una shell?
Si, ma non puoi ridistribuire il compilatore insieme all' app...
In quanto è coperto da licenza, e dovresti quindi ridistribuire anche vb.
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site 4 : 
http://www.thetotalsite.it
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS
"Un problema non è un problema se può essere risolto" 

 MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS


 teoricamente cifrare come file di configurazione ] )
Il Framework .NET contiene già i compilatori. Non dovrebbe essere molto 
difficile far generare al tuo programma un sorgente, ad esempio in VB, e 
poi farlo compilare sulla macchina dell'utente.
-- 
Saluti
VITRIOL

Newsgroup: it.comp.lang.visual-basic
Titolo: [REQ VB 6 Debug] Debug di una Dll ActiveX

Salve a tutti,
e scusate la domanda da pivello ma mi trovo veramente in difficoltà.
Sto sviluppando una DLL ActiveX per un server Web. Questa DLL dovrà
restituire dei recordset a un'applicazione VB Client. Il mio problema
è fare il Debug della DLL sul mio PC dove Sviluppo. Ora sto andando a
tentativi. Ma c'è un modo di eseguirla Passo Passo e vedere dove va in
errore?
Grazie per l'aiuto.
PS Io Uso Visual Studio enterprise con SP 5
Grazie
Marco

 ha scritto nel messaggio
news:d0aff946.02112...@posting.google.com...


 errore?
Carichi il progetto della dll in VB, lo metti in compatibilità binaria con
la dll, la mandi in esecuzione.
Mai provato tramite un server web, ma dovrebbe andare: mandi in esecuzione
la tua app e VB poi si aggancia alla dll compilata.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: select case e operatori booleani

'--------------------------------------------
Dim numero As Integer
numero = 15
Select Case numero
    Case 0
        MsgBox 0
    Case 1 To 5
        MsgBox "compreso tra 1 e 5"
    Case 6, 7, 8
        MsgBox "numero=6,7 o 8"
    Case Is > 8 And numero < 11
        MsgBox "compreso tra 9 e 10"
    Case Else
        MsgBox "numero è maggiore di 10"
End Select
'--------------------------------------------
Questa semplice routine dovrebbe visualizzare "numero è maggiore di 10" e
invece visualizza "compreso tra 9 e 10". Qualcuno mi sa dire perchè? E' un
errore di sintassi o cosa? Ho provato a mettere delle parentesi
nell'istruzione
Case Is > 8 And numero < 11  ma mi dà errore
La routine seguente, invece, dovrebbe dare "compreso tra 9 e 10" e invece
dà "numero è maggiore di 10". Forse gli operatori booleani non vengono
valutati bene all'interno dell'istruzione case?
'--------------------------------------------
Dim numero As Integer
numero = 10
Select Case numero
    Case 0
        MsgBox 0
    Case 1 To 5
        MsgBox "compreso tra 1 e 5"
    Case 6, 7, 8
        MsgBox "numero=6,7 o 8"
    Case (numero > 8) And (numero < 11)
        MsgBox "compreso tra 9 e 10"
    Case Else
        MsgBox "numero è maggiore di 10"
End Select
'--------------------------------------------
Ringrazio in anticipo

"Adriano Meis" <me...@email.itNOSPAM> ha scritto nel messaggio
news:5GXv8.59437$SR5.1...@twister1.libero.it...
Devi usare case 9 To 10
vedi case nell'help...

 Select Case numero
[SNIP]
No, non credo tu possa combinare le espressioni in quel modo; il primo caso
penso venga valutato come come se avessi scritto
Case Is > (8 and numero <11)
che svolgendo le operazioni booleane e bit a bit diventa
Case Is > 8
per lo stesso motivo il secondo equivale a
Case True
Semplicemente, anche qui, devi utilizzare "x To y"
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 ha scritto nel messaggio
news:a9phq6$31c4$1...@half.spin.it...

Si, certo che lo so che va bene case 9 To 10 ma sto cercando di capire
perchè non vanno bene
Case Is > 8 And numero < 11   e


 Case (numero > 8) And (numero < 11)
non va' bene perche la sintassi dell'operatore Is
e':
    Is operatoreconfronto espressione
quindi un solo operatore di confronto e tutto il resto viene
considerato un espressione da valutare e da confrontare
tramite l'operatore con il valore corrente di 'numero'
nel tuo caso: 8 And 12 = 8 poi 8 < 11 = True (cioe' -1)
il risultato valutato e' Case Is > -1 che risulta vero perche'
numero vale 12
saluti
RG
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.Net]Qualche domanda

Sto cercando di riscrivere un piccolo programma fatto in VB6 in VS2008, 
giusto per rendermi conto a cosa vado incontro.
Ho notato per ora qualche piccola cosa che non è più possibile o almeno 
penso, visto che non riesco a farla.
In VB6 faccio partire la mia applicazione da SubMain dalla quale caricavo 
percorsi e impostazioni varie.
Da quanto ho avuto modo di vedere in questi giorni che sto smanettando 
vs2008 mi pare che non sia possibile, se è possibile come?
In VB6 uso la Toolbar con i buttons stile ButtonGroup. In vs2008 dovrebbe 
essere la Toolstrip ma questo stile mi pare non esiste.
Come posso fare?
Carmelo 

Il 03/01/2011 14.24, Carmelo ha scritto:
zac
In vb6 ti ricordi che c'era "proprietà progetto"?
prova a fare click destro sul tuo progetto e scegliere proprietà???
Va quanta roba!
Etichetta Applicazione
C'è il tipo di progetto
se hai un progetto windows form c'è un flag spuntato Framework 
applicazione che ti consente di impostrae il form iniziale
Ora
secondo te se lo disabiliti?
Se lo disabiliti ti chiede da dove vuoi far partire il tutto...se da una 
form...o da sub main!!!
Ma potresti fare molto di più...basterebbe avere una buona guida
ad esempio
http://totemslair.org/guide/viewchapter.php?guida=vb&id=108
http://www.visual-basic.it/articoli/ozdcFirstSteps_03.htm
http://totemslair.org/guide/viewchapter.php?guida=vb&id=67
etc etc
-- 
------------------------------
Wodka40 Thunderbirizzato
Wodka si è pure facebookkizzato
http://www.facebook.com/Wodka40
In omaggio ai primi 10 amici un pullover di
lana ombellicale di "Giggi er sozzo"

Questi articoli  ozdcFirstSteps sono frammentati su 
visualbasic.it
 dove li 
trovo in successione? o devo stamparli?
Carmelo

Newsgroup: it.comp.lang.visual-basic
Titolo: R: come decompilare un eseguibile fatto con vb5

Com'era l'indirizzo di quello in italiano?
(č illegale decompilare applet Java? Io avevo sentito dire di no)