chr和ord转化字母大小写

~ 您想问的是不是chr和ord怎么转化字母大小写？方法如下：
1、小写转大写：使用ord()函数取得字符的ASCII值。若该值在97-122之间（对应小写字母a-z），则该字符为小写字母。将该ASCII值减去32，得到该字符对应的大写字母的ASCII值。使用chr()函数将该ASCII值转换为对应的大写字母。
2、小写转大写：使用ord()函数取得字符的ASCII值。若该值在97-122之间（对应小写字母a-z），则该字符为小写字母。将该ASCII值减去32，得到该字符对应的大写字母的ASCII值。使用chr()函数将该ASCII值转换为对应的大写字母。

---

范县13918817177： 在free pascal里,怎么将小写字母转化成大写字母 - ？
云哪重组： var c:char; begin read(c); writeln(chr(ord(c) - ord('a') + ord('a'))); end.

范县13918817177： PASCAL中大小写转化 - ？
云哪重组： 1.大写转小写 lowercase 函数 (一般人我不告诉他!!!! 秘诀哦 ^_^) 例:ch:=lowercase(ch) 也可利用 ch:=chr(ord(ch)+32) (利用ASCII码关系) 2.小写转大写 upcase 函数 (大家都知道) 例:ch:=upcase(ch) 也可利用 ch:=chr(ord(ch)-32) (利用ASCII码关系)

范县13918817177： 编程题不会做,帮帮忙？
云哪重组： program shift; var ch:char; delta:integer; begin delta:=ord('A')-ord('a'); {计算大小写的ascii码差值} while true do begin read(ch); {读入小写字符} write(chr(ord(ch)+delta)); {输出相应的大写字符} end; end.

范县13918817177： 编程时,大小写怎样快速切换? - ？
云哪重组： 可以按Caps Lock键或直接按shift+字母就是大写的了.....

范县13918817177： vb编程 字母大小写转换 - ？
云哪重组： 不能使用Ucase和Lcase函数,你可以将字母字符转化成为数值,小写字母的值域是97-122,大写字母是65-90,用Chr()和Asc()这两个函数也可以实现大小写的转化的. Private Sub Form_Click() x = Text1.Text n = Len(Trim(x)) For i = 1 To nl = Mid(x, i, 1)If l > ＂h＂ Thenl = Chr(Asc(l) - 32)Text2.Text = Text2.Text & lEnd If Next i End Sub

范县13918817177： 从键盘输入3个大写英文字母,把它们转换成小写字母后输出.谢谢! - ？
云哪重组： 用什么语言???要具体的代码吗?利用ASCII码不同来互相转换!小写字母的ASCII码比大些字母的ASCII大32.利用Chr() 函数可以获取字母的ASCII值.代码中让Chr(大写字母)+32=Chr(小写字母).输入的字母设为字符串形式再循环遍历一下就能读.具体就是这样,要代码给我留言.zhxihu2008@yahoo.com.cn 平时一定要多编写才能熟练,我现在之所以写文字告诉你就是希望你多写代码

范县13918817177： Pascal 在编程中怎么切换大小写?？
云哪重组： 1、按“shift+字母” 或按caps lock后直接输入 2、如果你问的是通过程序把小写换大写可以用这个语句: char1{你要换的字母}:=chr(ord('A')-ord('a')+ord(char1));

范县13918817177： 请问如何用键盘把输入的一串大写字母直接变成小写字母(删除重来的就不用说了,还有我要的是不论在那个... - ？
云哪重组： 把下面的函数做成DLL文件,其他的程序都可以调用.function CT(ss: String): String; var i,ct: Integer; c: byte; begin Result := ''; ct := Length(ss); if ct > 0 then begin for i := 1 to ct do begin c := Ord(ss[i]); if (c >=65) and (cRsult := Result + Chr(c + 32); end else begin Rsult := Result + Chr(c); end; end; end; end;

范县13918817177： 任意输入一个字母,将其转换为大写字母再输出!不管输入的是大写还是小写 - ？
云哪重组： program asd; var a,b:char; begin readln(a); if (ord(a)>96)and(ord(a)b:=chr(ord(a)-32) else writeln('NO'); if (ord(a)>64) and (ord(a)b:=a else writeln('NO'); writeln(b); end.

范县13918817177： 用c语言完成:判断大小写并互相转换 - ？
云哪重组： #include<stdio.h> #include<conio.h> void main() { char chr; while(1) { chr=getch(); if((chr>='a')&&(chr<='z')) printf(＂%c\n＂,chr-('a'-'A')); else if((chr>='A')&&(chr<='Z')) printf(＂%c\n＂,chr+('a'-'A')); else printf(＂%c\n＂,chr); } getch(); }