mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: old Javascriptcode need to convert to VB

Hello World,
I am having trouble converting some JavaScript code into Visual Basic 6.
The idea is to have 3 text fields (prem1 -  prem3) where a value can be
entered.  These text fields should be summed and that value (totprem) will
be used to calculate other values on the form such as APR, Down Payment,
etc..
The JavaScript:
_____________________________
/ to calculate the APR
totprem = this.getField("Prem1").value + this.getField("Prem2").value +
this.getField("Prem3").value
if (totprem >= 126 && totprem <= 485){
    event.value = 29
}
else if (totprem >= 486 && <= 905){
    event.value=28
}
else if.........and so on
______________________________
#########################################
Here is the VB Code that I have so far (doesn't work):
______________________________________
Function totprem_Click()
' This should calculate and sum the text fields for user input
totprem = Val(Prem1.Text) + Val(Prem2.Text) + Val(Prem3.Text)
End Function
-------------------------------------
Function APRate_Click()
' This should calculate the APR from the Total Premium ( totprem_Click() )
If totalprem >= 126 And totalprem <= 485 Then
APRate = 29
End Function
---------------------------------------------------
Private Sub APR_Click()
' This should set the APRrate value on the label
LabelAPR.Caption = totprem = APRrate
End Sub
_______________________________________
I think I have the totprem_Click() code correct, but I need to make the
APRrate calculate from else, if statements and "APR_Click()" which will
display on a label should call the correct value for the annual percentage
rate.  I don't know if I need to even have to function "APRate_Click()",
the goal is to set the APR on a label under "Private Sub APR_Click()" can I
uses  else, if statements here to set the correct value on the label??
I am very new to VB,  our company is trying to turn a bunch of C++ coders
into VBcoders which I have no problem with,  but my deadline on this is two
days away and I don't think I am even close.  Please help, if you need more
information feel free to ask me (
br...@barnes.net
).....Thanks.
Brian Barnes

 ha scritto


Newsgroup: it.comp.lang.visual-basic
Titolo: Animated GIF

Does anyone know how to put an animated gif into a form to make it animate
from the .exe file??
Thanks
Simon

 from the .exe file??
You may use "gif89.dll".

> You may use "gif89.dll".
Download here:
http://www.murialdo.it/it_lang_vb/prj/gif.zip
Newsgroup: it.comp.lang.visual-basic
Titolo: menu a discesa

Sapete se in visual basic 2005 cè un controllo x fare dei menu ad 
espansione verticale? per intenderci quelli fatti cosi
- PADRE
     	figlio1
	figlio2
	figlio3
+ PADRE2
+ PAdre3
che pigiano sul "+" si espandono...come quelli dei controlli di visual 
studio x intenderci...
saluti MVB

 studio x intenderci...
Qualcosa tipo un treeview?
Oppure tipo questo?
http://www.vbaccelerator.com/home/NET/Code/Controls/Explorer_Bar/article.asp

 
http://www.vbaccelerator.com/home/NET/Code/Controls/Explorer_Bar/article.asp
ho usato questo, non è fatto benissimo ma a me basta :-D
saluti MVB
p.s. grazie mille

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] RS 485???

Qualcuno sa dove trovare un OCX o eventualmente come si fa per pilotare una
scheda RS 485 in VB?

 wrote in message 8a9adf$t42$1...@nslave1.tin.it...


Non v'è differenza dal punto di vista software.
La differenza è nell'hardware.
Esistono poi 2 tipi di schede, la half e la full duplex che usano
rispettivamente 2 e 4 fili per la comunicazione.
La RS485 permette inoltre il dialogo con fino a 32 porte collegate anzichè
solo 2 come RS232.
Ciao
Roberto

Newsgroup: it.comp.lang.visual-basic
Titolo: cannot initialize data binding ?

Salve a tutti ho questo problema :
vorrei visualizzare i record di una tabella residente su un server sql in un
controllo datagrid.... la connessione al db tramite dsn avviene con successo
ma nel momento in cui cerco di inserire i dati nella griglia mi viene fuori
il messaggio di errore "cannot initialize data binding ". Ho provato la
stessa applicazione su un altro client connesso ad un altro server e
funziona..... avete qualche dritta ?

ICETRAP wrote:

Vista cosi' sembra un problema di librerie non registrate o non 
compatibili. Potresti provare ad aggiornare MDAC sul pc dove non funziona.
-- 
ciao, hal

 ICETRAP wrote:


http://tinyurl.com/5brac
hth, ciao, j.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 hal1961 ha scritto:
mah!
Avrebbe senso una griglia che funzionasse lato server?
penso che almeno NET ha tagliato la testa al toro.....tutti disconnessi e
zitti!
OVVIA!
:-)
e se qualcuno prova  a lavorare connesso bacchettate sul processore!!!
-- 
------------------------------------------------
Sito web: 
http://www.martek.it

 zitti!
anche senza net, in sto periodo sono gia' abbastanza disconnesso di mio :)


Newsgroup: it.comp.lang.visual-basic
Titolo: leggere file txt

Salve a tutti,
avrei bisogno di leggere dei file txt su dei pcche sono in rete e dovrei 
contare delle parole all'interno di questi file.
io non sono molto bravo in vb ma questa applicazione mi serve in  tempi 
brevi.
potreste darmi una  mano a realizzarla.
anticipatamente i ringrazio.
Newsgroup: it.comp.lang.visual-basic
Titolo: Togliere la barra del titolo

Vorrei togliere la barra del titolo da un form, lasciando pero' l'aspetto 3d
dello stesso (cosa che non ottengo se imposto l'opzione "none" della
proprietā borderstyle).
Mi serve per creare le tendine di menų personalizzati.

 ha scritto nel messaggio
news:3c666...@news.dada.it...


 Mi pare ControlBox su False
E Caption = ""
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: errore causato da MSADO21.TLB .....

Ciao, ho creato un programma che accede a un database access tramite ADO. Il
programma funziona correttamente recuperando e scrivendo dati nel file .mdb.
Ho provato quindi a creare un pacchetto di installazione tramite
l'autocomposizione pacchetti di Visual Basic 6 ma quando vado ad avviare il
setup generato dall'autocomposizione , quasi alla fine dell'installazione mi
si oresenta la finestra errore che reca :
ERRORE DURANTE LA REGISTRAZIONE DEL FILE c:\windows\system\MSADO21.TLB
Come mai ?? Ho provato ad installare il pacchetto su piů piattaforme (WIN
98, WIN ME ..) ma niente mi appare lo stesso errore ...
Sapreste dirmi come fare .
Ringrazio in anticipo.


