COMO SO LER A PARTE DO NUMERARIO EM UM STRING

PROGRAMADORVB6 17/05/2011 07:19:21
#374109
Olá bom dia.
Estou com um problema em só ler a parte de numerário neste 
Dim Meu_string=[Ô]?f-52-p-[Ô]
como o posso fazer existe alguma instrução?
Grato desde já pela vossa atenção.
Atentamente.
Programadorvb6
PEGUDO 17/05/2011 07:53:27
#374115 Resposta escolhida
Aí está:


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) [txt-color=#0000f0]Handles[/txt-color] Button1.Click
    Dim Str As String = [txt-color=#e80000][Ô]?f-52-p-[Ô][/txt-color]
    Dim Retorno As String = [txt-color=#e80000][Ô][Ô][/txt-color]

    For A = 0 [txt-color=#0000f0]To[/txt-color] Str.Count - 1
        [txt-color=#0000f0]Select Case[/txt-color] Str(A)
            [txt-color=#0000f0]Case[/txt-color] Chr(48) [txt-color=#0000f0]To[/txt-color] Chr(57)
                Retorno += Str(A)
        [txt-color=#0000f0]End Select
    Next[/txt-color]

    MsgBox(Retorno)
End Sub
PROGRAMADORVB6 17/05/2011 08:37:14
#374126
Olá colega.
Já deve ter adivinhado para o que é; logo, logo envio a vc já parte adiantada do projecto.
Grato pela sua atenção.
Atentamente.
Programadorvb6
Tópico encerrado , respostas não são mais permitidas
Voltar