在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,然后编写如下代码: Dim Save All As String Private Sub Commandl_C1iCk() Text1.Text=Left(UCa

admin2013-01-23  51

问题 在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,然后编写如下代码:
Dim Save All As String
   Private Sub Commandl_C1iCk()
     Text1.Text=Left(UCase(SaveAU),4)
   End Sub
   Private Sub Textl_KeyPress(KeyAscii As Intege)
     SaveA11=Save All+Chr(KeyAscii)
   End Sub
   程序

选项

答案ABCD

解析
转载请注明原文地址:https://kaotiyun.com/show/yrhp777K
0

最新回复(0)