Togli la dllselfregister dal setup.lst: la msado21.tlb non deve essere
registrata.
ciao
ugo

 Sapreste dirmi come fare .
 
 prova a togliere dai riferimenti ADO 2.1 e metti quello piu recente
 che dovrebbe essere il 2.6 ricompila l'eseguibile ed il pacchetto di
installazione
 se usi il wizard di vb ti basta sostituire l'eseguibile nella directory
 support e lanciare il .BAT
 spero che ti vada bene! 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:a1542t$nrg$1...@pegasus.tiscalinet.it...


 > Come mai ?? Ho provato ad installare il pacchetto su piů piattaforme


 ha scritto nel messaggio
news:a1542t$nrg$1...@pegasus.tiscalinet.it...


www.microsoft.com/data
ado2.7
L2K


 questo che mi fa casino ?? Ma perchč ??
La 2.1 fornita con VB č parecchio bacata.
Usa almeno una 2.5 (io uso felicemente una 2.5 SP1 e mi guardo bene
dall'aggiornarla :)).
L'ultima č la 2.7
Se scarichi una versione successiva alla 2.5 (2.6 in poi) ricorda che devi
scaricare anche il Jet4 che non č piů incluso nel pacchetto.
Trovi tutto su 
www.microsoft.com/data
Per quanto intendeva Ugo, il pacchetto di installazione crea un file di
testo setup.lst che deve stare insieme a setup.exe.
Qui ci sono tutti i files che vengono installati da Setup.exe, trova il file
incriminato e togli "dllselfregister".
Consiglio: installa a parte MDAC con il suo pacchetto di setup.
Ciao

 maniera semplice dato che la materia mi risulta complessa. Grazie.
Semplicemente perchè _non_ è un componente activex.
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: [MERCARTINO] Vendo vela Soul 6.6

Anno 2000, nessuna riparazione, condizioni molto buone, prezzo 200
euro, zona centro (Terni ma volendo anche bassa Toscana se ci vado per
il weekend)
Fabrizio

Scusate, ho sbagliato Newsgroup

 Scusate, ho sbagliato Newsgroup
Allora non sono l'unico a seguire anche ihn :-)
--
Salutoni
Sergio

 Scusate, ho sbagliato Newsgroup
E infatti non capivo se era una vela o un software :-)!!!
Alex
Posted from X-Privat Free NNTP server - 
www.x-privat.org

Fabrizio> Scusate, ho sbagliato Newsgroup

scusate, mi è scappato un invio involontario...
Cos'è un "[MERCARTINO]"?
Un 'prefisso' per indicare cosa?
;-P

 ha scritto

hai presente il mercato dell'arte... :P

 hai presente il mercato dell'arte... :P
Quindi non una "vela"ma una "tela"!
Mi LOLlo da solo :-)))

 ha scritto

:)
si', solo che per dipingerla non ci vuole il pennello di un grande, basta un
pennello grande :)

 basta un pennello grande :)
Azz, io l'ho capita e me la ricordo bene la pubblicita' ... devo
preoccuparmi ? :-/
-- 
-Gigio@Work(?)-

 pennello grande :)
Adesso mi chiedo, spontaneamente, se stiamo facendo pubblicità occulta o se
ci siamo trasferiti su it.sesso.discussioni... ;-)
Ciao, Marco

:-)
Caspita!! la versione  6.6? c'è anche il crack? io ho la 6.4 ed è stato un
casino....
Newsgroup: it.comp.lang.visual-basic
Titolo: Wie ändere ich die Registrierung (Win95) von VB aus?

Wenn ich eine Datei erstelle (*.reg) und diese aufrufe, funktioniert es.
Wenn ich dies jedoch in ein VisualBasic-Programm einbauen will, klappt es
nicht. Ich habe es mit shell "regedit DATEI.REG" versucht.
Wie kann ich von VisualBasic aus die Win95 Registrierung verändern?
Falls mir einer weiterhelfen kann, bitte an
Michael_P...@bigfoot.com

Diese ist ein italienisches NewsGroup!
Wenn Du Helf brauchst, möchtest Du auf Italien, oder auf Englisch written!
Allen wöllten die Antworten verstehen!
(Per gli italiani: ho cercato di spiegargli che dovrebbe scrivere in
italiano, oppure in tedesco, altrimenti nessuno può aiutarlo, e le eventuali
risposte non servono a nessuno).

Newsgroup: it.comp.lang.visual-basic
Titolo: Sql server e visual basic

Ho problemi ad aggiornare un database sul qslserver. Nel mio codice vb uso
le seguenti istruzioni:
dim ws as workspace
dim sqldocumento as string
dim dbDocumento as connection
dim tbDocumento as recordset
Set Ws = DBEngine.CreateWorkspace("ODBCWS", "", "", dbUseODBC)
Connessione$ = "ODBC;DSN=cdf;UID=sa;PWD=;DATABASE=inandout"
sqldocumento = "SELECT * FROM Documento WHERE TipoDocumento = '" & documento
& "'"
Set dbDocumento = Ws.OpenConnection("Documento", False, False, Connessione$)
Set tbDocumento = dbDocumento.OpenRecordset(sqldocumento, dbOpenDynamic)
tbDocumento.AddNew
dopo il comando addnew la risposta e che il database o l'oggetto sono di
sola lettura. Su sqlserver i permessi sono tutti impostati
Qualcuno puņ aiutarmi. Grazie



Esiste una Primary Key per quella tabella?
--
Che il Bubuti Bauontico sia con Voi....
Gabriele Del Giovine
mc6491@_
sonoqui_mclink.it
Togliere _sonoqui_ per le risposte in e-mail
Please remove _sonoqui_ for e-mail reply

...





Newsgroup: it.comp.lang.visual-basic
Titolo: Come usare le com > 2

Esiste una versione di Visual Basic (per MS-DOS) in grado di gestire le
seriali diverse da 1 e 2 ?
Per ora ho ovviato utilizzando questa routine per inviare i dati: (ma non mi
intercetta gli eventi etc...)
FOR l = 1 TO LEN(S$)
     char = MID$(S$, l, 1)
     'aspetta che il buffer sia vuoto
     DO
     LOOP UNTIL (INP(Idx5) AND 64) = 64
     OUT idxport, ASC(char)
     'aspetta che vi sia qualche cosa nel buffer
     DO
     LOOP UNTIL (INP(Idx5) AND 96) = 0
NEXT

