Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 5 su 5

Inserire un testo predefinito nella casella di testo che scompare con click del mouse

  1. #1
    federicodi84 non è in linea Scolaretto
    Salve, ho una maschera, in Access 2010, di login che prevede due campi di testo: username e password (impostata in modo tale che ci siano gli asterischi). Quello che vorrei fare è far vedere la dsecrizione come testo predefinito nei campi, ad esempio nel campo di testo username appena si apre la maschera ci deve essere scritto "Inserisci l'username" e questa scritta dovrà sparire al click del mouse sulla casella... e così anche nel campo password. Spero di essermi spiegato. Grazie in anticipo per il vostro aiuto.

  2. #2
    L'avatar di @Alex
    @Alex non è in linea Moderatore Globale
    Se volessi un simbolo di Tipo, come l'UNDESCORE che identifica l'immissione "_"... ti basterebbe andare nei parametri "Maschera di INPUT"
    Valore Predefinito=Testo da Inserire
    
    quindi da gestire in VBA questo:
    Private Sub TuaTextBox_GotFocus()
        Me.TuaTextBox.Value = vbNullString
    End Sub
    
    Private Sub TuaTextBox_LostFocus()
        Me.TuaTextBox.Value = Replace(Me.TuaTextBox.DefaultValue, Chr(34), vbNullString)
    End Sub
    
    Non ho provato tutte le casistiche... ma pare funzionare... vedi se ti soddisfa..., a me non piace la parte quando perde lo stato attivo, in quanto potrebbe generare un'inserimento non voluto del VALORE imposto...!
    D'altra parte, se esci dal controllo dopo averlo azzerato non c'è modo di ripristinare il DEFAULTVALUE se non su Nuovo Record...
    ℹ️ Leggi di più su @Alex ...

  3. #3
    federicodi84 non è in linea Scolaretto
    Ciao grazie dell'aiuto, tuttavia funziona a metà infatti prima di cliccare sulla casella c'è un valore predefinito poi quando ci clicco sparisce e mi fa scrivere l username, peró quando mi sposto sulla casella password mi cancella l username che avevo scritto e mi riappare il valore predefinito. Un altro problema sta nel fatto che io la textbox password l'ho settata in modo tale che scrivendoci escano gli asterischi e così anche il valore predefinito esce con asterischi... Non ho la piu pallida idea di come risolvere le 2 problematiche..

  4. #4
    Giammi77 non è in linea Scolaretto
    Io ho provato così
    Option Compare Database
    Option Explicit
    
    Private Sub Comando8_Click()
        Dim StrPas As String
        Dim StrUse As String
        StrPas = Me.TxtUserId.Value
        StrUse = Me.TxtPassword.Value
        If StrPas = "Giammy" And StrUse = "007" Then
            MsgBox "Loggin effettuato !"
        Else
            MsgBox "Controlla i dati di accesso ! Loggin non effettuato !"
            Me.AllowEdits = False
            StrPas = "Inserisci Password .."
            StrUse = "Inserisci UserId .."
            Me.TxtPassword.Value = StrPas
            Me.TxtUserId.Value = StrUse
        End If
        
    End Sub
    
    
    
    Private Sub Form_Load()
        Me.AllowEdits = False
        Dim StrPas As String
        Dim StrUse As String
        StrPas = "Inserisci Password .."
        StrUse = "Inserisci UserId .."
    
        Me.TxtPassword.Value = StrPas
        Me.TxtUserId.Value = StrUse
    End Sub
    
    Private Sub TxtPassword_AfterUpdate()
    Me.AllowEdits = False
    End Sub
    
    Private Sub TxtPassword_Click()
    Me.AllowEdits = True
    Me.TxtPassword.Value = ""
    
    End Sub
    
    Private Sub TxtUserId_AfterUpdate()
    Me.AllowEdits = False
    End Sub
    
    Private Sub TxtUserId_Click()
    Me.AllowEdits = True
    Me.TxtUserId.Value = ""
    End Sub
    
    l'unica cosa è che il testo "inserire password " non mi compare se metto come proprietà maschera di inserimento "password" nella cassella di testo per l'inserimento della password ma mi compaiono gli asterischi
    è un po grezzo ma pare funzioni .. ho letto anche che :
    Problema

    Vuoi usare una casella di testo per inserire un password e vedere soltano i soliti asterischi invece del testo.

    Soluzione

    Imposta la proprietà Maschera di input della casella di testo a: Password

    Due note sulla tematica:

    - Una domanda frequente è se questo sia anche possibile con un Inputbox di VBA.
    Risposta: No. Si deve usare una casella di testo in una maschera.

    - Se con il cursore nella casella di password viene attivato il controllo ortografia con <F7> o la voce del menù/ribbon, il testo si vede in chiaro nella finestra di dialogo del controllo ortografia. Se questo è un problema, dovresti disattivare il tasto speciale (nelle impostazioni d'avvio o con un macro di assegnazione tasti) e nascondere la relativa voce di menù/ribbon.
    gian

  5. #5
    L'avatar di @Alex
    @Alex non è in linea Moderatore Globale
    Si hai ragione, ultimamente sono parecchio distratto...
    Potrebbe bastare leggere il contenuto
    Private Sub TuaTextBox_GotFocus()
        If Len(Me!TuaTextBox.Value)=0 then Me.TuaTextBox.Value = vbNullString
    End Sub
    
    Private Sub TuaTextBox_LostFocus()
        If Len(Me!TuaTextBox.Value)=0 then Me.TuaTextBox.Value = Replace(Me.TuaTextBox.DefaultValue, Chr(34), vbNullString)
    End Sub
    
    ℹ️ Leggi di più su @Alex ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. scorrimento casella di testo con rotella mouse
    Da muttley005 nel forum Microsoft Access
    Risposte: 7
    Ultimo Post: 02-07-2019, 08:32
  2. Parola nella casella di testo in grassetto
    Da il socio nel forum Microsoft Access
    Risposte: 7
    Ultimo Post: 06-10-2014, 13:47
  3. valore predefinito casella testo
    Da patatrac nel forum Microsoft Word
    Risposte: 18
    Ultimo Post: 05-02-2010, 22:00
  4. Inserire testo nella system try
    Da lucagfc nel forum Visual Basic 6
    Risposte: 10
    Ultimo Post: 11-07-2007, 12:25
  5. valore predefinito casella testo
    Da John nel forum Microsoft Word
    Risposte: 5
    Ultimo Post: 19-01-2007, 19:06