Question

请教vb问题：Textl．Text=String(6，KeyAscii) 为什么不是得到:999999,而是得到ccccccc

2、在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Textl_KeyPress(KeyAscii As Integer)
Dim char As String
char=Chr(KeyAscii)
KeyAscii=Asc(LCase(char))
Textl．Text=String(6，KeyAscii)
End Sub
程序运行后，如果在键盘上输入字母“C”，则文本框中显示的内容为___[2]____。
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char As String
char = Chr(KeyAscii)
KeyAscii = Asc(LCase(char))
Text1.Text = String(6, KeyAscii) '文本框显示：ccccccc
Print String(6, KeyAscii) '打印窗体显示：cccccc
End Sub
为什么一6个c，一个7个c？

Answer 1

因为string(6，keyascii)函数的第二个参数是字符型格式(char或者string)，返回,6个字符型格式参数的第一个字母，而keyascii的类型是integer，那么系统会先把它转换为字符型，所以会变成c，你把keyascii重定义为string型就可以返回999999了

Answer 2

Text1.Text = String(6, KeyAscii) 输出了6个，加上你按的1个，不就有7个了吗
Print String(6, KeyAscii) 输出了6个就是6个了