mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: CReports stampare campi DB "variabili"

Ciao a tutti,
ho la necessità di preimpostare una stampa da CReports con 10 colonne del
tipo
NOME    COGNOME    INDIRIZZO
-------------------------------
Rossi    Mario            Via pippo
Ho la necessità però che le 10 colonne siano variabili nel senso che ho una
tabella di un DB con tipo 50 campi, e a seconda di cosa l'utente seleziona
devo stampare solo quei campi fino ad un max di 10.
Ho pensato di impostare i 10 campi sul CReports, e poi passare un recordset
come fonte dati, questo l'ho fatto e funziona, voglio sapere se posso
passare campi diversi, ad esempio se sul report imposto il campo1= [NOME],
mentre l'utente seleziona il [COGNOME] la stampa prende i dati dal campo
COGNOME del recordset oppure va in botta perchè nel recordset non trova il
campo [NOME]?
Grazie :)

Caro Andrea,
al posto di inserire 10 campi inserisci 10 formule vuote: @CAMPO1,  @CAMPO2,
... ,  @CAMPO10.
Poi, prima di stampare il report, associa alle formule il contenuto del
campo desiderato:
REPORT.Formulas(0) = "@CAMPO1=" & {NOME}
REPORT.Formulas(1) = "@CAMPO2=" & {COGNOME}
REPORT.Formulas(2) = "@CAMPO3=" & {INDIRIZZO}
REPORT.Formulas(3) = "@CAMPO4=""
REPORT.Formulas(4) = "@CAMPO5=""
REPORT.Formulas(5) = "@CAMPO6=""
REPORT.Formulas(6) = "@CAMPO7=""
REPORT.Formulas(7) = "@CAMPO8=""
REPORT.Formulas(8) = "@CAMPO9=""
REPORT.Formulas(9) = "@CAMPO10=""
Ciao!
Ettore Massimo Albani
(leva ANTISPAMMER dall'indirizzo per inviare messaggi)

 campo desiderato:
Ti ringrazio, ora ho un problema con CReports che in pratica dopo aver
installato ADO 2.8 non mi funziona praticamente più. Non appena risolvo
provo, oppure lo farà il mio collega da delphi...
Ciao :)

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] una Listview estesa?

Esiste un controllo che mi permette di creare delle strutture ramificatecon
elementi e sottoelementi?
Mucio

 elementi e sottoelementi?
La TreeView non va bene?
Ciao,
Carlo.

 wrote in message
9tvkte$51o$1...@pegasus.tiscalinet.it...


 wrote in message
news:9tvkte$51o$1...@pegasus.tiscalinet.it...

si, non l'avevo proprio vista ;)
Mucio

 oulook espress.
Potresti associare una TreeView ad una ListView...
C.

 ha scritto nel messaggio
news:9tvqja$gkr$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Forecolor RichTextBox ?

Buon giorno,
è possibile modificare il ForeColor di UNA riga di una RichTextBox ?
Grazie.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 č possibile modificare il ForeColor di UNA riga di una RichTextBox ?
Sě, vedi SelColor e capirai anche (tramite le altre .Sel-eccetera) che
dovrai fornire il pezzo di testo da colorare.
Se cerchi in questo NG, magari tramite Google, troverai anche qualcosa che
ti consente di sapere in quale riga si trova il cursore...

Temevo di dover passare dal SelectionColor, ma magari c'era qualcosa di
più sbrigativo, comunque grazie!

Newsgroup: it.comp.lang.visual-basic
Titolo: divisione in un gruppo

Cari amici
Avrei bisogno di un aiutino : ho iniziato da pochi giorni a lavorare
con VB6 e Crystal Report. Vorrei sapere come è possibile fare una
divisione, o qualsiasi altra operazione tra due campi somma di gruppo
Grazie
Christian Hamnett - Chieri

La domanda non è molto chiara!
Su CR puoi usare le formule, oppure se i dati provengono da un DB, puoi fare 
la divisione direttamente dentro una query e passare il risultato a CR.
Ciao, Vincenzo
Newsgroup: it.comp.lang.visual-basic
Titolo: Bit reversibile per avvitatore

Avete presente quel bit in dotazione agli avvitatori, quello che da una 
parte ï¿œ cacciavite a taglio e dall'altra cacciavite a croce?
Ebbene, io non so se sono io a essere imbranato, o questi oggetti a 
essere delle merde (ammetto di non acquistare utensili Makita o Hilti, 
ma al massimo Black&Decker o Bosch verdi), ma a me il bit a croce si 
mangia dopo pochi utilizzi.
E' vero che in dotazione c'ï¿œ una sola misura, mentre a volte serve la 
croce piï¿œ grande o piï¿œ piccola o piï¿œ appuntita o piï¿œ cicciona, ma boh, 
a me dopo un po' che avvito inizia a saltare sulla vite e si mangia.
Ho una scatola coi bit singoli, quelli o a taglio o a croce o anche 
altre tipologie, ma non trovo da nessuna parte quello reversibile, che 
ï¿œ tanto comodo perchï¿œ sta innestato nel fianco del trapano e 
dell'avvitatore e ce l'ho sempre a portata quando serve.
Qualcuno sa dirmi se esiste il bit reversibile come ricambio, e magari 
se devo guardare qualche materiale o marca particolare per avere un 
oggetto che duri seriamente negli anni?
Alberto
-- 
La bellezza ï¿œ opinabile, sulla bruttezza sono tutti d'accordo.

oggetto che duri seriamente negli anni?
Non lo so,  e visto che qui sei abbastanza OT faccio f-up dove forse lo sanno.
--
ciao
  Stefano

 Come faccio io da questo ng a sapere su quale ng lo hai f-uppato ?
Nelle propriet� del messaggio. Click destro sul post, propriet�, cerchi
negli header la riga Followup-To.
In questo caso era:
    Followup-To: it.hobby.fai-da-te
TRa l'altro, ho ripescato il tuo post appunto su IHF-D-T e l'ho rimandato
qui su ICLV-B a mano :-).
Bye, G. 

Bye, G. 
Il F-up era giustamente su i.h.f-d-t, e non avevo messo il crosspost proprio per
evitare che le risposte sull'avvitatore finissero anche qui.
--
ciao
  Stefano

 per evitare che le risposte sull'avvitatore finissero anche qui.
Ecceloso :-), ma era l'unica maniera di far vedere il post a Greg,
che probabilmente non segue l�.
Bye, G. 

"SB" ha scritto

Non era un rimprovero il mio, dopotutto potevo scrivere anche il nome del ng in
f-up, davo per scontato che si vedesse nelle intestazioni del messaggio .
Ma non tutti usano Agent che te lo fa vedere in alto, e bisogna pensare anche ai
poveracci che usano OE   :-)
--
ciao
  Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Aggiungere una casella sulla barra del titolo

