private sub text1_key press (key ascii as integer)
end sub
在过程体加入代码
private sub test1_key press (keyascii as integer)
dim aa as string*1
aa = chr$ (keyascii) ’将ascii码转换为字符
select case aa
case “a” to “z” ’大写转换成小写aa=chr$(key ascii+32)
case “a” to “z” ’小写转换成大aa=chr$(key ascii-32)
case “ ” ’空格不转换
case else ’其他转换成*
aa= “*”
end select
’将转换文本框已有的内容与刚输入并转换的字符连接
text2.text=text2.text & aa
end sub
2.当单击“清屏”按钮时,清除两个文本框的所有内容,就要对命令按钮对象command1对应的click事件编程。
private sub command1_click()
text1.text= “”
text2.text= “”
end sub
3.当单击“结束”命令按钮时,程序运行结束,这要对command2对应的click事件编程。
private sub command 2_ click ()
end
end sub
四、保存和运行程序
1.保存工程
2.程序的运行
在vb中,程序可以以两种模式运行,即编译运行模式和解释运行模式。
(1)编译运行模式
选择“文件”菜单的“生成……exe”命令后,系统读取程序中全部代码,将其转换为机器码,并在扩展名为.exe的可执行文件中,供以后多次运行。
(2)解释运行模式
选择“运行”菜单的“启动”命令(或f5),直接运行。由于转换后的机器代码不保存,如需再次运行程序,必须再解释一次,因此运行速度比编译运行模式慢。在开发阶段为了便于程序的调试,一般使用此模式。作者: FJTGUNDAM 时间: 2007-5-12 23:23
看下1234567作者: hesong005 时间: 2007-5-13 12:56
急需要这些论文作者: bewill 时间: 2007-5-13 15:09
adawdadaw作者: aqw 时间: 2007-5-13 23:30
作者: aqw 时间: 2007-5-13 23:41
1213123123作者: chun0111bo 时间: 2007-5-15 12:32
提高天天他他他他他他他他他他他作者: chun0111bo 时间: 2007-5-15 12:33
能看不啊]怎么恢复了也什么也看不到啊作者: yj 时间: 2007-5-15 21:44
what is it i want to seee作者: shyjs 时间: 2007-5-16 23:59