![]() |
Ανενεργό πλήκτρο 2 Συνημμένο(α) καλησπερα !! θα μπορουσε καποιος να με βοηθησει με το πατημα του πληκτρου το ιδιο το πλήκτρο να γινεται ανενεργο;;; :036: |
To μήνημα λάθους στο λέει pliktro.SetFocus pliktro.Enabled = False |
γιατι εμένα συνεχιζει να το κανει το προβλημα ??? :fryingpan: Private Sub pliktro_Click() pliktro.SetFocus 'χρειάζεται για να μεταφερθεί η εστίαση pliktro.Enabled = False 'από το κουμπί πριν γίνει αόρατο End Sub :036::036: |
Καλησπέρα σας, Χρονιά Πολλά!!! Σβήσε την γραμμή pliktro.SetFocus Και δοκίμασε Private Sub pliktro _Click() Me.pliktro.Enabled = False End Sub Αλλιώς βαλέ εδώ Private Sub pliktro _MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Me.pliktro.Enabled = False End Sub Ευχαριστώ |
ουτε το ενα ουτε το αλλο !!!!!! :sntoup::sntoup::sntoup::sntoup::baaa: |
test.SetFocus pliktro.Enabled = False ή test.SetFocus pliktro.Visible= False |
Παράθεση:
Το test που υπάρχει ; επίσης είναι μέσα στο click του πλήκτρου, δηλαδή έτσι... Private Sub KOUMPI_Click() test.SetFocus pliktro.Enabled = False End Sub ...γιατί έτσι δεν λειτουργεί τίποτε!!!! Ευχαριστώ πολύ πάντως που ασχολήθηκες. :036::036::036::036::036::036::036::036: Αν γνωρίζει κάποιος παρακαλώ να με βοηθήσει,έχω κολλήσει σε αυτό το θέμα, και θα προτιμούσα σε μια βάση δεδομένων γιατί έτσι είναι πιο κατανοητό πιστεύω!!! Ευχαριστώ !!!! |
χρονια πολλα και καλες γιορτες μεσα στη φορμα εχεις ενα πεδιο test= santimentos θα κανεις setfocus το πεδιο που εχει τιμη "Santimentos" Private Sub KOUMPI_Click() ΤΟ ΠΕΔΙΟ ΜΕ ΤΙΜΗ santimentos.SetFocus pliktro.Enabled = False End Sub |
δηλαδη Me.pedio.setfocus 'για να φυγει η εστιαση απο το κουμπι και μετα me.pliktro.Enabled = False 'για να γινει ανενεργο ή me.pliktro.Visible= False 'για να γινει αποκρυψει |
αρχειο για δοκιμη 1 Συνημμένο(α) αρχειο για δοκιμη |
θα πρεπει ομως να κανεις το κουμπι να γινεται ορατο οταν ανοιγει η φορμα με την εντολη me.pliktro.Enabled = true 'για να γινει ενεργο ή me.pliktro.Visible= true 'για να γινει ορατο |
Ευχαριστώ πολύ !!! :thumbup: :thumbup: :thumbup: :yahoo: Στην περίπτωση που δεν έχει κανένα πεδίο μια forma εκεί τι κάνουμε? |
μεσα στη φορμα κανεις ενα πεδιο χωρις τιμες με πλατος, υψος 0 και το κανεις focus |
ΕΥΧΑΡΙΣΤΩ ΠΟΛΥ !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !! :004: |
| Η ώρα είναι 15:40. |
Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.