Ciao peoples !
Sapete mica se é possibile tramite qualche API , aggiungere una casellina a
fianco dei soliti "minimizza" "massimizza" "chiudi" ??
Credo che si debba fare con il BitBlt giusto ?
Grazie per aver letto il mio messaggio.
DaVe
--
Leave [KILL SPAM] from adress.


Non cosi' banalmente, purtroppo...
E' necessario:
1) subclassare la form
2) intercettare il messaggio WM_NCPAINT
3) disegnare la "casellina" usando le API GDI.
Inoltre, per gestire gli eventi (almeno il click) sul tuo nuovo pulsante,
devi (sempre nel subclass della form) intercettare e gestire i messaggi
WM_NCMOUSE***
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con Form e Size

Salve,
come faccio ad impostare una form Minizzabile nella barra, 
ma non resizabile?
Grazie.
Elena.


BorderStyle = Fixed Single
MinButton = True
Roal Zanazzi
Newsgroup: it.comp.lang.visual-basic
Titolo: era la DAO350.dll !

per javalab: era proprio la DAO350.DLL non registrata: non appena registrata
con regsvr32 il mio programmino di selezione da database ha iniziato a
girare perfettamente sul computer dell'ufficio.
su quello dei colleghi non so: stamattina ero di turno solo io e c'era da
fare...
cmq mi piacerebbe creare un piccolo eseguibile che, lanciato, provveda alla
registrazione... penso siano poche righe di codice, stasera mi ci metto
dietro.
nel frattempo se tu (o chi mi legge) sai dire che codice scrivere per
lanciare regsvr32 da VB5 (possibilmente skippando il msgbox di registrazione
avvenuta con successo) ...
grazie a chi risponde

 girare perfettamente sul computer dell'ufficio.
Bene (si fa per dire con tutta la storia che c'č dietro), ma questo č il tuo
terzo topic sullo stesso argomento.
In futuro, fai come vuoi, come sempre, del resto.

ciao lupo...
beh, č il terzo topic, ma visto che il problema non era (come penso tu sia
convinto, ma tvb lo stesso) nel codice relativo alla istruzione select ma
nella registrazione della DAO, volevo dirlo a javalab.
ps: se sai la riga di codice da scrivere per lanciare regsrv32 con annessi e
connessi, ti ringrazio in anticipo

 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB 5] Arieccomi con Excel

Ciao ragazzi,
mi spiace per quanti hanno gia' letto il post vecchio, ma purtroppo non ho
ancora risolto e quindi sono costretto a ripeterlo.
A dire il vero sul N.G. non lo trovo piu', bah:)
Cmq si tratta di questo:
Ho necessita' (ma non essenziale) di sapere se su un Pc è installato Excel
cosi da poter fare girare la mia procedura.
Poi (e questa è molto molto importante) ho bisogno assoluto di chiudere il
processo dopo che è stato lanciato il foglio XLS.
Cioe' succede che io da codice VB apro un foglio Excel, ma dopo che l'ho
chiuso se vado nel Task con Control+alt+canc vedo che il processo Excel è
ancora attivo e questo mi crea non pochi problemi.
A questo punto io avevo inserito le mie 4 righe di codice sperando che
qualche anima gentile me le volesse correggere o per lo meno aiutarmi a
risolvere. Le ripropongo:
Dim myExcelFile As Object
Set myExcelFile = CreateObject("excel.application")
filename$ = CommonDialog5.FileTitle
myExcelFile.workbooks.Open CommonDialog5.filename
On Error Resume Next
Set myExcelFile = GetObject(, "excel.application")
If Err.Number = 0 Then
Err.Clear
End If
If myExcelFile.Visible = True Then
     MsgBox "L'applicazione è gia'stata aperta. Chiuderla e riprovare"
     myExcelFile.Close
     myExcelFile.application.quit
     Set myExcelFile = Nothing
     Exit Sub
End If
With myExcelFile
    '--------------------CODICE COPIATURA
FLEXGRID---------------------------
    FG3.Rows = 500
    Dim testo
    Dim riga
    FG3.Col = 0
    For riga = 0 To 500
    FG3.Row = (riga)........ecc ecc..................
.....................................................................
    MsgBox "COPIA DATI SU EXCEL ESEGUITA" & vbCrLf, vbInformation +
vbOKOnly, "Copia dati Excel"
End With
myExcelFile.WindowState =  vbNormal
myExcelFile.Visible = True
Set myExcelFile = Nothing
Mi avevano detto che c'erano degli errori,(solo detto purtroppo ma senza
sapere quali), io ho messo un Close e un Quit (letto qua è la su forum) per
sperare di chiudere il processo, ma non funzia:(
E poi ho scoperto che non sempre mi formatta le colonne a SX, mi dite come
faccio?
Grazie ragazzi, datemi una mano che ho quasi finito :)
A presto
Paolo
CIAUZ:)

 Grazie ragazzi, datemi una mano che ho quasi finito :)
    Mi spiace deluderti ma con l'automazione devi ancora cominciare.
Coraggio!
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------

 Maurizio
Ciao Paolo :)

 una parte) migliore. Vedi tu.
    Visto.


Newsgroup: it.comp.lang.visual-basic
Titolo: aIUTO!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Lanciando il Setup Wizard mi dice "Valore di proprietà non valido, Si è
verificato un errore imprevisto" e si chiude, ho provato a reinstallare
tutto, ma non ho risolto.
Qualche suggerimento ???
Grazie

...


...


...

Newsgroup: it.comp.lang.visual-basic
Titolo: Sfondo del Desktop

Qualcuno di voi sa dirmi qual'è il comando per salvare come sfondo del
desktop un'immagine contenuta in un picture box ?
Grazie :-)

 desktop un'immagine contenuta in un picture box ?
Basta salvare la picturebox in un file BMP mediante
SavePicture
Poi imposti la BMP come sfondo del desktop mediante
l'API SystemParametersInfo
Per un esempio vedi il sito comune oppure qui:
http://vbsimple.virtualave.net/howto/021.htm
--
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 #25 delle Mitiche Brigate Takahashi sezione Sud

Newsgroup: it.comp.lang.visual-basic
Titolo: MSDN Universal, dove a buon prezzo?

	Salve a tutti e buon anno,
vorrei sapere per favore dove posso trovare la MSDN Universal ad un
buon prezzo, so che diversi rivenditori propongono sconti rispetto al
listino ufficiale di M$.
Inoltre mi chiedevo se con la licenza education è possibile usare
detto sw in ambito commerciale (ok, improbabile, ma chiedere non costa
molto, al numero verde di M$ non sapevano nulla sulle education).
Salve a tutti e grazie per l'attenzione.
Luca
Please remove _1010 from my address to reply
Don't dream it, BE it!

 molto, al numero verde di M$ non sapevano nulla sulle education).
