vb编程问题求助

来源：百度知道 编辑：UC知道 时间：2024/05/16 11:05:34
用vb编写
1建立一个允许剪切、复制和粘贴的简单便笺程序。能对输入字符进行转换
转换规则1.让大小写字母互换2.空格不转换3.其余转换成“*”4.要求每输入一个字符，马上就能进行判断和转换
大家快帮忙呀我急用谢了

在窗体上建立 3个按钮 一个文本控件

private sub form_load()'窗体加载
command1.caption = "剪切"
command2.captian ="复制"
command3.caption ="粘贴"
text1=""
end sub

private sub command1_click()'剪切
clipboard.clear
clipboard.settext text1.seltext
text1 =""
end sub

private sub command2_click()'复制
clipboard.clear
clipboard.settext text1.seltext
end sub

private sub command3_click()'粘贴
text1 = clipboard.gettext
text1.setfocus
end sub

'大小写字母互相转换 输入字符检查
private sub text1_keypress (keyascii as integer)
if keyascii < 65 and keyascii > 122 then
keyascii = 42'检查输入不在范围内 输出"*"
else
lcase text1'将所有字母转换转换为大写字母
end if
end sub

'删除空格,即空格不输出在text文本中
private sub text1_change()
trim(text1)'删除空格
end sub