Article View: free.it.visual-basic
Article #2181Problemi con Ciclo For next
From: Info
Date: Sat, 13 Sep 2003 08:48
Date: Sat, 13 Sep 2003 08:48
50 lines
2489 bytes
2489 bytes
Ciao Ragazzi! Ho un piccolo problemino e spero voi possiate aiutarmi! Ebbene: SCOPO: Creare un form per inserire nome utente e password ogni volta che si avvia il programma. Una sorta di login insomma. Azioni: 1. aperto l'editor di VB da una qualsiasi applicazione Office; 2. inserito un form nel progetto (per es. Personal.XLS), aggiunto le caselle di testo, i controlli label e il pulsante di comando; (Fin qui tutto normale amministrazione); 3. cominciato a scrivere il codice. Ho creato una struttura condizionale nell'evento clic del comando button, tipo questa: dim user, psw as string user = txtUser.text psw = txtPsw.text If user = "D" and psw = "123" then Msgbox "OK", vbInformation", "login" thisworkbook.activate unload me exit sub else Msgbox "Errata, riprova", vbInformation", "login" txtPsw.text= "" With txtUser .text= "" .setfocus End with end if Voi mi direte: e allora? E qui che vi chiedo aiuto! Dunque: 1. Vorrei creare una procedura che se l'utente sbaglia ad inserire i dati pi� di n volte, l'applicazione si chiude! Sinceramente ho provato a creare un ciclo For..next, ma i risultati sono ehhmmm non tanto buoni, anzi per niente. Essendo un neofita, anzi un ultraneofita, non � che abbia grosse pretese, ma d'altronde vorrei riuscire a farlo.. 2. E' possibile infine, nascondere la cartella di lavoro quando si avvia l'applicazione e mostrare solo il form di login? Vi ringrazio per l'aiuto. Ciao Fr.
Technical Details
Message-ID:
<bjulmc$i3l$1@lacerta.tiscalinet.it>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-09!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!news.mailgate.org!draco.tiscalinet.it!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: ITALIAN,ASCII X-Google-Thread: f94ee,7954ae86da09b1a9 X-Google-Attributes: gidf94ee,public X-Google-ArrivalTime: 2003-09-13 01:49:22 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-09!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!news.mailgate.org!draco.tiscalinet.it!not-for-mail From: "Info" <fraamd@tiscali.it> Newsgroups: free.it.visual-basic Subject: Problemi con Ciclo For next Date: Sat, 13 Sep 2003 10:48:54 +0200 Organization: Tiscali Spa Lines: 55 Message-ID: <bjulmc$i3l$1@lacerta.tiscalinet.it> NNTP-Posting-Host: ppp-217-133-212-100.cust-adsl.tiscali.it X-Trace: lacerta.tiscalinet.it 1063442956 18549 217.133.212.100 (13 Sep 2003 08:49:16 GMT) X-Complaints-To: abuse@tiscali.it NNTP-Posting-Date: 13 Sep 2003 08:49:16 GMT X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2600.0000 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000