MSDN Universal Education è riservata solo alle scuole o alle università.
Non è possibile ottenerla come singolo studente o come singolo docente.
-- 
Roberto Lupi
Newsgroup: it.comp.lang.visual-basic
Titolo: E' possibile in VB

Un saluto a tutti i frequentatori del NG.
Vorrei sapere se e' possibile (e come) inserire in un form un sottoform
(come in access...maschere e sottomaschere per intenderci). In particolare
vorrei poter scegliere di stampare solo form2 (che pero' e' dentro
form1)......altrimenti se questa operazione non e' prevista come si puo'
stampare solo una parte del form?
Ciao e grazie anticipatamente a tutti
e.

stampare solo una parte del form?
Printer.Print: l'unico modo per stampare sempre, ovunque, su ogni stampante e su ogni supporto senza
avere troppi problemi... estrapola i dati che ti interessano e spampali...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

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

Qualcuno saprebbe dirmi se c'è
un sito da cui scaricare il Visual Basic,
grazie.

 grazie.
no. e' un programma in commercio e va comprato.
se sei studente, la/le ver. learning costano molto meno.
avevo messo le demo di vb 4-5-6 su
http://members.xoom.it/vbup
ma sembra irraggiungibile.
se cerchi vb + working model sul sito ms prob trovi qualcosa.
ciao, a.

 ha scritto nel messaggio
news:9e6j46$19vkb$3...@ID-51318.news.dfncis.de...

Mi sembra che nei vecchi post c'era un LINK a un compilatore VB freeware...
Ciao
--
Timothy Redaelli
timothy.redae...@email.it
------------------------------------------------------------------
Togliere NONSPAMMARE per rispondere

 Mi sembra che nei vecchi post c'era un LINK a un compilatore VB
freeware...
a compilatori basic, piu' d'uno.
a compilatori vb, ho forti dubbi.
vb credo sia tm di ms.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO 2.5

Dove scaricarlo?
Quali sono i requisiti di sistema per poter utilizzare al meglio ADO 2.5?

 Quali sono i requisiti di sistema per poter utilizzare al meglio ADO 2.5?
http://www.microsoft.com/data/
Faber
P.S.: cmq siamo alla versione 2.6 SP1 ...

 ha scritto nel messaggio news:9rbids$sshsr$1...@ID-66268.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Database con Access 2000

Scusate ma come mai non riesco a lavorare con un database creato con access
2000?
Cosa devo fare per farlo funzionare???
Ciao
Ivan

 Ivan

 Bere un buon caffč,
e mentre il caffč si scalda, fare un giretto su google.
qualcosa mi dice che l'op stia usando jet 3.51 ...
o, orrore, gli oggetti data...
--
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 o, orrore, gli oggetti data...
Per come č stata formulata la domanda, potrebbe anche essere che non usa
neanche VB.....

Newsgroup: it.comp.lang.visual-basic
Titolo: Come convertire chiamate a USER.DLL in USER32.DLL?

Ho del codice Visual Basic che utilizza delle chiamate a funzioni
contenute nella libreria USER.DLL (Windows 3.11). Ho la necessità di
tradurre queste chiamate per utilizzare la libreria USER32.DLL (Windows
95 - 98). Sapete dirmi dove posso trovare la corrispondenza tra le
vecchie funzioni e le nuove?
Le funzioni che utilizzo nelle chiamate alla USER.DLL sono:
OpenComm
CloseComm
SetCommState
GetCommState
ReadComm
WriteComm
FlushComm
SetCommEventMask
GetCommEventMask
BuildCommDCB
EscapeCommFunction
GetCommError
Grazie per le risposte.
--
Posted from 
mta03-acc.tin.it
 [212.216.176.34]
via Mailgate.ORG Server - 
http://www.mailgate.org

forse sbaglio ma basta aggiungere una A alla fine.
OpenCommA
Saluti