Mi sà di NO...una volta ci stavo diventando matto anche con il C per Dos a
cercare di intercettare qualcosa proveniente dalla COM 3...mentre lo stesso
codice con la com 1 e 2 funzionava una meraviglia...e anche in C c'erano
quei maledetti INP e OUT :-)
Gianni Moretti

Newsgroup: it.comp.lang.visual-basic
Titolo: [?][DataGrid] Problema con le colonne...

Salve,
stň giocherellando con le griglie, confonto una griglia della Farpoint
(vaSpread, qualcuno l' ha mai usata?) con la DataGrid che non ho mai
usato e che non sembra brutta :)
L' ocx della Farpoint ha un designer (Spread Designer) che fa paura,
ti permette, in fase di design, di definire un boato di cose, la
DataGrid ha un menů piů ridotto...ma non meno utile, forse.
Stavo porvando una cosa sulla datagrid; da run-time, ma come si
aggiungono le colonne?!?!?
Ho scritto un ciclo for stupidissimo, talmente stupido che infatti non
funziona :)) Questo č quanto:
Private Sub Form_Load()
    Dim intNumCol As Integer
    Dim Indice As Integer
 
    Indice = 1
 
    For intNumCol = 1 To 4
        DataGrid1.Columns.Add(Indice) = intNumCol
        Indice = Indice + 1
    Next intNumCol
 
End Sub
Quando arriva ad eseguire
        DataGrid1.Columns.Add(Indice) = intNumCol
mi da questo errore:
"Gruppo di righe non disponibile". Ma che vuole?
Saluti...

Nooo, fermi tutti!! Sono che sono impazzito :)) il ciclo č questo:
    For intNumCol = 1 To 2
        DataGrid1.Columns.Add (Indice)
        Indice = Indice + 1
    Next intNumCol
in fase di design vedo solo una colonna, per quale motivo quando
faccio girare il ciclo me ne trovo 5 e non 3??
Saluti...

Ormai sono andato del tutto....apro thread e mi rispondo da solo...mi
correggo...bhà...
Qualcuno ha un esempietto per vedere come funziona questà griglia
malefica!!! >:||
Risolto il problema delle colonne :)) era impazzito il pc, è toccato
riavviare tutto...vabbè...insomma, questa griglia ma come funziona??
Crstinaaa...cucciolotto!! Ragazza dolcissima :))) Hehehe, Perchè non
passi al tuo carissimo amichetto skunk, il tuo progettino, che vedo
come hai usato la griglia in questione?? :)
Saluti...
Newsgroup: it.comp.lang.visual-basic
Titolo: Call procedure

Dovento far fare ad alcuni pulsanti delle azioni ripetitive, vorrei usare il
comando "call" per cgiamare una procedura.
Ho provato ma l0 ho trovato difficile.
Qualcuno puņ aiutarmi con un esempio pratico di codice?
se...@libero.it
Grazie in anticipo
Sergio

 Qualcuno puņ aiutarmi con un esempio pratico di codice?
Vedi bene l'Help a Sub e Function, comunque:
Definizioni:
Sub:
Private Sub Pippo (primo_argomento As Tipo, secondo_argomento As Tipo, ...,
ultimo_argomento As Tipo)
    ...
End Sub
Esempio:
Private Sub Pippo (imponibile As Currency, aliquota_iva As Single)
    'Fai quello che vuoi
End Sub
Chiamata:
Call Pippo (100,20)
oppure
Call Pippo (valore_imponibile, percentuale_aliquota_iva)
Function:
Private Function Pluto (primo_argomento As Tipo, secondo_argomento As Tipo,
..., ultimo_argomento As Tipo) As Tipo
    ...
    Pluto=risultato
End Function
Esempio:
Private Function Importo_IVA (imponibile As Currency, aliquota_iva As
Single) As Currency
'    Fai quello che vuoi
    Importo_IVA=imponibile*aliquota_iva/100
End Function
Chiamata:
valore_importo_iva= Importo_IVA (100,20)
oppure
valore_importo_iva= Importo_IVA (valore_imponibile,
percentuale_aliquota_iva)
Newsgroup: it.comp.lang.visual-basic
Titolo: VB List (List1.ListIndex) method

Hi,
I am trying to use the ListIndex method in VB to return the selected
string from a list. (That item is a table in a Oracle database). I then
want to 'select * from' the string selected (a table).
Below is my code. I can't understand why it won't work. It returns an
error saying that the tablename does not exist. Please help.
Thanks in advance.
Dave
Dim strSQL As String
Dim sItemSelected As String
    sItemSelected = combo.List(combo.ListIndex)
    strSQL = "select * from " & sItemSelected
    Debug.Print strSQL
    connAdo.getRecordset (strSQL)
    rstADO.Update
Sent via Deja.com 
http://www.deja.com/
Before you buy.

     strSQL = "select * from " & sItemSelected
what is the value of strSQL ?

     rstADO.Update
which is the debug.print result ?
if you put the sub in the combo_change event, try to move it into the
combo_click. otherwise, you wont get the combo item and sitemselected will
be uninitialised.
to get the opmbo value after a selection you can also just write:
     strSQL = "select * from " &  combo ' or combo.text, it's the same

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

come faccio a sapere il percorso in cui si trova il mio exe in automatico ?
ho provato con
su load
percorso = CurDir
ma mi restituisce solo una parte del percorso.
dove sbaglio ?

 ha scritto nel messaggio
news:9buv18$77m$1...@lacerta.tiscalinet.it...


 usare tale prorietà nell'IDE.
in che senso ? io non ho mai avuto problemi!
bye,
Marco Trapanese
---
e-mail: 
marcotr...@tin.it
web: 
http://members.xoom.it/m_trapanese

 ha scritto


 Marco Trapanese
un esempio:
- prendi un pippo.mdb e mettilo in una dir
- lancia vb6, fai un form, salva vbp e frm nella stessa dir
- non chiudere vb, e continua:
- in form_load metti qc come
    set db = opendatabase(app.path & "\pippo.mdb")
---> non lo trova, perche' come app considera vb e non il tuo vbp.
lo trovera' quando avrai fatto l'exe, o almeno quando avrai salvato il vbp e
l'avrai 2cliccato dalla sua dir.
ciao, a.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] una semplicissima combo!

Scusate, č una domanda stupidissima, ma ci sto perdendo una mattinata... ho
una combo box, in cui non č possibile scrivere ma solo selezionare una voce
dell'elenco. Vogli che quando venga selezionata una determinata voce succeda
qualche cosa. Esattamente quando sul mouse si clicca su un elemento della
lista! Ma non ho trovato un evento che realizza questa cosa. Esiste l'evento
che mi cattura la selezione di una voce dalla lista? Mi sembra impossibile
non averlo trovato...
Vabbč, se sapete darmi una mano, grazie in anticipo!
Nicola

 ha scritto nel messaggio
