vb中的一道题
PrivateSubText1_keypress(keyasciiAsInteger)DimstrAsString,nAsIntegerstr=UCase(Chr(key...
Private Sub Text1_keypress(keyascii As Integer)
Dim str As String, n As Integer
str = UCase(Chr(keyascii))
n = Len(str)
Text1.Text = String(n, str)
End Sub
程序运行后,如果在文本框中n = Len(str)输入字母“p”,则在文本框中显示的内容为?
答案是pP,为什么呢?n = Len(str)是什么意思?又有什么用呢? 展开
Dim str As String, n As Integer
str = UCase(Chr(keyascii))
n = Len(str)
Text1.Text = String(n, str)
End Sub
程序运行后,如果在文本框中n = Len(str)输入字母“p”,则在文本框中显示的内容为?
答案是pP,为什么呢?n = Len(str)是什么意思?又有什么用呢? 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询