Problema com código de um Simulador

[Leudassdf 5]

Boas Pessoal!

Tenho o seguinte problema, tenho o meu form completo ja com codigo e tudo, mas na text do codigo(desconto) tenho um bug. tenho o seguinte codigo:

    Private Sub txt_CodButon_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txt_CodButon.TextChanged
        Select Case UCase(txt_CodButon.Text)
            Case "A"
                lbl_TotalaPagar.Text = lbl_Totalres.Text - 5
            Case "B"
                lbl_TotalaPagar.Text = lbl_Totalres.Text - 10
            Case "C"
                lbl_TotalaPagar.Text = lbl_Totalres.Text - 25
            Case Else
                If txt_CodButon.Text <> "" Then
                    MsgBox("O codigo é Invalido", MsgBoxStyle.Exclamation)
                End If
                lbl_TotalaPagar.Text = lbl_Totalres.Text
        End Select
    End Sub

O que eu quero que ele faça é que se nao introduzir nenhum codigo ele  eapresente lbl_totalaPagar sem o desconto.como posso fazer isso?

[Andrepereira9 4]

Não percebi qual é o teu problema!

Ele está a fazer o que pretendes. Se meteres "A", ele desconta 5, se meteres "B" desconta 10, ... Se meteres por exemplo "I", apresenta a mensagem de código inválido.

Se não meteres nada, ele apresenta o valor total sem desconto.

[Leudassdf 5]

obrigada pela tua resposta.

mas infelizmente se nao colocar nada ele nao apresenta valor nenhum.

mas se colocar um espaço nessa text ja apresenta, e tambem apresenta a mensagem de codigo invalido.

mas para ter logica ele se nao tivesse nada nesse campo deveria mostrar o valor total.

[bioshock 176]

Não será apenas problema de lógica? Troca o teu sinal <>(diferente) por =(igual).

[Leudassdf 5]

Não será apenas problema de lógica? Troca o teu sinal <>(diferente) por =(igual).

nao. nao funciona mesmo assim

[bioshock 176]

Então não percebi o que queres.