news:l_AE5.32527$N93.9...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Data Report: Come inserire un testo variabile?

Vorrei sapere se qualcuno si è scontrata con il problema di voler inserire
del testo variabile il un report; potrebbe essere l'intervallo di Date in
cui è stata creata la query per i dati presenti, o una qualsiasi altra
scritta che vorrei decidere al momento della "Compilazione" del report.
Grazie
MAX

...

Devi associare, nel codice dell'oggetto che stai usando, un oggetto
stdDataFormat alla proprieta' DataFormat del campo che vuoi formattare.
L'oggetto stdDataFormat devi dichiararlo WithEvents.
Nell'evento Format, modificando la proprieta' DataValue, si modifica il
testo nel report.
Omar

...



Bhe fai riderimento al campo...metti nel report una casella di testo dipo
Text1 e poi fai Report.Text1.setText  "valore "
Luca


Nel codice del datareport scrivi:
Option Explicit
Private WithEvents fmtMyFormat as stdDataFormat
Sub Report_Initialize()
    Set fmtMyFormat=Sections(nome sezione).Controls(nome
controllo).DataFormat
End Sub
Private Sub fmtMyFormat_Format(ByVal DataValue As StdFormat.StdDataValue)
    ' Qui formatti il testo, ad esempio
if DataValue='pippo' then
    DataValue='pluto'
end if
End Sub
Spero di essere stato abbastanza chiaro. Ciao

End Sub
======================================================================
Saverio Tedeschi /  snail mail:Var.SS 115 n.23-97015 Modica (RG)-Italy
e-mail:te...@tin.it-STIC n.2748/STOFC n.250505       ( @^@ ) 
=================================================oOOO==(_)==OOOo======

l'errore? Vi prego aiutatemi. Grazie in anticipo.
Innanzitutto l'errore "Variable not defined" viene generato appunto perchè
non dichiari la variabile nel DataReport. All'inizio del codice del Report
devi aggiungere
Private WithEvents fmtMyFormat as stdDataFormat
(come gia' era riportato nell'esempio sul msg precedente)

Private Sub fmtMyFormat_Format(ByVal DataValue As StdFormat.StdDataValue)

Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET]Mail

Ciao a tutti, visto che sono momentaneamente senza nulla da fare volevo
provare a scrivere un programma (per impratichirmi 1 pò) per la gestione
delle mail in 
VB.NET
, ma è sorto subito un problema come faccio a inviare
delle mail? ho provato con del codice trovato sulla rete (sotto) ma non
funziona, almeno a me. non è che qualcuno ha dei suggerimenti da darmi? TKS
Dim Mail As New InviaMail()
With A
    .From = "
mav...@tiscalinet.it
"
    .Too = "
mav...@tiscalinet.it
"
    .Subject = "Prova di invio della mail"
    .Text = "Questo è il testo" & Chr(13) & Chr(10) & "della mia E-Mail di
prova."
    .SendMessage()
End With
ciao e grazie a tutti
    Mavimo
--
WIN2000        SP2
VB6                  SP5
M$visualstudio.NET beta2

 End With
Probabilmente era:
With Mail
      .From = "
mav...@tiscalinet.it
"
      .To = "
mav...@tiscalinet.it
"
      .Subject = "Prova di invio della mail"
      .Text = "Questo è il testo" & Chr(13) & Chr(10) & "della mia  E-Mail
di prova."
     .SendMessage()
End With
Questo è solamente il codice per inviare una mail sfruttando la classe
InviaMail...
La classe è nello stesso file? Questo codice lo hai inserito nel Main? Hai
inserito
tutti gli "Imports" necessari per la tua classe? Scopri come funziona quella
classe,
ciò è interessante. L'implementazione del SMTP mediante TCPClient è una cosa
carina da studiare, posta tutto il codice che compili... se vuoi te lo
commento io.
Intanto vedi se ti funziona così.
Saluti,
Antonio Cangiano
--
Antonio Cangiano
Webmaster di 
www.visualcsharp.it
free.it.comp.lang.csharp / free.it.comp.lang.vbnet /
free.it.comp.lang.aspnet
--

 delle mail?prova a dare una occhiata qui:
http://www.ugidotnet.org/tips/tips_read.aspx?ID=25
A.
UGIdotNET - 
http://www.ugidotnet.org

Scusa ma al monmento ho un pò di problemi con 
VS.NET
, appena posso ti
rispondo
cmq Grazie
    Mavimo

Newsgroup: it.comp.lang.visual-basic
Titolo: Libro Visual Basic

