VB text 文本转大小写和还原

如题所述

Ucase函数和Lcase函数

Ucase("字符串") :将字符串中所有小写字母转换成大写,最终字符串全部是大写字母。

Lcase("字符串"):将字符串中所有大写字母转换成小写,最终字符串全部是小写字母。 注意:因为你有还原功能,转换前要把原先的字符串给保存起来。例:先定义变量Private Sub Form_Load()
dim savetextEnd Sub 转大写:在大写有按钮单击事件中插入代码if savetext="" then savetext=text1.textend iftext1.text=Ucase(text1.text)转小写:在小写有按钮单击事件中插入代码if savetext="" then savetext=text1.textend iftext1.text=Lcase(text1.text) 还原:在还原有按钮单击事件中插入代码text1.text=savetextsavetext=""
温馨提示:答案为网友推荐,仅供参考
相似回答