![](https://cos-cdn.shuashuati.com/pipixue-wap/2020-1230-1107-56/ti_inject-812ce.png)
设在窗体上有一个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Intcger) Const Alt=4 Const Key_f2=&H71 altdown%=(Shift And Alt) > 0 f2down% And f2down% Then If altdown% And f2down% Then Text ='abl' End If Ead Sub 程序运行后,清除文本框中原有内容,如果按Shift+F2键,则在文本框中显示的是