Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

Patrijosa

separar uma string ...

Mensagens Recomendadas

Patrijosa

manos tenho uma textbox na minha aplicação que recebe um número qualquer... mas todos estes números vêm acompanhado de duas constantes no fim...

ou seja, o número 566 quando inserido na textbox, aparece 56601.... a minha questão é como separa-lo de maneira que eu tenha o  566 como valor de uma variável e o 01 como valor de outra variável?

ACTUALIZANDO: Preciso retirar deste número independentemente do comprimento do mesmo, os últimos dois dígitos...

Exemplos:

234567677 = 2345676 e 77

5565656 =  55656 e 56

767676868686868 = 7676768686868 e 68

como separar desse jeito em vb.net

grato pela atenção

cumps

Ps


O verdadeiro sábio é um eterno aprendiz!

http://www.patriciodossantos.net

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
anolsi

Mas tu sabes sempre qual é a constante? Ou sabes sempre que são os dois últimos dígitos?


"Nós somos o que fazemos repetidamente, a excelência não é um feito, e sim, um hábito."
Não respondo a questões por PM que possam ser colocadas no fórum!

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Patrijosa

Mas tu sabes sempre qual é a constante? Ou sabes sempre que são os dois últimos dígitos?

sei a constante... o que acontece é o seguinte:

- Tenho um cartão com dois código de barras... nestes dois códigos de barra deve aparecer sempre o número do utente + a constante que na parte frontal é 01 e no verso é 02

quero separar destes números as constantes para saber qual lado do cartão foi lido-...

Cumps

PS


O verdadeiro sábio é um eterno aprendiz!

http://www.patriciodossantos.net

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
paulo silva

 Dim valor As String = TextBox2.Text
        valor = valor.Remove(valor.Length - 2, 1)

        MsgBox(valor)

podes fazer qualquer coisa do genero

Cumprimentos Paulo Silva

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
paulo silva

 Dim valor As String = TextBox2.Text
        Dim valor1 As String = TextBox2.Text


        valor = valor.Remove(valor.Length - 2, 2)
        valor1 = valor1.Substring(valor.Length, 2)


        MsgBox(valor1, MsgBoxStyle.Critical, "Ultimos")

        MsgBox(valor, MsgBoxStyle.Critical, "primeiros")

Nesta consegues obter os primeiros numeros e os dois últimos.

Penso que era mais ou menos isto.

Cumprimentos Paulo Silva

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Patrijosa

valeu

problema resolvido...

Public Class Form1

    Private Sub txt1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txt1.KeyPress
        If e.KeyChar = Chr(13) Then
            Dim valor As String = txt1.Text
            Dim valor1 As String
            Dim valor2 As String

            valor1 = valor.Remove(valor.Length - 2, 2)
            valor2 = valor.Substring(valor.Length - 2, 2)

            txt2.Text = valor1
            txt3.Text = valor2
        End If
    End Sub

Cumps

PS


O verdadeiro sábio é um eterno aprendiz!

http://www.patriciodossantos.net

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.