在窗体上有一个文本框Textl,Text属性值为空,然后编写下列事件过程: Private Sub Textl KeyPress(KeyAscii As Integer) Dim str As String,n As Integer str=UCa

admin2012-12-08  30

问题 在窗体上有一个文本框Textl,Text属性值为空,然后编写下列事件过程:
Private Sub Textl KeyPress(KeyAscii As Integer)
Dim str As String,n As Integer
    str=UCase(Chr(KeyAscii))
    n=Len(str)
    Textl.Text=String(n,str)
End Sub
程序运行后,若在文本框中输入单字母“P”,则在文本框Textl中显示的内容为(     )。

选项 A、oo
B、oP
C、PP
D、Po

答案B

解析
转载请注明原文地址:https://jikaoti.com/ti/rLO0FFFM
0

最新回复(0)