مقدار دادن به یک char

[Mahdi-v]

درود خدمت اساتید محترم

میخواستم بدونم چه طور میشه به حروف a تا z توی برنامم مقدار 1 تا 26 رو بدم

یک ورودی (تکست باکس یک ) از کاربر یک حرف انگلیسی ( از a تا z ) بگیرم
و برنامه مقداری که به اون حرف دادم رو سه تا اضافه کنه و حرف متناظر با مقدار جدید رو توی تکست باکس دو چاپ کنه

مثال :
من به برنامه حرف d رو میدم :
d دارای مقدار 4 هست برنامه سه تا بهش اضافه کنه میشه 7 و مقدار هفت مربوط به حرف g هست در نهایت توی تکست باکس دو g رو تایپ کنه


من واقعا ممنونتون میشم این رو جواب بدید

[gilsoft]

سلام دوست عزیز

اینم جواب شما:
Label1.Text = Asc(TextBox1.Text.Trim.ToLower) - 96
یا
Label1.Text = Asc(TextBox1.Text.Trim.ToUpper) - 64
و در نهایت:
Label1.Text = Chr(Asc(TextBox1.Text.Trim.ToLower) + 3)
موفق باشید ....