chr和ord是一对字符函数，你能利用它，将一个大写字母转换成小写字母。假设这个大写字母的变量名为
Private Sub Text1_KeyPress(KeyAscii As Integer)If Chr(KeyAscii) = UCase(Chr(KeyAscii)) Then KeyAscii = Asc(LCase(Chr(KeyAscii)))Else KeyAscii = Asc(UCase(Chr(KeyAscii)))End IfEnd Sub以上代码涉及控件：Text1
利用ascii进行判断，
Private Sub Text1_Change()
Text2.Text = ""
For i = 1 To Len(Text1.Text)
zf = Mid(Text1.Text, i, 1)
If Asc(zf) >= 65 And Asc(zf) <= 90 Then Text2.Text = Text2.Text + Chr(Asc(zf) + 32)
If Asc(zf) >= 97 And Asc(zf) <= 121 Then Text2.Text = Text2.Text + Chr(Asc(zf) - 32)
If Asc(zf) = 32 Then Text2.Text = Text2.Text & " "
If Asc(zf) >= 33 And Asc(zf) = 91 And Asc(zf) = 133 Then Text2.Text = Text2.Text + "+"
Next
End Sub
通过ascii判断字符是大写、小写还是其它。已经实验成功
如果答案对您有帮助，真诚希望您的采纳和好评哦！！
祝：学习进步哦！！
*^_^* *^_^*
UV,IR,NMR,MS,FAB-MS,HR-MS,CD,ORD在药物化学中的中文意思
紫外UV,红外IR,核磁共振NMR,质谱MS,快原子轰击质谱FAB-MS,HR-MS高分辨率质谱,CD 圆二色谱，ORD旋光色散 找本分析化学，看目录就行
ce是什么航空
航空公司名称(英文): Polar Air Cargo 航空公司名称(中文): 极地货运航空公司 所属国家: 美国 两字代码: PO 机队情况: 6架 主要基地(机场三字代码):约翰肯尼迪国际机场(JFK),芝加哥奥黑尔机场(ORD) 总部城市: 纽约 DE是什么航空 航空公司代码: DE航空公司 航空公司简称: 康多尔航空公司 MS是什么航空 埃及航...
我7月6号坐UA836去休斯顿,到芝加哥转机,芝加哥到休斯顿的不知道是什...
Arrive Houston (IAH) 11:20 pm Tue 6-Jul 飞行时间: 20hr 25mn 航班 ：UNITED 836\/703 Connect in Chicago (ORD)在芝加哥转机。航班号是 UA703 这是Expedia上的信息，应该是准确的。
上海飞美国,在芝加哥机场转机,只有1个半小时的时间,能行吗?
应该就是United 的柜台。行李交运，要排队，可能10几分钟（在香港把行李挂到Moline，这样行李上就贴有到Moline的条子，可能快些），再过安检，队伍一定长，算30分钟吧。再走到Moline登机口。（记得Terminal 1 面对柜台，航厦最右手端 有一个安检口，人少，因为大家都不知道那儿有一个，交行李时，问问...
公司考勤时间怎么计算?
从你上班到你下班的时间合计就是你的上班时间啊。如果采用了考勤机，考勤计算就比较方便了。按照合同约定出过正常休假和法定假日放假就是你的实际出勤天数，每个月的满勤就是自然月天数减去法定假日及公休。
电路图中的常用字母代表什么意思
从前一个或选择的标注的第二尺寸界线处连续标注 DCO或DIMCONT 建立圆和圆弧的直径标注 DDI或 DIMDIA 编辑标注 DED或DIMED 建立线性尺寸标注 DLI或DIMLIN 建立座标点标注 DOR或DIMORD 替换标注系统变数 DOV或DIMOVER 建立圆和圆弧的半径尺寸标注 DRA或DIMRAD 在命令列建立和修改标注样式 DST或DIMSTY 移动和旋转标注...
帝国时代2中文正式版有哪些兵种
帝国时代之所以能成为一款成功的RTS,除了画面精美以外,兵种之间的相生相克,也是很大的成功的原因之一,帝国时代2除了继承了1代的精美画工以外,兵种之间的相互克制也被强化了,例如骑兵对骆驼兵处于完全的下风,然而如果用骆驼兵攻击步兵,简直是惨不忍睹。总之,只有能熟练掌握各兵种的优缺点,才能在实战中灵活运用,百战不殆...
第11届全国少年信息学奥林匹克联赛初赛试题
Dec(nChr[Ord(mmin) - Ord('a')]); Inc(nChr[Ord(Str[i - 1]) - Ord('a')]); Write(mmin); For i:=0 To 25 Do For j:=1 To nChr Do Write(Chr(i + Ord('a'))); WriteLn; End. 输入:zzyzcccbbbaaa 输出: 四.完善程序(前4空,每空2分,后5空,每空4分,共28分) ===PASCAL...
求翻译下这
这一切得从15年前说起。一个名叫 paul hansord 的园艺主管在去美国的一趟路途中了解到番茄、土豆交叉种植的技术，而且因为很近的血缘关系，把两者嫁接在一起没有问题。最困扰他的是当产品被研制出来之后如何营销的问题。如何种出茎秆粗细相同的土豆和番茄植株让它们顺利“对接”也是个问题。经过一次次...
分区是什么意思Oracle
二、分区类型本文使用的表为oracle用户hr下的job_history,创建分区使用的表名均为hr_job_history。 job_history表数据为：范围分区：范围分区将数据基于指定的范围映射到不同分区，创建表时可以创建同时可以创建分区，当范围变大或想让范围变得更小时，可以添加分区。（1）根据某个字段值（或者maxvalue）...
颜趴氨酚： 将ASCLL码值转换为字符 示例: ord('a')表示a在ASSCLL码中的序号,为97; ord('b')表示b在ASSCLL码中的序号,为98; 懂不? 另外 chr是 ord 的互逆函数 也就是说 chr(97)=a ASCLL码不知道的话,去网上搜一下就可以了!
乐亭县19568208246： pascal语言中的ORD 和CHR函数有什么区别 - ？
颜趴氨酚： Chr(x) 求编号x对应的字符.例:Chr(65)='A' chr(97)='a' chr(48)='0' Ord(x) 求字符x对应的编号.例:ord('A')=65 ord('a')=97 另外:ord(false)=0 ord(true)=1 Ord本身可以用来从任何有序类型里面取出序号
乐亭县19568208246： python,怎么让ord和chr转换的是一句话,而不是一个字母 - ？
颜趴氨酚： 你可以用一下map方法,它的作用就是扩展单参数方法的处理能力,使你可以一次性送入一系列待操作参数,自动反复执行单参数方法.另外,看起来你是要处理大量字符的问题,有一个模块叫作struct,对你来说更加有用、高效.
乐亭县19568208246： chr和ord在Free Pascal 里是什么意思? - ？
颜趴氨酚： Chr(N)取序号N所对应的ASCⅡ码的字符 比如Chr(48)就是0 Ord(C)就是取字符C所对应的ASCⅡ码的序号 如Ord('0')=48;
乐亭县19568208246： php的ord与chr函数疑问 - ？
颜趴氨酚： 楼主你错了, php并不是采用什么编码的问题, 而是你要输出的编码问题你把php写成u8/gb2312它都可以正常使用, 区别在于, 在chr里得到的是什么, chr虽然可以返回一个编码大于127的字符, 但是这并不意味着php可以正常解析u8/gb...
乐亭县19568208246： PASCAL里ASCII码和字符串转换的函数是? - ？
颜趴氨酚： ord(字符) 取ascii码 返回整型 chr(数字) 取该ascii的字符 返回字符 pred() 前导 返回对应数据类型 succ() 后继 返回对应数据类型 sqr() 平方 返回整型/实型 sqrt() 算术平方根 返回实型 以上函数均返回一个值,可以直接输出或赋值给相应数据类型的变量.输出平方就是writeln(sqr(a));平方和……应该是几个平方相加吧……
