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

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