Non vorrei dire cavolate, ma mi pare che tutte quelle API non ci sono piu'
:-(
Comunque, se hai l'help delle API Win32 o altra documentazione sulle API,
cerca la sezione "Communication Functions".
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: modificare dll , creare uno slider e un jog shuttle

chiedo 3 cose in uno...
1° non sono un esperto anzi sono alle prime armi--aiutatemi
-Devo modificare una DLL che mi serve per riprodurre file MP3 cioè
modificare le chiamte tipo PIPPO in PIPPO1 per poterla invocare due volte
all'interno del mio progetto, come posso fare... Visula C++5 non la apre...
cosa posso usare..
- vorrei creare uno Slider con l' icona del cursore a mio piacimento.
- ultimo, stò cercando controllo che riproduca un JOG-SHUTTLE tipo quello su
videoregistratori o simili insomma un cerchio con un pallino che se lo
faccio girare con il mouse in senso orario incrementi un valore , mi serve
per scorrere l'mp3
Grazzzzzie

per scorrere l'mp3
www.planetsourcecode.com
 ha decinaia e decinaia di ocx: penso ne
troverai uno che funziona come ti serve.
saluti.
-- 
      Gianni "bugbarbeq" Rondinini, 27+15, RA, 193, 152
   VBR - Vero Birro Romagnolo®, diffidate dalle imitazioni!
 BMW 530D "BatMobile EVO" Driver - Escortone da 500 CV dreamer
Kawasaki "Gas Gas" ZZ-R 1100 - HD Electra Ultra Classic Dreamer
   On contrary of popular belief, Unix *IS* user friendly:
    it just appears to be selective who it is friend with
Newsgroup: it.comp.lang.visual-basic
Titolo: Handle da ShellExecute

Avvio una pagina web da ShellExecute.
Mi sapreste dire come sia possibile ricavarsi l'handle? Mi servirebbe per
passarlo ad un oggetto IE, facendo una sorta di casting tra gli oggetti e
riuscendo a interagire con la pagina.

jak ha scritto:


perdona, non capisco l'utilità di questo giro. se hai un oggetto ie,
perchè non fai aprire direttamente a lui la pagina web?
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel
messaggio news:csoaj0$nlb$1...@news.newsland.it...


 sendkey
:-(
era capitato anche a me, e non avevo trovato nessun'altra soluzione che
utilizzare il sendkey.
ma la pagina la raggiungevo ugualmente con il metodo navigate dell'oggetto
webbrowser.

Newsgroup: it.comp.lang.visual-basic
Titolo: $$$Come guadagnare soldi in modo facile ed onesto$$$

 Ricordate: SIATE ONESTI!
ONESTA', eh? E gli ultimi della catena, che non riusciranno a recuperare i
soldi spesi
e che avranno finanziato le BBS e le nuove automobili di quelli che sono
arrivati prima,
perché non ci sarà più nessuno che non ha partecipato o che vorrà
partecipare alla
catena? Certo, avranno buttato via al massimo 15.000 (meno di una pizza con
birra),
però ugualmente non mi pare molto onesto...
A proposito, scusate per l'O.T.! Non lo faccio più...    :-(
Mario

Newsgroup: it.comp.lang.visual-basic
Titolo: come sis fa ad aggiungere un file di testo ad un progetto??

grazie
Daniele

e poi scegli quale file inserire.
Perchč se faccio cosě il file di testo mi viene inserito tra i moduli?
Come fare per averlo tra i "documenti utente"?
Ciao

 ha scritto nel messaggio news:8n3sfq$jud$1...@nslave2.tin.it...

Devi fare Add -> Add File    selezionare Tipo File txt e spuntare la
casella in basso 'Add as Related Document'  poi selezioni il tuo file.
Ciao
--
Frogman
indirizzo e-mail corretto: 
be...@reboot.to

Ciao
Acc! Non ho mai notato la checkbox!
E pensare che uso VB da 5 anni... :)
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Scaricare immagini JPG

Volevo scaricare da Internet delle immagini JPG attraverso il controllo
Inet.OpenURL:
  Dim bData() As Byte
  bData() = Inet1.OpenURL(Url, icByteArray)
  Open Jpeg For Binary Access Write As #1
      Put #1, , bData()
  Close #1
Url = stringa che contiene l'indirizzo completo dell'immagine in Internet
(ad es. "
http://www.xxxxx.con/01.jpg
")
Jpeg = stringa che contiene il nome del file che viene salvato sul 'HD (ad
es."c:\documenti\Image_01.jpg").
Il codice "scrive" dei file su disco (infatti il codice precedente viene
ripetuto + volte x ogni immagine interna ad una pagina HTM) , xò a volte non
mi scarica l'immagine ma una pagina HTM (l'estenzione del file scaricato è
JPG, xò se lo vado a vedere con Notepad vedo che è una pagina HTH) ?!!!!
Qual'è il problema? Dove sbaglio? Non ci sarà mica dei problemi con qualche
server quando ricevono la richiesta di scaricamento in automatico attraverso
il controllo Inet?
Potrei usare anche Inet1.Execute e l'evento StatusChange, ma come di
preciso(ho già provato gli esempi dell'help....) ?
Ciao
Duccio
http://www.catenaia.cjb.net

non è che ti capita con file più grossi di x dimensioni
"Duccio" <picinott...@NOSPAM-tin.it> ha scritto nel messaggio
news:1UPL8.14229$K4.3...@twister2.libero.it...


 non è che ti capita con file più grossi di x dimensioni


Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con sendkeys

NON mi funziona sendkeys per simulare la perssione
del tasto STAMP.....
ho messo anche keypreview a true ma non funge!!!!
Provate se a voi vi funziona grazie!

del tasto STAMP.....
Non puoi...rinuncia
Genesio

Genesio
Grazie, mi sento rincuorato....   :-(
Newsgroup: it.comp.lang.visual-basic
Titolo: SFONDO

Ciao a tutti.
Come si fa' in VB4 a mettere come sfondo una piccola
immagine e ripeterla piu' volte fino a riempire la larghezza e
la lunghezza del FORM (Uguale come fa Windows ad
affiancare un'immagine da mettere come sfondo).
Rispondete a 
ggio...@smariacv.peoples.it
                                                           Ciao.

 scritto nell'articolo
<01bc9f4e$47c52860$cbf4f3c2@ggiordan>...


                                                           Ciao.
Inserisci questa sub in un modulo:
Public Sub TileForm(DrawObj As Object, Src As Object)
Dim foo As Integer, fooh As Integer
For fooh = 0 To DrawObj.ScaleHeight Step Src.Height
  For foo = 0 To DrawObj.ScaleWidth Step Src.Width
    DrawObj.PaintPicture Src.Picture, foo, fooh, Src.Width, Src.Height
  Next foo
Next fooh
End Sub
Per attivare la sub _TileForm_ inserisci nell'evento Paint della form
questa sub:
Private Sub Form_Paint()
   TileForm Me, picBack
End Sub
dove _picBack_ è una PicBox contenente l'immagine che vuoi utilizzare
come sfondo 'tiled' che deve essere posta sulla form interessata.
Ti consiglio di utilizzare immagini a 256 colori con palette
ottimizzata contenente i colori di sistema di Windows (ma funziona
ugualmente bene anche con immagini true color...). 
Io utilizzo questa routine in tutti quei programmi che devono essere
curati dal punto di vista grafico e che devono, ad esempio, riportare
sullo sfondo della form un logo di una ditta (magari embossed, che va'
tanto di moda...).
Ciao.
******************************
Fausto  -  
REMOVE...@lo.itline.it
******************************
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Textbox.RightToLeft (principiante)

Sto cercando di costruire un piccolo euroconvertitore e vorrei fare in modo
che sul display (textbox) le cifre vengano visualizzate da destra a sinistra
(come nelle normali calcolatrici). Ho provato selezionare "True" sulla
proprietà RightToLeft ma non c'è stato nulla da fare la proprietà ritorna
sempre su "False".La guida dice che RightToLeft è disponibile solo per  le
piattaforme bidirezionali (boh!).   Qualcuno può dirmi come posso fare?
Già che ci sono vorrei chiedere un'altra cosa:   Per memorizzare i valori
sia in lire che in euro ho usato una variabile di tipo currency (abbiate
pazienza se faccio delle domande molto banali ) secondo voi va bene? e poi,
come posso fare per visualizzare solo 2 cifre dopo la virgola?
Grazie a tutti e complimenti per questo NG.

 come posso fare per visualizzare solo 2 cifre dopo la virgola?
Dai un'occhiata sulla guida alla funzione Format
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 ha scritto nel messaggio news:51wD7.16763$74.4...@news2.tin.it...


Attenzione: la proprietą Align per le TextBox funziona solo se č impostato
MultiLine= True
Io userei preferibilmente il tipo Double, perņ Currency va bene lo stesso.
Ciao,
Carlo.

 MultiLine= True
Non è vero! Chi l'ha detto! Prova! io riesco anche se MultiLine è su false!
Ciao SIMO


 Ciao SIMO
[SNIP]
Si vede che anche Rox e' un "fedelissimo" :-)
Era vero in VB3 e credo anche fino a VB5, con il 6 funziona anche con lo
stile normale.


 stile normale.
Ha ragione Luca, ma non credo dipenda dalla versione di VB installata, ma
dalla versione di Windows.
Questo è ancora più grave, perché significa che il vostro cliente con
Windows 95 potrebbe avere spiacevoli (esteticamente) sorprese installando
qualche vostro lavoretto...
Ciao,
Carlo.
Newsgroup: it.comp.lang.visual-basic
Titolo: commondialog con piu file selezionati

Salve a tutti!
questo è il un problema che ho e speroc he possiate aiutarmi!
devo dare la possibilita all'utente di selezionare + file da aprire da un
Common dialog, ma non so come abilitare il Multiselect!!
esiste un sistemaper risolvere il problema, o devo necessariamente
costruirmi una maschera apposita?
Grazie!!

me.CommonDialog1.Flag=cdlOFNAllowMultiselect
Saluti
DD

> Tam Tam:

Riveduto e corretto, un esempio che ho gia` postato qualche
giorno fa. Spero possa esserti utile.
Option Explicit
#Const OnTest = False
Private Const mc_strINITDIR$ = "C:\Documenti"
Private Sub Command1_Click( _
)
  Dim lngErr&
  Dim strFile$, strFiles$
  Dim lngBeg&, lngEnd&
  With CommonDialog1
    Let .CancelError = True
    On Local Error Resume Next
    Call .ShowOpen
    Let lngErr = Err.Number
    On Local Error GoTo 0
  End With
  With CommonDialog1
    Select Case lngErr
    Case 0
      Call List1.Clear
      Let Text1.Text = """" & CurDir & """"
      Let strFile = .FileTitle
      If Len(strFile) Then
        Call List1.AddItem("""" & strFile & """")
      Else
        Let strFiles = .filename & vbNullChar
        Let lngBeg = 1
        Let lngEnd = InStr(lngBeg, strFiles, vbNullChar)
        Let lngBeg = lngEnd + 1
        Let lngEnd = InStr(lngBeg, strFiles, vbNullChar)
        While lngEnd
          Call List1.AddItem( _
              """" _
            & Mid$(strFiles, lngBeg, lngEnd - lngBeg) _
            & """")
          Let lngBeg = lngEnd + 1
          Let lngEnd _
            = InStr(lngBeg, strFiles, vbNullChar)
        Wend
      End If
      Let .InitDir = CurDir
      Let .filename = .FileTitle
    Case cdlCancel
      #If OnTest Then
        Call MsgBox( _
            "La richiesta di apertura file e` stata" _
          & " annullata." _
          , vbExclamation _
          , App.Title)
      #End If
    Case Else
      Call MsgBox( _
          "Errore #" & lngErr & ":" & vbCrLf & vbCrLf _
        & Error(lngErr) & "." _
        , vbCritical _
        , App.Title)
    End Select
  End With
End Sub
Private Sub Form_Load( _
)
  Let Text1.Text = ""
  With CommonDialog1
    Let .DialogTitle = "Seleziona file"
    Let .InitDir = mc_strINITDIR
    Let .Filter _
      = "File JPEG (*.jpg;*.jpeg)|*.jpg;*.jpeg|" _
      & "File GIF (*.gif)|*.gif|" _
      & "Documenti di Word (*.doc)|*.doc|" _
      & "File dell'applicazione (*.doc;*.jpg;*.jpeg;*.gif)|" _
      & "*.doc;*.jpg;*.jpeg|" _
      & "Tutti i file (*.*)|*.*"
    Let .FilterIndex = 4
    Let .Flags _
      = cdlOFNAllowMultiselect _
      + cdlOFNExplorer _
      + cdlOFNFileMustExist _
      + cdlOFNHideReadOnly _
      + cdlOFNLongNames _
      + cdlOFNPathMustExist _
      + cdlOFNShareAware
    Let .MaxFileSize = 32767
  End With
End Sub
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Report sempre complessi.....

Ciao a tutti,
Sto realizzando un programma di gestione fatture
nel quale il report viene compilato con la lista degli articoli presenti in
fattura e alla fine della pagina (non del report) vorrei inserire il Totale.
Articolo    |Qta    |Prezzo
art1            1        100
art2            1        200
--------------------------
            TOTALE: 300
--------------------------
ma ho il seguente problema:
Finchč la fattura č monopagina va tutto bene, nel caso di piů pagine compare
il totale su tutte le pagine mentre a me interessa che compaia solo
nell'ultima e in tutte quelle precedenti compaia solo la scritta "segue".
Se lo metto nell'intestazione a pičReport quest'ultimo si sposta in alto e
in basso in
base al numero di articoli inseriti e soprattutto non compare niente nelle
pagine precedenti l'ultima.
Tante Grazie

 nel quale il report viene compilato con la lista degli articoli
Che sw usi per fare i report?
In Crystal Report ad esempio c'è differenza tra fine report e fondo
pagina...
-- 
Alex
"Fare programmi oggi e' una corsa fra gli ingegneri del software che si
sforzano di sviluppare programmi migliori e a prova di idiota, e
l'Universo che si sforza di produrre idioti sempre piu' grossi. Per ora
l'Universo sta vincendo." (Rich Cook)
Posted from X-Privat Free NNTP server - 
www.x-privat.org

Newsgroup: it.comp.lang.visual-basic
Titolo: VB...Vero o Falso???

Mi hanno detto che da un eseguibile fatto in VB , con altri programmi e'
possibile rileggere il sorgente...
E' vero o falso?
Se e' vero, esiste un modo per nascondere almeno un vallore alfanumerico che
utilizzo come protezione?
Grazie

 utilizzo come protezione?
beh, quantomeno non metterlo come semplice costante stringa  :)
Faber

 E' vero o falso?
con vb5-6, in sostanza e' falso.

Newsgroup: it.comp.lang.visual-basic
Titolo: DHTML Oggetti Select e List

Non riesco a capire come inserire, cancellare, modificare elementi in questi
oggetti... qualcuno puň aiutarmi? Grazie

 questi oggetti... qualcuno puņ aiutarmi? Grazie
Hai sbagliato newsgroup.

> Hai sbagliato newsgroup.
Come ho sbagliato Newsgroup... è sempre un progetto Visual Basic....

Come ho sbagliato Newsgroup... è sempre un progetto Visual Basic....
Ni ;-)
Serve pero' sapere che codice usi e su quali browser vuoi che
funzioni.
-- 
ciao, hal