Ciao a tutti !!
Sono uno studente e vorrei cominciare a dilettarmi con il Visual Basic per
provare a fare qualche prg gestionale che possa interagire con database.
Mi potreste consigliare un buon libro per favore?  (premetto di conoscere un
po' di Java e C ma non a livello avanzato )
Inoltre non ho chiara la differenza tra Visual Basic, Visual Studio, e
Visual .NET : qualcuno puň darmi delucidazioni ?!?
Grazie 1000 a tutti .
aLe
----------------------------------------------------------------------------
----
 A volte vorrei vivere nell'aria e rimanere sospeso senza piů ostacoli
 giocare coi mostri delle mie insicurezze
e trasformarli in canzoni come un miracolo ...
LITFIBA - 1994 -

 Visual .NET : qualcuno può darmi delucidazioni ?!?
In Visual Basic è presente solo Visual Basic
Per Visual Studio
http://www.microsoft.com/italy/msdn/vstudio/
.NET è tutta un'altra tecnologia.
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=consiglio%2Bvb.net&
meta=group%3Dit.comp.lang.visual-basic
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=vb.net&meta=group%3
Dit.comp.lang.visual-basic
Ave
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: come si fa ad azzerare un campo contatore?

grazie!

 grazie!
Prego!
Si eliminano tutti i record e si compatta il database... Ma e` veramente
questo che vuoi sapere?...
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 Si crea una nuova tabella, copiandoci i vecchi dati (contatore escluso)?
Contatore escluso.
Pero`... pero`... A questo punto mi domanderei il senso dell'esistenza di
tale campo contatore...


Grazie Mille maurizio Ho risolto

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

Qualcuno mi sa dire come iniziare a programmare in rete ?
Ciao.
""""""""""""""""""""""""""""""""""""""""""""""
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
""""""""""""""""""""""""""""""""""""""""""""""
                 Trust no ONE.

                 Trust no ONE.

essere qualcosina.
Ma io a dir la verita' non ho trovato un tubo !
E poi io rompo dopo aver cercato e appurato che non cavo un byte da un
file (:-)


                 Trust no ONE.

Newsgroup: it.comp.lang.visual-basic
Titolo: Come eseguire operazioni di I/O elementare con VB4

Mi piacerebbe riuscire a capire come posso eseguire operazioni di I/O
con VB4. Tanto per intenderci: in 'Pascal' esiste un'istruzione 'port'
che legge o scrive quello che si vuole all'indirizzo che si vuole, in
'C' anche (anche se non ricordo il nome dell'istruzione). A me
servirebbe per leggere (e scrivere) agli indirizzi delle porte
parallela e seriale - senza passare attraverso i comandi di VB. 
Se sapete come posso fare...
--
Simone Eliantonio
sim...@cclix1.polito.it

...........
Semplice, io uso una libreria come INOUT32.DLL
ma non ricordo da dove l'ho scaricata :-))
Se non trovi nulla fammi un fischio che te la spedisco (solo 22.8 Kb)
Ciao
   Giovanni
--------------------------------------
Giuseppe Giovanni Selgi
Software Developer
Fiumefreddo di Sicilia (CT)
Sel...@dns.omnia.it
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP ME: creare una DLL con Vb5

Dovrei esportare alcune funzioni scritte in visual basic in una DLL in modo
da poterle utilizzare all'interno di programmi scritti sia con VB sia con
altri linguaggi di programmazione.
Io ho provato a seguire questa strada:
- ho aperto un nuovo progetto come "ActiveX DLL"
- ho creato una funzione tipo:
  public function somma (byval numero1 as long, byval numero2 as long) as
long
    somma=numero1+numero2
  end function
- ho eseguito make project dal menu File
lui ha compilato e creato una DLL (che ho chiamato somma.dll)
Ho aperto un nuovo progetto (tipo EXE) e all'interno di un modulo ho
dichiarato
declare function somma lib "somma.dll" (byval numero1 as long, byval numero2
as long) as long
nella Form_load ho inserito il codice
debug.print somma (4,5)
Ma all'esecuzione il computer si ferma con "Cannot find somma entry point in
somma.dll"
Qualcuno mi puň aiutare ?
Grazie 10000
Fabio

Le dll create da VB non sono dll come quelle create in C : sono ActiveX
quindi per utilizzarle devi creare l'oggetto.
Ad esempio mettiamo che il tuo progetto di DLL si chiama MiaDll e il codice
lo hai scritto nella classe MiaCls allora dovrai chiamare la funzione con il
seguente codice
Dim ob as Object
Set Ob = CreateObject ("MiaDll.MiaCls")
Ob.somma argomenti
oppure andare sul menu Riferimenti ed aggiunere il riferimento alla tua Dll
e dimensionare l'oggetto direttamente con Dim.
(Ricorda di registrare la DLL se la installi su un altro PC da quello in cui
l'hai compilata)
Ciao.



Newsgroup: it.comp.lang.visual-basic
Titolo: Service Pack 4

Scusate , ma dove si può scaricare il SP4 ?
Sul Sito comune non c'è,e neanche sul sito microsoft.
E' per caso su qualche rivista ?
Grazie.
Gianfranco

 wrote in message 8ol3j1$9aq$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Screen Saver /c switch

I built a screen saver that seems to work good.  Now I am creating a
settings form that allows the user to change variables that control how the
screen saver displays info.
Now, all I need to do is get the screensaver setup button to automatically
open the configuration form to allow the use to change the settings of the
screen saver.  Knowledge Base article Q146907 said that screensaver set up
button runs the screen saver with a /c switch.  This was an old article
maybe this is not true for Win95 or WinNT?
Can anyone tell me how to set up my screen saver so that when the screen
saver, setup button is pushed my configuration form will display?
Thanks
Gary Brower
gary....@NIKE.com
----------------------------------------------------------------------------
------------------------
I was using this code to trap the /c switch, but it does not seem to work:
Private Sub Form_Load()
     If Command$ = "/c"  Then
        frmConfig.Show    ' Display the configuration form
        Unload Me             ' Bypass the screen saver form
    End If
End Sub


I've used "Command" not "Command$" when passing a startup parameter in my
progs. Does either work?
Stephen Kennedy

Stephen,
    You might try this as an alternative # it works for me
Private Sub Init_CheckCmdLine()
  ' Local variable
    Dim sCmd As String
    sCmd = UCase$(Trim$(Command$))
Debug.Print sCmd
    If InStr(sCmd, "/C") Then                                  '/c ~
configuration
      frmConfigure.Show
    ElseIf InStr(sCmd, "/S") Or sCmd = "" Then   '/s ~ preview and run
      frmSaver.Show
    ElseIf InStr(sCmd, "/P") Then                          '/p ~ preview
window
      frmPassword.Show
    ElseIf InStr(sCmd, "/A") Then                          '/a ~ password
protection
      End
    End If
End Sub

Should work
You may want to use instr instead of =. You may also want to Ucase
everything first
Private Sub Form_Load()
     If instr(UCase$(Command) , "C")  Then
        frmConfig.Show    ' Display the configuration form
        Unload Me             ' Bypass the screen saver form
    End If
End Sub
--
############################################
# Niels Andersen
# 
http://users.cybercity.dk/~dko2897/
# 
nand...@vip.cybercity.NOSPAM.dk
# to respond directly, remove NOSPAM
############################################

>

Newsgroup: it.comp.lang.visual-basic
Titolo: comando apri file visual basic 6

Sono alle prime armi.
come posso fare per associare l'apertura di un qualsiasi file a un pulsante
di commando.
Io ho creato un form , e all'interno ci ho messo un CommandButton,
al click del pulsante vorrei che mi facesse aprire un file di estensione
xls. o altro.
grazie

 ha scritto nel messaggio
news:NKg67.118785$q77.1...@news2.tin.it...

La domanda è molto generica.
La gestione dei files di VB è piuttosto ampia e flessibile.
Premi F1 sulla parola chiave Open, avrai molte informazioni a riguardo.
Se invecie intendi aprire un file di excel e visualizzarlo, beh, è tutta
un'altra storia.
1) Occorre avere Excel installato (o componenti di terze parti, che non mi
sembra esistano).
2) Devi crearti un'instanza ole dell'oggetto Worksheet.
Altri più esperti sull'argomento ti sapranno aiutare.
Credo (a memoria) che sia qualcosa tipo:
    Dim Obj as Object
    Set Obj = CreateObject("ExcelApplication.WorkSheet")
    Obj.LoadFile(fileXLS)
    Obj.Visible = True
    [...]
    Obj.Close
Per "ExcelApplication.WorkSheet" se non è corretto dovresti guardare nel
registro di sistema, se trova qualcosa di simile.
Per i metodi dell'oggetto Worksheet creato dovresti guardare o la guida VBA
di Excel o l'object inspector.
Ciao

 di Excel o l'object inspector.
Caspita ... č piu complicato del previsto .
intanto grazie del suggerimento

Newsgroup: it.comp.lang.visual-basic
Titolo: Automatizzare la creazione di Applicazioni

Salve a Tutti.
Ogni volta che inizio un nuovo progetto devo sempre eseguire le stesse
operazioni:
    -    Nuovo
    -    Aggiungere i riferimenti a crystal, ado, ecc .. . .
    -    Aggiungere i riferimenti alle mie dll di base
    -    Aggiungere alcuni form, controlli e classi (che sono sempre gli
stessi)
    -    Preparare il form di avvio (che è sempre lo stesso al 90%)
    -    Preparare alcuni moduli di base (sempre gli stessi al 90%)
Per i primi punti ho preparato un progetto ho aggiunto i riferimenti e lo ho
salvato su Template/Project.
Non ci sono modi, magari attraverso la creazione di propri wizard, di
automatizzare anche gli altri passaggi?
Al limite se mi potete indicare dove trovare un po' di documentazione.
Grazie.
Ciao
Bastianetto Giovanni

 automatizzare anche gli altri passaggi?
Non ho capito. Se hai fatto un progetto "base/standard" (da
duplicare/rinominare ogni volta) per i primi punti, perchè non anche per gli
altri?

 altri?
Nel progetto di base ho aggiunto i riferimenti che utilizzo sempre
(ADO, Crystal Report,... e alle mie dll.)
Fin qui tutto bene: dopo aver aperto il progetto richiedo di salvarlo
e mi viene richiesto il nome da dargli.
Ma se al progetto base aggiungo alcuni form o moduli (miei e quindi
"standard"), se poi richiedo un progetto nuovo, su questo modello, al
momento di salvare mi viene richiesto se salvare anche i form e i
moduli che ho inserito nel template.
Forse utilizzando nel modo opportuno gli ADD-IN potrei ottenere
qualcosa? (tipo un macro che mi accumula form, moduli, classsi, sul
progetto corrente?)
Grazie
Giovanni
Newsgroup: it.comp.lang.visual-basic
Titolo: Testo scorrevole

Scusate se vi disturbo con questa domanda, probabilmete idiota, ma in
un'applicazione che sto' scrivendo dovrei far scorrere del testo.
Esite qualcosa di fatto o devo organizzare tutto a codice?
Grazie e scusa del disturbo
Luca

Luca ha scritto:

Dai un'occhiata qui!
http://www.beginend.com
http://www.beginend.com/vbasic/main_tips.asp?id=4
			Ciao, Fabio.



Newsgroup: it.comp.lang.visual-basic
Titolo: [?] WM_NCHITTEST

Salve, volevo sapere se qualcuno di voi si è mai trovato a lavorare col
suddetto messaggio.
Una volta trappato col subclassing, per reindirizzarlo all'hWnd di
provenienza, come devo fare??
Effettuo un SendMessage con in wParam (o in lParam) una delle costanti
HT_**************?
Ringrazio anticipatemente
PS: Informo chi fosse interessato che ho quasi finito il modulo per creare
AppBar in VB; al più presto lo invierò al sito comune (se non l'ha già fatto
qualcun altro)
--
Kickaha, Master of MY Universe
E-MAIL: 
IO.Ki...@mclink.it
--------------------------
Moltissima gente confonde le opinioni con i pensieri
         "Herbert V. Prochnow"
Una conclusione è il punto dove sei stanco di pensare
         "Arthur Wright"

qualcun altro)
Ottimo!
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: seriale e dati in ricezione

ciao a tutto il ng
mi viene un dubbio e non so come risolverlo:
casualmente devo ricevere dati da una seriale (utilizzo 
vb.net
 +
mscomm), ma non posso tenere
costantemente la porta = open in attesa di un segnale. L'evento oncomm
invece funziona
solo dopo che la porta è stata aperta. C'è un sistema hw/sw per
risolvere?
un saluto
nervo

nervo ci ha detto :

Se la porta non è aperta, il messaggio inviato viene buttato nel rusco, 
quindi non puoi farci niente.
Se devi chiudere la porta perchè serve ad un'altra applicazione, allora 
tieni presente che se il messaggio arriva quando la porta è in uso 
all'altra app, sarà questa a ricevere il messaggio, e non tu.
L'unica cosa che puoi fare, se vuoi che il messaggio non venga 
cestinato e che ti venga recapitato solo quando aprirari la porta (e tu 
periodicamente la dovrai aprire e verificare se si riceve qualcosa), è 
chiedere alla device di gestire l'handshaking hardware. Al che la tua 
porta, quando chiusa, non darà il CTR/CTS alla device, e questa si 
terrà nel buffer i messaggi, per poi inviarteli appena aprirai la 
porta.
Ovviamente dovrai utilizzare un cavo seriale completo e non di quelli 
semplificati con solo TX/RX o ancora meno quelli con i consensi 
cortocircuitati.
Ciao
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.

ok!
grazie 1000 per l'ottima speigazione.
nervo

Newsgroup: it.comp.lang.visual-basic
Titolo: [ADO] Ordinamento decrescente e altro..

Salve a tutti!!
1.Ho provato ad utilizzare il metodo sort dei recordset di ADO ma da quello
che ho potuto capire si puo solo ordinare in maniera crescente.
Esiste un metodo per ordinare in senso inverso, che so, una costante da
applicare al metodo ?
2.Ho provato a popolare un datacombo (ADO) via codice ma il controllo
continua a rimanere vuoto!!
Ho istallato IE5, sara mica per colpa sua se non funziona?? Premetto che
quando non avevo IE5 non ho mai provato il datacombo per cui non so dire se
prima la cosa funzionasse oppure no!!
Grazie e saluti a tutti
Daniele Cazzaro

prima la cosa funzionasse oppure no!!
Non credo sia colpa di IE5.
Comunque forse è meglio che ci posti il codice.
 __     __
<o>  <o>
      []
  \____/   ......(Statti bene!)
Pasquale
mine...@libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: GotFocus tab o click

Come faccio a sapere se l'oggetto in questione ha ricevuto il "fuoco"
con il tab o con il mouse?
Antonello
mailto:
a.al...@mail.omnitel.it

...

-------------
Ciao!
Cerca nella Guida in linea l'evento "GotFocus".
Alla prossima
Marco Minerva
http://www.armaditaggia.com/marco
http://www.geocities.com/SiliconValley/Foothills/7260/
Newsgroup: it.comp.lang.visual-basic
Titolo: App. con iMac

Qualcuno di voi sa per caso se esiste la possibilità di
avere un software che crei un pacchetto di installazione
di applicazioni sviluppate in vb sotto Windows ma da far
girare su Mac?
Grazie dell'attenzione

girare su Mac?
  Visto che il programma VB puo' girare solo in emulazione su un Mac
perche' non provare a far girare anche il setup in emulazione?
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

 ha scritto nel messaggio
news:rIYc6.78122$lV5.1...@news2.giganews.com...


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

Salve,
ho una picturebox che va a prendere il suo contenuto dagli appunti.
Il problema è che la picture box è di circa 100 x 100 pixel e se l'immagine
negli appunti è piu grande viene "tagliata".
Come faccio a ridimensionarla e poi metterla nella picture box?
Ringrazio.

 wrote in message
3cc6d452$0$2142$7402...@newsfeed.sunrise.ch...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT-Sfogo] Mi girano...

... da matti!
Quanto poco basta, a volte...
Fine.

 ... da matti!
Approfitta per andare in piscina, in quelle condizioni
nuoti pių facilmente. ;-)
Un Paperino che s'infila nel rifugio antiatomico. :-P


ti presto l'accendino?

 Fine.
    E del tuo amico Renard Coyot che ne hai fatto? L'hai sbranato?
    O ti sei reso conto di essere ancora piuttosto giovane, dopotutto?
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

     O ti sei reso conto di essere ancora piuttosto giovane, dopotutto?
Io, ammettendo con modestia tutti i miei limiti e la mia non giovane età, ti
capisco sempre meno.
Ti sarei grato se mi spiegassi anche queste (un'altra, quella del
"sorvegliato a vista", ancora me la devi).
Come vedi, prima di ululare, chiedo. Poi deciderò se è il caso di sbranare o
meno qualcuno.

 o meno qualcuno.
    Speriamo bene.
    Comunque, perche' ho risposto al tuo "[OT-Sfogo] Mi girano..."?
    Per dimostrarti che m'era passato il *mio* giramento dell'altro giorno;
per dirti, senza dirlo, per orgoglio, che forse avevo esagerato.
    Ma non ne sono poi tanto sicuro. Perche' mi sono un po' rotto delle
*immancabili* battutine che circondano sempre i post delle ragazze. E tu,
nel post che sai, avevi avuto veramente la mano pesante. Poi non sopporto i
puntini al posto delle parole volgari. O hai il cattivo gusto di scriverle o
fai a meno, cazzo! ( Pero' quanno ce vo' ce vo' :-)


 fai a meno, cazzo! ( Pero' quanno ce vo' ce vo' :-)
La tua reazione mi è parsa eccessiva, al punto da farmi sorgere il dubbio
sulla sua serietà, ma non ho trovato uno straccio di faccina in giro. Ho
citato un proverbio e nel tentativo (evidentemente vano) di "ricordarlo
senza scriverlo" ho ... messo i puntini, come qui, adesso, perchè d'istinto
avrei messo quel che là ho censurato: ....!
Comunque sia, l'importante è che si sia fatta chiarezza senza, spero, aver
fatto troppi danni. ;-)
'notte.
--


 sulla sua serietà, ma non ho trovato uno straccio di faccina in giro.
Ho idea che Maurizio faccia parte, o almeno sia un simpatizzante,
del MLF (Movimento per la Liberazione dalle Faccine).
Insieme magari a un certo Roberto Poggi, da altri NG, il cui stile
ricorda molto il suo... competente, secco e preciso.
Non dico che non mettano umorismo, goliardia, battutine o a volte
sarcasmo, magari abbondano, ma quasi sempre senza faccine.
Che ci sia qualche legame fra le due cose ?
Bye, G8-P

 Bye, G8-P
    Genova per me e' una citta' come un'altra, pero'.


     Genova per me e' una citta' come un'altra, pero'.
Un po' migliorata, ultimamente. Traffico sempre tremendo, ma i palazzoni
anni '60 e '70, con quei trompe l'oeil sembrano un po' piů artistici, e sono
sicuramente piů simpatici.
E poi Bonnie adesso ha dato un fratellino a Cleo :-))
Un Paperino con l'ottěmetro a fondo scala.
Newsgroup: it.comp.lang.visual-basic
Titolo: problema con Form Child

Ciao a Tutti !!
Ho creato un MDIForm con al suo interno un Child Form, solo che quest'ultimo
quando mi viene aperto è più piccolo di quanto lo avevo fatto e devo
risistemarlo per poter vedere alcuni pulsanti.
Denis

 ha scritto nel messaggio
news:8aag75$hg2$1...@fe1.cs.interbusiness.it...



devi fare uno Show manuale dei child e mettere AutoShowChild (mi sembra si
chiami cosě, non ho VB sottomano) dell'MDI a False.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: INTERPRETAZIONE ON THE FLY

Ciao a tutti,
mi serve una mano in VB6, ma la cosa penso sia un po' complicata.
Visto che VB è interpretato è possibile dire ad un programma in esecuzione
che legga un file contenente istruzioni Visual Basic e che lo esegua
immediatamente (senza quindi dover ricompliare tutto?).
Cioè posso relaizzare un programma che autogeneri codice e dopo lo
interpreti al volo?
Mi sa che è una sfida troppo dura!
Vi ringrazio
Ivan
ivan.c...@amm.uniud.it

 ha scritto nel messaggio
news:873ep4$hrf$1...@news.cineca.it...


 
so che esiste il wsh ( windows scripting host ? ) che permette di
interpretare sia vbscript che java e che certamente puo' essere lanciato
come programma stand alone, ma che dovrebbe , tramite apposito ocx
essere usabile anche in un programma scritto in VB, purtroppo non sono
riuscito ancora a farlo funzionare.

Ciao,
a wsh ci avevo già pensato...ma il problema è che non riesco
a lavorare nell'ambiente RUNTIME su cui eseguo il primo programma....
proverò...vi farò sapere...
Ivan





Anche se la soluzione di Scoglio mi sembra la più indicata, so che esiste un
programma della Sax Software chiamato Sax Basic Engine che .........
... "consente di aggiungere facilmente un linguaggio macro alle applicazion
VB, in modo che gli utenti le possano personalizzare al volo"
Ciao
        Davide


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

Scusate la domanda, forse banale, purtroppo non sono riuscito a risolvere il
problema da solo.
Ho creato un semplice progetto che comprende una listbox e un command
button. Il cmd button serve per aggiungere elementi alla listbox.
Dopo aver aggiunto gli elementi, devo salvare per non perdere i dati
inseriti.
private sub command1_click()
  list1.additem "ciao"
  list1.additem "sera"
end sub
E ora per salvare i dati? Grazie per l'attenzione

 E ora per salvare i dati? Grazie per l'attenzione
umm umm, un file di testo ? Ini ?
(AVVIO)
Aprifile, leggi e popoli List1,chiudifile
...
(salvataggio)
Apri, scrivi, chiudi il file
-- 
<Gigio2K>
--- 
http://www.g2kweb.it/gigio2k
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/
Newsgroup: it.comp.lang.visual-basic
Titolo: function e return

Oi!
Allora, io non capisco perkè nella funzione:
Function ProxQuiet() As Date
Dim myyear, mymonth As Integer
Dim mydate As Date
If Month(Now) > 6 Then
  myyear = Year(Now) + 1
  mymonth = 1
  lbl1 = Now
Else
  myyear = Year(Now)
  mymonth = 7
End If
mydate = CDate("1/" & mymonth & "/" & myyear)
Return mydate
End Function
---------
Mi dà errore sul return, e non me lo dà solo se non aggiungo parametri
ossia metto un'istruzione
return
senza niente.. :?!
Grazie mille e 
Axè!

per ritornare un valore da una function devi fare NomeFunction=Valore, nel
tuo caso:
ProxQuiet = mydate
la return serve per ritornare dopo una chiamata col Gobus. non usarlo molto,
se ci riesci.....
non per farti innervosire, ma ti hanno già invitato a premere F1, a googlare
e a leggere qualcosa prima di metterti davanti alla tastiera a scrivere
codice....
:-)
good coding!!!
-- 
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

codice...
C'hai ragione :D 
Scusa
Axè!

 nel tuo caso: ProxQuiet = mydate
VB.NET
 usa Return, e devo dire che č molto piů comoda di NomeFunzione =
Valore: cosě se cambi il nome alla funzione non devi modificare il codice
dieci posti e sai rempre che quello č il valore della funzione e non di una
variabile.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

sě, vero. Presumo inoltre che vb sia l'unico ad usare questa sintassi per il
ritorno da Function....
sbaglio????
un'altra nota negativa: quando si sta scrivendo la Function, il cursore č
all'interno, voglio dire, avete mai provato ad usare CTRL+Spazio per
intellisense. Il nome della Function appare due volte: una č la function
vera e propria, l'altra č la variabile di ritorno. :-/
scegliere una o l'altra č la stessa cosa ovviamente, perň č
fuorviante.......


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Stampa angolata [sono nei guai]

Salve,
Fino a poco tempo fà utilizzando il codice trovato sul sito comune riuscivo
a stampare sull'oggetto printer del testo a 90° rispetto alla normale linea
di stampa.
ORA NON FUNZIONA PIU' !!!!!!!!!!
e non riesco a ricordare cosa posso aver combinato di così grave da causare
questo danno.
Qualcuno sa indicarmi come posso fare a stampare indicando l'asse verticale
od orizzontale sulla stessa pagina dell'oggetto printer.
Grazie anticipate.

...



Non so come funziona l'esempio del sito comune, ma credo si basi sullo
stesso principio del metodo che utilizzo io.
Se è così funziona SOLO con font truetype.


come dicevo in un altro msg , ho trovato nel sito comune un'altro esempio
(vprint), e sembra che funzioni.
(Speriamo bene).
I font di stampa vengono selezionati dall'utente, quindi all'occorrenza
userà quello che funziona!
Ciao, Eros

...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] DBGrid

E' possibile aprire un database di access con una dbgrid in sola lettura,
cioč senza che sia possibile modificarlo in runtime?
Andrea Morelli

 cioè senza che sia possibile modificarlo in runtime?
si'.
guarda le proprieta' della griglia, tipo allowupdate.
Newsgroup: it.comp.lang.visual-basic
Titolo: Refresh Html WebBrowser

Salve,
Tramite il codice sotto, dopo aver visualizzato il primo valore di 
contattore correttamente =1, ai successivi eventi click non viene 
visualizzato il valore aggiornato di contatore. Ho provato con refresh 
ma mette a blank.
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Button2.Click
        Contatore = +1
        WebBrowser1.DocumentText = "<td <Td>Contatore=" & Contatore & 
"</Td>"
    End Sub
grazie
Mike
-- 
Saluti Mike

Nel suo scritto precedente, Mikele ha sostenuto :

Risolto, non so per quale motivo ma era impostato:
 WebBrowser1.AllowNavigation = False, con True tutto Ok
-- 
Saluti Mike

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ToolBar+ButtonMenu

Di nuovo ciao a tutti.
Volevo chiedere aiuto riguardo l'aggiunta in runtime di buttonmenu in un controllo
toolbar.
Mi spiego:
Creo un button con una determinata descrizione, poi voglio creare X buttonmenu su quel
button eseguo:
Set btnX = tlbToCreate.Buttons.Add(, "CIAO", "CIAO", tbrDropdown)
Do While Not rsMenu.EOF
For i=1 to x
 btnX.ButtonMenus.Add , , x
 btnX.ButtonMenus.Item(x).Tag = "Prova"
Next
questo mi da un errore di limiti esauriti nella riga btnX.ButtonMenus.Add , ,x
N.B.
a me serve valorizzata la proprietą tag del buttonmenu
Grazie 1000 a chi mi aiuterą
Aran Banjo

 Next
[SNIP]
Dunque, al di la' del fatto che non si evince dal codice che valore puo'
avere x, il fatto e' che viene usato prima come Text del ButtonMenu (terzo
parametro di .Add) e poi come Index o Key nella collection dei ButtonMenus.
Riguarda un po' il codice, probabilmente volevi usare la variabile i, non x,
per lo meno nell'istruzione .Item() ...
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

per lo meno nell'istruzione .Item() ...
[CUT]
Probabilmente (sicuramente) non ho formulato la domanda in maniera corretta.
Dovrei aggiungere a runtime dei buttonsmenu valorizzando la proprietà TAG di ogni singolo
buttonmenu.
Lasciando perdere il codice che ho postato (che é naturalmente sbagliato), come posso
fare?
Grazie 1000
Aran

Di nuovo ciao a tutti.
[CUT]
Sono riuscito a risolvere, grazie lo stesso a tutti.
Aran