Checkbox to retrieve

Question

0.00/5 (No votes)

See more:

In my database i have some fields which is already filled with Yes or No like. A field Medical is filled with value "Yes" or "No" at the back end in data base while on the form there are some fields with check boxes like a check box against the medical label and if it is checked means medical allowance is granted to that particular person else not, now i want to show the data on the form with the help of that check box if it is yes in data base how i check the check box of the form.
while i am using such codes.

What I have tried:

if Rs("Medical").Value = "Yes" Or "yes" Then
CheckBox1.Checked = True
Else
CheckBox1.Checked = False
End If

Posted 2-Jan-17 0:28am

Saadbinata

Updated 2-Jan-17 1:45am

Add a Solution

Comments

Michael_Davies 2-Jan-17 6:46am

Pretty sure that Checkbox.Checked accepts "Yes" as true and "No" as false so you can directly assign the value:

CheckBox1.Checked = Rs("Medical").Value

Saadbinata 2-Jan-17 7:11am

If Rs("Medical").Value = "yes" Then
CheckBox1.Checked = Rs("Medical").Value
Else
CheckBox1.Checked = False
End If

by using such format it didn't show any error but it also didn't showing in checkbox checked. nothing happening.

Peter Leow 2-Jan-17 6:55am

You are not even sure if "Yes" or "yes"? You should find out what the actual values are captured in the database table first.

Saadbinata 2-Jan-17 7:05am

I am using "Yes" or "yes" because in the database some are found in "Yes" form and some are found in "yes" format. means the data entry operator entered in such format. and i am new to vb.net

Dave Kreskowiak 2-Jan-17 11:00am

Apparently you're also new to validation of data. You NEVER put unvalidated data into the database in the format you are now allowing. What if the user entered "YEs"? Your code has already failed.

If the field is only allowed to have a Yes or No value, that maps directly to a boolean value which can only have true or false. You should have processed and mapped that Yes or No to a boolean true/false and stored that instead. I don't know why you're allowing a user to manually type Yes or No when it would have been more appropriate to use a dropdown list.

Saadbinata 3-Jan-17 6:06am

Surely i will do the same but at this time when salary is due i need to make this process easy. Thanks for giving me such a nice suggestion. this is already in my mind to do it with boolean and i should keep the control in hand.

Richard MacCutchan 2-Jan-17 7:00am

Why are you using strings and not boolean types?

Saadbinata 2-Jan-17 7:03am

the database is old and have too many records. please suggest me to resolve this problem

Richard MacCutchan 2-Jan-17 7:09am

What problem? You have not told us what is not working.

Saadbinata 2-Jan-17 7:16am

Michael_Davies suggest me this codeIf Rs("Medical").Value = "yes" Then
CheckBox1.Checked = Rs("Medical").Value
Else
CheckBox1.Checked = False
End If
but is also didn't works means when i retrieve the value of the field in the data base which is "yes" it means when i show it on the data form the check box will checked but it is not checked. with this code no error appears.

Saadbinata 2-Jan-17 7:32am

it showing the error that string is not convertible in boolean casting problem

Ralf Meier 2-Jan-17 7:40am

Try my Solution (like posted by me) - but without any other instructions ...

Saadbinata 2-Jan-17 7:47am

means this one

CheckBox1.Checked = (Rs("Medical").Value.toLower = "yes")

with out if statement. Directly

Ralf Meier 2-Jan-17 7:50am

The try :
CheckBox1.Checked = (Rs("Medical").Value.toString.toLower = "yes")

But my Solution is still working - but I changed it now ...

Saadbinata 2-Jan-17 7:56am

If CheckBox1.Checked = (Rs("Medical").Value.ToString.ToLower = "yes") Then
CheckBox1.Checked = True
Else
CheckBox1.Checked = False
End If

Thanks Sir it will work

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Ralf Meier · Accepted Answer · 2017-01-02T01:14:00

Solution 1

you could also write :

VB

CheckBox1.Checked = (Rs("Medical").Value.toString.toLower = "yes")

Was this your Problem ...?

Posted 2-Jan-17 1:14am

Ralf Meier

Updated 2-Jan-17 1:50am

v2

Comments

Saadbinata 2-Jan-17 7:28am

If Rs("Medical").Value = "yes" Then
CheckBox1.Checked = (Rs("Medical").Value.toLower = "yes")
Else
CheckBox1.Checked = False
End If

Sir, Its also not working,
I need to show the value of the field Medical in database which is yes and i need to show this value as on the check box in checked form.

Saadbinata 2-Jan-17 8:52am

If CheckBox1.Checked = (Rs("Medical").Value.ToString.ToLower = "yes") Then
CheckBox1.Checked = True
Else
CheckBox1.Checked = False
End If

it also showing that checkbox in checked form which values are "no" in database. what will do for that

Saadbinata 2-Jan-17 9:08am

Respected Sir Ralf Meier. Thank you for your response now i set my code like this with you help and it is working properly.

If Rs("Medical").Value.ToString.Trim = "yes" Then
CheckBox1.Checked = True
Else
CheckBox1.Checked = False
End If

Thanks once again.

Ralf Meier 2-Jan-17 9:50am

It is good if it works ... but the code from my Solution must work also - exactly coded like I have written.

Perhaps you take a look on it once more ... and look with the Debugger if something goes wrong and if Yes : what goes wrong. Then we both could pass this error.
But only if you want ;)

Peter Leow · Accepted Answer · 2017-01-02T01:45:00

Instead of

if Rs("Medical").Value = "Yes" Or "yes" Then

it should be

If Rs("Medical").Value = "Yes" Or Rs("Medical").Value = "yes" Then

If possible, you should clean up the database.
Minimally, try to look for that script that is responsible for inserting such vague values and make it right.
Good luck.
+++++[round 2]+++++
Based on your feedback, it is entered by some data entry staff in free text form, then good luck to your, it may turn out to be "YES", " yes", "yes ", ...etc. You got it?
In such cases, you can trim the value and see how it turns out:

Rs("Medical").Value.Trim()

The last resort, in fact, it should be the very first, check the value of Rs("Medical").Value through Visual Basic .NET Debugging[^].