A dire il vero sono prorio inesperto del web... ho sempre usato VB per
accesso ai dati e comando di periferiche tramite seriale... mi aveva
incuriosito la pogrammazine dhtml per sviluppare qualcosa anche sul web... a
primo acchitto mi sembrava che fare un progetto dhtml fosse simile a ad un
progetto vb... ma evidentemente mi sbagliavo di molto... cmq un oggetto
select non si riempie come un oggetto combo vero?

select non si riempie come un oggetto combo vero?
Non ho capito cosa usi, io uso il blocco note e javascript ;-)
-- 
ciao, hal

Che cosa realizzo quindi con un progetto VB tipo DHTML?

...

Assolutamente NO.
Nell'HTML ti crei il tuo oggetto SELECT con id=NomeOggetto
<select id=OggettoSELECT style={width:250;font-size=12}>
<option value="0" SELECTED>&lt; Selezionare &gt;
</select>
Poi in VBScript nell'html faccio così (puoi farti anche cicli FOR per
caricare dati in Array)
<script language=VBS>
Dim oNew
' l'oggetto OPTION è l'elemento riga di una combo/listbox in DHTML
Set oNew = document.createElement("OPTION")
oNew.Value = "KEY"
oNew.Text = "VALUE"
OggettoSELECT.add(oNew)
Set oNew = Nothing
</script>
Puoi cancellare elementi in una lista con l'istruzione
OggettoSELECT.Options.Remove(IndiceDellElementoDaEliminare).
Puoi cancellare tutto semplicemente con:
OggettoSELECT.innerHTML = ""
Spero di esserti stato utile.
(Nell'MSDN comunque c'è una guida per il DHTML).
Ciao !!!
*Roby*

