Suporte ao desenvolvimento de jogos!


    Máximo e mínimo de caracteres para criar char.

    Compartilhe
    avatar
    Nãner
    Iniciante
    Iniciante

    Mensagens : 58
    Créditos : 16

    Máximo e mínimo de caracteres para criar char.

    Mensagem por Nãner em Qui Nov 10, 2011 7:36 pm

    Tipo: Eu ponho o máximo de 8. Ai quando o cara for criar seu personagem, e botar nome com mais de 8 letras, aparecerá uma mensagem dizendo que o máximo de caracteres é 8.

    Vamos ao que interessa.

    Cliente-Side.

    Na frmNewChar procure pela label picAddChar. De dois clicks para abrir o código, irá abrir a sub:
    Código:
    Private Sub picAddChar_Click()

    Nela procure por:
    Código:
    If Len(Trim(txtName.Text)) < 3 Then
                MsgBox "Nomes de personagens precisam ser de no mínimo 3 caracteres."
                Exit Sub
            End If

    Abaixo adicione:
    Código:
    If Len(Trim(txtName.Text)) > 8 Then
                MsgBox "Nomes de personagens precisam ser de no máximo 8 caracteres."
                Exit Sub
            End If

    E basta mudar o 8 do código para o máximo de caracteres que quiser.
    E na mensagem também!

    Créditos:
    RenanR.

    Bom, um tutorial bem simples. Apenas para ensinar aos novatos a como mudar o mínimo de caracteres necessários para criar um char.

    Em Cliente-Side vá na frmNewChar e de dois clicks na label "picAddChar" e aparecendo assim, a sub:
    Código:
    Private Sub picAddChar_Click()

    Nela procure por:
    Código:
    If Len(Trim(txtName.Text)) < 3 Then
                MsgBox "Nomes de personagens precisam ser de no mínimo 3 caracteres."
                Exit Sub
            End If
    ~

    Agora Explicando!

    If Len(Trim(txtName.Text)) < 3 Then - Mude o 3 para o mínimo de caracteres!
    MsgBox "Nomes de personagens precisam ser de no mínimo 3 caracteres." - mude a mensagem que irá aparecer!
    Exit Sub - Isso faz com que saia da sub. Não mecha.
    End If - Isso tira o If que botamos no começo do código! Não mecha.

    Créditos:
    Kkg2007

      Data/hora atual: Ter Dez 11, 2018 5:25 pm