Показать текст, который зависит от числа в TextBox

Я не уверен, что пошло не так здесь:Показать текст, который зависит от числа в TextBox

Dim xapp As Integer = 20000 
Dim xnet As Integer 
Dim ans As String 

xnet = NETPAYTextBox.Text 
ans = AppstatusTextBox.Text 

If (xapp < xnet) Then 
    ans = "Approved" 
Else 
    ans = "Pending" 
End If

Это, предполагают, чтобы показать «Approved», если значение NETPAYTextBox больше, чем 20000 или шоу " в ожидании», если значение NETPAYTextBox ниже, чем 20000.

источник

2016-05-14 Dorine Mae

Где вы пытаетесь показать ответ? – Codexer

Возможно, вы хотите установить значение AppstatusTextBox.Text, не считая из него – Steve

Выполнение этого: 'ans = AppstatusTextBox.Text' _ ** не будет ** _ автоматически изменять текст в TextBox только потому, что вы изменяете' ans' переменная, если вы так считаете. –

Это должно сделать трюк. Это гарантирует, что у вас есть Integer и если так сделать сравнение и установить текст в зависимости от результата ...

Dim xnet As Integer = 0 

    AppstatusTextBox.Text = CStr(If(Integer.TryParse(NETPAYTextBox.Text, xnet) AndAlso 20000 < xnet, "Approved", "Pending"))

источник

2016-05-14 16:42:33 Codexer

По какой-то причине я никогда не думал об использовании метода TryParse с оператором короткого замыкания. Кажется настолько очевидным, что я это вижу. – Lopsided

Вау, спасибо! Это тоже работает! В совершенстве. –

@DorineMae Ваш прием, счастливое кодирование! – Codexer

-5

вы не должны преобразовать текст в целое число, вы сравниваете interger со строкой теперь ....

Сделать NETPAYTextBox numericupdown

источник

2016-05-14 16:38:44 Lectere

Нет, он/она не является. При установке переменной 'xnet' строка неявно (исправьте меня, если я использую неправильный термин здесь), преобразованный в Integer. –

Да, это неверно, базовые настройки vb.net 2015 и вы получаете; Дополнительная информация: Преобразование из строки «sadfasd» в тип «Integer» недопустимо. Но эй, если вы все знаете это лучше, найдите его;) – Lectere

Это потому, что в нем есть буквы! Если вы просто вводите цифры, не превышающие 2147483647, у вас не будет проблем (пока параметр Strict не выключен). Попробуй. –

Есть код, как этот

Dim xapp As Integer = 20000 
Dim xnet As Integer 
Dim ans As String 


If (xapp < xnet) Then 
    ans = "Approved" 
Else 
    ans = "Pending" 
End If 

NETPAYTextBox.Text = xnet.toString 
AppstatusTextBox.Text = ans

Вы хотите установить значение ans Перед тем, как отобразить его.

Выполнение этого

xnet = NETPAYTextBox.Text

Вы устанавливаете xnet равным текст NETPAYTextBox

Но делая

NETPAYTextBox.text = xnet.to string

Вас установка текста в текстовом поле на равные xnet.

источник

2016-05-14 17:26:29 Eddie

Показать текст, который зависит от числа в TextBox

ответ

Смежные вопросы