Sei stato molto chiaro! Grazie molto gentile!
Newsgroup: it.comp.lang.visual-basic
Titolo: Per SebaMix


Ci sono sul forum, ma di quello che serve a me, neanche una traccia.
Puoi aiutarmi tu?
Il problema è l'evento "ShortMsgSent" della libreria
SMS3ASuiteLib.SMS_SuiteAdapter library.
In pratica, non viene richiamato quando l'SMS è inviato.
La procedura che ho scritto mi sembra corretta percé l'evento
"ShortMsgReceived" invece  viene richiamato e il codice eseguito.
Grazie
Hyppos

Purtroppo l'SDK nokia non la uso... ^_^
Prova a chiedere su it.tlc.hardware.nokia
Io mi sono iscritto al forum nokia solo per avere un po' di documentazione
sull'invio di loghi e suonerie e sto realizzando un programmello ad hoc, ma
senza librerie nokia... :)
CiaoZ
SebaMix

Grazie per la risposta.
Ora vado a vedere sul ng che mi hai consigliato
Cia Cia
hyppos
www.teatrolabaracca.com

 wrote in message
news:9t0dtk$16dnju$1...@ID-66833.news.dfncis.de...

-- 
Posted from  [194.243.32.8] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 documentazione?
e i risultati dei studi ;)
Mucio

Allora. Ti iscrivi al forum Nokia (gratuitamente).
Fai il login -> sezione Smart Messanging
Spulci la sezione documenti (non ricordo bene come si chiama) e trovi un po'
di tutto in formato PDF da downloadare.
Il sito č 
www.forum.nokia.com
CiaoZ
SebaMix


Senza www.
Per quanto riguarda la gestione del telefono, la trovi sotto Nokia PC
Connectivity SDK Developers

...

Sebamix?
Ma ti trovo ovunque?
Ciao, sono contento di vederti. :)
Buona navigazione e Happy Programming!
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP Query Access e VB

Sono in un terribile pasticcio: ho un database Acccess con parecchie
query con campi calcolati da funzioni in un modulo di codice, che non
ne vogliono sapere di andare da VB.
Ecco un esempio minimo di un MDB creato con access e cosa mi succede:
struttura tabella A:
DSNOME          text(10)
contenuto tabella A:
DSNOME
------
pippo
topolino
minni
modulo di codice Access:
public function u(v as variant) as variant
        u = ucase(v)
end function
query Q
SELECT DSNOME, u(DSNOME) as MAIUSCOLO FROM A;
output di Q
DSNOME                  MAIUSCOLO
------                  ---------
pippo                   PIPPO
topolino                TOPOLINO
minni                   MINNI
Se apro la query Q fuori da access, ad esempio VB, mi da un
messaggio di errore dicendo che non trova la funzione u(). Anche
inserendo la funzione u() in un modulo di VB la cosa non cambia.
Accedendo all'MDB col ODBC la stessa zuppa (da una errore di sintassi
nella query).
Qualcuno sa dirmi se e come si puo' risolvere il problema?
Ovviamente le funzioni del mio problema non sono come u(), e non posso
rimuoverle, ne cambiare la struttura di queste query. Il problema e':
posso usarle fuori da Access?
----
Lunga vita e prosperita'
gio...@vislink.it

La risposta e' semplice :
NO, Non puoi.
Da VB puoi utilizzare solo le funzioni che conosce il motore SQL di
Access.
Vincio

Access.
E quali sarebbero? Quelle VBA? Almeno le classiche funzioni native di
VB funzionano? 
O per spiegarmi meglio: il motore di access per interpretare le
formule SQL e relative funzioni usa la dll di VBA oppure gestisce
intrinsecamente le funzioni (tutte o quali) classiche di VB?
Se usa la dll VBA c'e' forse la possiblita' che si possa usare anche
un'altra dll (invece che codice VB interpretato fornirgli la versione
compilata in C magari)?



Apri la cartella Funzioni del Generatore di Espressioni di Access.
Visualizzi due sottocartelle, una di sistema e l'altra del database. Quelle
che puoi utilizzare sono quelle di sistema.
Ciao Bruno

Newsgroup: it.comp.lang.visual-basic
Titolo: comandi ms-dos (shell)

Salve a tutti.
L'istruzione shell sembra che non funzioni con windows 2000. C'e' qualcuno
che mi
sa dare una dritta per poter eseguire un comando dos?
Ringrazio.

 ha scritto nel messaggio
news:a1cf51$o40$1...@fe1.cs.interbusiness.it...

Esiste e la uso!!!
--
Esteban
Hosted by 
www.seber.it
Remove 'nonspammare' for reply

Newsgroup: it.comp.lang.visual-basic
Titolo: Register e directory

Ciao
Come faccio per accedere al registro di Win95 e recuperare il percorso di
un programma registrato?
Bye
-- 
?
|
|___^ ^,
:   =''=   MioMao ora ti saluta: Ciaooooooooooo
I['I[    Andrea Varisco as MioMao fromoldyearsago
E-Mails: 
mio...@digibank.it
 -*- 
mio...@galactica.it


_____________

 
[...omissis...]

Newsgroup: it.comp.lang.visual-basic
Titolo: Potreste dirmi come fare?!

Ciao al NG,
Problema:
Come fare per intercettare in una casella di testo di un form,se è stato
digitato uno spazio,ed eventualmente
rendere maiuscola soltanto la lettera successiva allo spazio?
Grazie,
Cordialità
Johnny

 rendere maiuscola soltanto la lettera successiva allo spazio?
La posiz in cui inserito il car e' la ppta' SelStart del txtbox.
All'evnt keypress: se il car che prec e' " " then
keyascii=asc(ucase(chr(ascii)))

 ha scritto nel messaggio
news:%_oj6.22310$7U4.5...@news.infostrada.it...

Troppo stanco per scrivere le parole per intero ?
:-))

