Pina
29-06-2001, 18:30
Scusate le domande ke sicuramente x voi saranno stupide ma sono alle prime armi con il VISUAL BASIC:
Ho dei problemucci cone alcune finestre di dialogo:
ho creato una finestra di dialogo apri con il seguente codice:
Private Sub Apri_Click()
CommonDialog1.Filter = "file di testo (*.txt)"
CommonDialog1.FilterIndex = 1
CommonDialog1.ShowOpen
End Sub
Fin qua tutto ok.. desidero sapere qual'e' la differenza con il seguente codice:
Private Sub Apri_Click()
Dim NomeDelFile As String
CommonDialog1.Filter = "file di testo simo (*.txt)"
CommonDialog1.FilterIndex = 1
CommonDialog1.ShowOpen
NomeDelFile = CommonDialog1.FileName
End Sub
la stringa nomedelfile=commondialog.filename cosa significa???
poi vorrei visualizzare la finestra di dialogo carattere e con il
seguente codice non funziona:
Private Sub Command1_Click()
commondialog1.flags = cdlcfeffects Or cdlfboth
commondialog1.showfont
End Sub
x creare invece la finestra di dialogo carattere invece con il seguente codice:
Private Sub Command1_Click()
CommonDialog1.ShowFont
End Sub
mi dice nessun tipo di carattere installato per installarli aprire l'icona nel pannello
errore di runtime 24574
cosa c'è di sbagliato?
Grazie
:eek:
Ho dei problemucci cone alcune finestre di dialogo:
ho creato una finestra di dialogo apri con il seguente codice:
Private Sub Apri_Click()
CommonDialog1.Filter = "file di testo (*.txt)"
CommonDialog1.FilterIndex = 1
CommonDialog1.ShowOpen
End Sub
Fin qua tutto ok.. desidero sapere qual'e' la differenza con il seguente codice:
Private Sub Apri_Click()
Dim NomeDelFile As String
CommonDialog1.Filter = "file di testo simo (*.txt)"
CommonDialog1.FilterIndex = 1
CommonDialog1.ShowOpen
NomeDelFile = CommonDialog1.FileName
End Sub
la stringa nomedelfile=commondialog.filename cosa significa???
poi vorrei visualizzare la finestra di dialogo carattere e con il
seguente codice non funziona:
Private Sub Command1_Click()
commondialog1.flags = cdlcfeffects Or cdlfboth
commondialog1.showfont
End Sub
x creare invece la finestra di dialogo carattere invece con il seguente codice:
Private Sub Command1_Click()
CommonDialog1.ShowFont
End Sub
mi dice nessun tipo di carattere installato per installarli aprire l'icona nel pannello
errore di runtime 24574
cosa c'è di sbagliato?
Grazie
:eek: