VB Le domande pg 1
Casella di testo con sintax  highlight  

Come si puo fare una casella di testo con sintax highlight (con le parole colorate ) ?

Si usa un control RichTextBox, ma   il codice per  gestire le keyword colorate lo devi scrivere  tu, non penso che  in giroci sia  qualcosa di pronto.

 

Chiudere un applicazione mediante la X posta sull'angolo destro  

Non riesco a gestire correttamente l'evento di chiusura di una mia applicazione mediante la X
posta sull'angolo destro. In particolar modo non riesco con il pulsante "Annulla" della box
"Si-No-Annulla" ,dopo aver pigiato la X ,a non far terminare l'applicazione come posso fare?.

Risposta:
Il tuo problema può venir risolto inserendo del codice simile a questo qui
di seguito all'interno della Private Sub Form_QueryUnload.

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim rispo As Integer
rispo = MsgBox("esci ?", vbYesNo + vbQuestion)
If rispo = vbYes Then
End
Else
Cancel = True
End If
End Sub

 

Come si fa a collegare un db di Access97 ad una combobox ?    

Per collegare un db Access97 ad una combobox si fa così:
nella finestra delle proprietà della combobox imposta
DataSource = Data1
DataField = Nome campo che ti interessa

 

Come si fa a creare controlli a run time su un form ?

Per creare controlli a run-time si deve  inserire nel Form uno dei controlli da duplicare (es. Label) dandogli un valore (ad es. 0) nella proprietà Index, in modo da creare un array di controlli. Per creare poi i cloni della Label (es. Label1) scrivi un codice simile a questo qui di seguito
Load Label1(1) 'Label1(0) e' il controllo inserito nel Form a design-time
Load Label1(2)
Load Label1(n) 'eccetera
Questi controlli sono inizialmente invisibili, quindi per ognuno si dovrà impostare la proprietà Visible a True.

 

Creare uno Screen Saver

Dove potrei   prendere spunto per creare  in vb uno screen saver?

Nel CD di VB5 c'è un esempio di screen saver scritto in VB di nome SSaver.vbp nella dir "Unsupprt".

 

L'errore 50003

Se copio dal mio computer  ad un altro computer  un mio file exe  e poi lo avvio mi compare il seguente messaggio di errore:
"Errore di run-time 50003 - Errore imprevisto".

Parchè ?

Il problema potrebbe essere che si tenta di far girare un exe compilato in VB5 SP3 su un runtime di VB5 senza SP3 si deve controllare la versione delle dll e ocx incriminate. 

 

Come si fa per leggere i parametri della linea di comando in un programma VB ?                                                        

Usa la funzione Command$: essa restituisce la parte della riga di comando che appare oltre il nome dell'applicazione.

 

Come si fa a leggere l'etichetta di un disco  da un progr. scritto in VB ?

Con la funzione API GetVolumeInformation. 

Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" ( ByVal  lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal FileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long                                              

Dim sLabel As String

sLabel = String$(12, 0)

 

Come si può modificare il file Win.ini da programma ?    

Per modificare le chiavi del file Win.ini in Win32  si deve usare le funzioni API GetProfileString (legge) e WriteProfileString (scrive). Consultare la documentazione delle API sul CD MSDN per i dettagli.

 

Come posso portare un oggetto in primo piano ?  

Per portare in primo piano un oggetto rispetto agli altri si usa l metodo ZOrder

Oggetto.ZOrder 0