rendere maiuscola soltanto la lettera successiva allo spazio?
Sub Text1_Change()
    Text1.Text =StrConv(Text1.Text, vbProperCase)
End Sub
Ciao

(Possibile che sappiate sempre tutto?!!!)
Grazie.

 (Possibile che sappiate sempre tutto?!!!)
no, in effetti.
alcune cose e' solo convinto di saperle.
fra queste, l'inglese.
:)

Sub Text1_Change()
    Text1.Text = StrConv(Text1.Text, vbProperCase)
    Text1.SelStart = Len(Text1.Text)
End Sub
Altrimenti scrivi al contrario...
---
GbC
http://www.chiappori.net
---

fra queste, l'inglese.
No, non credo di conoscerlo. Non bene perlomeno, però quel poco che so mi
basta per leggere e capire manuali e libri.
E non mi interessa nemmeno approfondirlo molto.
E mi accontento dei pochi contatti madrelingua che si complimentano del mio
inglese migliore di quello di molti italiani trapiantati da 30 anni (chi si
loda si imbroda... sto facendo il bagno nel minestrone :)).
P.S.: la parola "lovers" secondo te non ha un significato semplicistico?
Ciao

End Sub
Proprio oggi mi era venuto il dubbio :)
Ciao

 P.S.: la parola "lovers" secondo te non ha un significato semplicistico?
ehm... mi sono perso. dipende. in che ambito ?
ciao, a.

ehm... mi sono perso. dipende. in che ambito ?
Appunto...
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Disconnected Recordset

Una domanda forse banale:
per motivi che non vi sto a spiegare (per brevità)
avrei bisogno di caricare dei dati in un recordset
(disconnesso) non da un database ma da un file
di testo, posso poi "interrogare" il mio recordset
come se fosse una tabella, cioè facendo
qualcosa del tipo "SELECT ..." ?
Oppure come posso procedere?
Grazie

 qualcosa del tipo "SELECT ..." ?
il select lo puoi usare solo "prima" di aprire il recordset, se l'hai già
aperto devi usare il metodo filter
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 ha scritto nel messaggio
news:2obgvmF...@uni-berlin.de...


 etc) sui recordset.....
Questa tua domanda mi fa pensare che tu non abbia ben chiara la differenza
fra dbms, provider e libreria di accesso ai dati.
Il linguaggio SQL richiede un motore che lo interpreti e lo elabori. Questo
motore è presente nei dbms, in alcuni provider, ma assolutamente non nella
libreria (Dao, Ado, ecc), che invece espone metodi e proprietà tipo Filter,
Sort, Seek, Find, Move, ecc...
Ciao
Alberto

 etc) sui recordset.....
non farmi dire quello che non ho detto :-)
puoi provare con questa strada:
http://www.able-consulting.com/MDAC/ADO/Connection/ODBC_DSNLess.htm#ODBCDriverForText
hth


 ha scritto nel messaggio
news:2obhtjF...@uni-berlin.de...


 ha scritto nel messaggio
news:2obhvsF...@uni-berlin.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini e internet?

Ciao a tutti,sto' scrivendo un programma e ho riscontrato un problema:
come faccio a visualizzare in uuna IMAGEBOX un file grafico residente su
internet ,ed esempio all'indirizzo : 
www.microsoft.com/image.jpg
Grazie

2 possibilità: prima scarichi il file e poi lo mostri... (scarichi con il
controllo Internet transfer protocol...)
Oppure usi direttamente il controllo webbroser
            Ciao
                        Allanon

 internet ,ed esempio all'indirizzo : 
www.microsoft.com/image.jpg
ne parlavo giusto qualche giorno fa con Assa e Sasim in chat
un esempio è sul mio sito
http://vbsimple.virtualave.net/howto/033.htm
volevo ottimizzarla per evitare di utilizzare un file temporaneo ma
non so come.
--
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 #25 delle Mitiche Brigate Takahashi sezione Sud
Newsgroup: it.comp.lang.visual-basic
Titolo: Consiglio per scelta VB.Net

Salve a tutto il Ng.
E la prima volta che posto
E vorrei un consiglio poiché mi ritrovo ad un bivio e vorrei che qualcuno mi
desse qualche
dritta sulla scelta da effettuare.
Ho sviluppato per 8 anni applicazioni sino ad oggi con VBA(Acceass)
ma mi ritrovo con l'uscita di office system, con i soliti problemi di
compatibilità tra sistemi
operativi(Per esecuzione dei programmi), da alcune informazioni prese qua e
la ho
valutato la possibilità di migrare a "visual basic.Net" .
Partendo dal presupposto che in merito al VB.Net io sia totalmente allo
scuro,
e di una conoscenza discreta del linguaggio VBA
le possibilità di poter realizzare applicazioni su tale piattaforma sia
molto difficile?
Il NG. in questione può essere un punto di riferimento per chi non conosce
il VB.Net?
poiché sicuramente dovendo migrare i dubbi ed i problemi saranno a
tonnellate(Panico!!!!!).
Grazie a tutti
Ferrari Rino

 ha scritto nel messaggio
news:negAb.55190$AX1.2...@news1.tin.it...

Presumo che un'insieme del discusso sia più esaustivo
Vedi dai seguenti:
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=migrazione%2Bvb.net
&meta=group%3Dit.comp.lang.visual-basic
Cui oltre a discussioni troverai altri link informativi
Ave
giuseppeD

Newsgroup: it.comp.lang.visual-basic
Titolo: azzerare listview

Salve a tutti.
C'e' qualcuno che sa dirmi come fare ad azzerare del tutto una listview ?
Io prima la carico con il contenuto di un mdb, poi facendo una query, vorrei
visualizzarne il risiltato : devo pero' azzerare tutte le righe altrimenti
le aggiunge in coda.
Grazie

> C'e' qualcuno che sa dirmi come fare ad azzerare del tutto una listview ?
ListView1.ListItems.Clear
Newsgroup: it.comp.lang.visual-basic
Titolo: Caratteri piccoli e grandi

Ciao a tutti, sono un neofita del linguaggio VB e del sistema operativo
WINDOWS 98, almeno per quanto riguarda l'ambiente di sviluppo.
Avrei un piccolo problema:
Ho fatto un piccolo programma per gestire delle immagini con i picturebox,
ma ho notato che quando passo da una visualizzazione a caratteri grandi da
caratteri piccoli, i riferimenti cambiano; Come mai?
C'è un modo per sapere quale il tipo di caratteri attualmente in uso. Esite
una relazione tra caretteri, risoluzione e TWIP?
Grazie ancora.
 Stefano Fantoman
fanto...@hotmail.com

Ho riscontrato anche io lo stesso problema e mi sono arrangiato cosě:
Per i controlli Image: Stretch = True
Per le PictureBox:
NumPuntiW = MyPicture.ScaleWidth
NumPuntiH = MyPicture.ScaleHeight
MyPicture.PaintPicture MyImage.Picture , 0, 0, NumPuntiW, NumPuntiH.
L'aspetto delle immagini cambia un poco, ma almeno mantengono la stessa
proporzione con le caselle di testo.
Se qualcuno ha idee migliori ben vengano.
Francesco

Ciao Francesco,  Come ti avevo già detto, non sono un gran conoscitore del
VB quindi non sono riuscito a capire bene il tuo procedimento, comunque ho
anch'io raggirato l'ostacolo in questo modo:
Presupposto che il numero di TWIP per PIXEL cambia quando si passa da una
ris a caratteri grandi a quella a caratteri piccoli (da 12 a 10), mi sono
calcolato appunto questo valore:
dim nwips as Single
ntwips = Screen.TwipsPerPixelX
dopo di che ho modificato i parametri delle immagini e dei posizionamenti
con delle semplici moltiplicazioni.
Adesso il mio prg. funziona benissimo a qualsiasi risoluzione.
Grazie tanto per l'interessamento.
Stefano Fantoman
fanto...@hotmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: librerie musicali

Salve, è la prima volta che scrivo in questo NG e colgo l'occasione per 
salutare tutti. Volevo chiedere se sapete se esiste una libreria per 
lavorare con mp3. In particolare io vorrei aprirli accedere ai tag, alle 
proprietà e vedere se contengono errori ovviamente mi accontento anche 
solamente di capire la logica delle operazioni e il codice posso prepararlo 
con un po di calma. Grazie in anticipo per i suggerimenti ciao a tutti. 

 calma. Grazie in anticipo per i suggerimenti ciao a tutti.
ciao Defresco.
Gli ultimi 128 bytes dei files .mp3 contengono le informazioni principali,
con questo schema:
sTag As String * 3
sTitle As String * 30
sArtist As String * 30
sAlbum As String * 30
sYear As String * 4
sComment As String * 28
bNull As Byte
bTrack As Byte
bGenre As Byte
prova.
 
()---cucchiaino


Credo che sia valido solo per i CBR e non per i VBR.
Comunque si trovano molti esempi su come accedere ai tag.
Per suonarli prova le DX, per il discorso degli errori non
saprei.
Saluti,
Pusky re delle rane variabili 

 ha scritto nel messaggio 
news:46fe2ca0$0$36447$4faf...@reader5.news.tin.it...

Stavo ricordando di aver letto una cosa tempo fa... riguardo il discorso 
degli errori.
Se per semplicità contiamo la cosa in due fasi se procedo così è corretto:
1- conteggio dei frame nel file mp3 (un frame non valido=mp3 danneggiato)
2- verifica del CRC ( in combinazione con la prima ipotesi valida o meno la 
struttura dei dati.
Come logica pensate sia fattibile?
Grazie per i suggerimenti.
A presto.
Fabio. 

 suggerimenti ciao a tutti.
Guarda qui:
http://www.visual-basic.it/articoli/sfTagMP3_ID3_01.htm
http://www.freevbcode.com/ShowCode.asp?ID=1118
Enjoy
Ciao
Raf

Newsgroup: it.comp.lang.visual-basic
Titolo: Devo realizzare un programmaper acquisire via comm dei codici a barre

devo acquisire via seriale dei codici a barre.
Il problema sta nel fatto che li devo acquisire uno alla volta, man mano che
il lettore legge, io li devo acquisire.
qualcuno mi può dare delle delucidazioni sull'oggetto mscomm
e su come potrei procedere?
un grazie in anticipo

 wrote in message
DtZY3.69808$s17.7...@typhoon.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Dati bilancia in Excel

Ciao a tutti,
sto sviluppando un'app in Visual Studio 2010 che deve leggere i dati in arrivo da una bilancia e poi deve metterli in Excel.
 
I dati dalla bilancia li leggo e li metto in una TxtBox multiline
Il file di Excel lo creo ed inserisco i dati letti
 
Devo però sistemare 2 cose:
Nella TxtBox, i dati da bilancia arrivano con l'aggiunta della lettera g (grammi)
 
8,93 g
7,58 g
...
...
 
vorrei togliere la g, il codice di popolamento TxtBox è questo:
 
Private Sub UpDateText(ByVal [Text] As String)
 
        If Me.RicDati.InvokeRequired Then
            Dim Cmp As New SetTextCallback(AddressOf UpDateText)
            Me.Invoke(Cmp, New Object() {(Text)})
        Else
            Me.RicDati.Text &= [Text]
 
            Me.Conteggio.Text = Me.RicDati.Lines.Count - 1
 
        End If
 
    End Sub
 
volevo sostituire Me.RicDati.Text &= [Text]con qualcosa tipo questo ma non funziona:
'Me.RicDati.Text &= Microsoft.VisualBasic.Right([Text], 1)
 
la 2° domanda è questa:
in Excel mi mette tutti i dati nella cella A1 mentre dovrebbe mettere il 1° nella A1, il 2° nella A2 ecc...
 
Questo il codice che gestisce Excel:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim Xl As New Excel.Application
        Dim xlBook As Excel.Workbook
 
        xlBook = Xl.Workbooks.Add
        xlBook.Worksheets(1).activate()
 
        xlBook.Worksheets(1).cells(1, 1) = Me.RicDati.Text.ToString
        Xl.Visible = True
 
    End Sub
 
mi potete dare una mano?
grazie
Marco



Newsgroup: it.comp.lang.visual-basic
Titolo: IP Address

Ciao a tutti,
    qualcuno sa dirmi come recuperare l'ip address e il
nome della macchina da un'applicazione VB?
                            Grazie ciao Ale.

 nome della macchina da un'applicazione VB?
Per il nome, usa la funzione
Public Declare Function gethostname Lib "wsock32.dll" ( _
            ByVal lpszName As String, _
            ByVal lngName As Long) As Long
lpszName č un buffer di dimensioni lngName
per l'indirizzo IP, vedi il messaggio:
"E' possibile con VB reperire l'indirizzo IP dal nome PC in rete ?"
del 19/10 (oggi)

Newsgroup: it.comp.lang.visual-basic
Titolo: 2 problemi da principiante

Primo:
Ho bisogno di dichiare un vettore di 100 posizioni visibile a tutti.
Ho messo in un modulo la seguente riga:
	dim v(1 to 100)
ma la load_form, i vari bottoni non la vedono.
Secondo:
Ho bisogno di una TextBox trasparente ma non riesco a trovare la
proprieta' che rende possibile cio'.
Se non si puo' fare quale altro oggetto occorre usare?
Grazie Mex.
--
Posted from 
bikini.edu.al.unipmn.it
 [193.206.63.17]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
Pine.GSO.3.96.990604...@bikini.edu.al.unipmn.it...



Microsoft Form 2.0

 
