Question

VB:关于KeyAscii = 13的问题

下面这段代码是什么意思？好多地方都出现过KeyAscii = 13 这是什么意思？
If KeyAscii = 13 Then

For i = 0 To Combo1.ListCount - 1

If Combo1.Text = Combo1.List(i) Then

Label1.Caption = "已经存在该项"

Exit For

End If

Next

Label1.Caption = "已经成功添加项目"

Combo1.AddItem Combo1.Text

End If

Answer 1

在combo中输入文本，按下回车键（keyascii=13）将输入的文本添加到combo的list中。同时验证输入的文本是否已经存在于combo的list中，如果存在的话则label1上出现已经存在该项目的提示并且不执行添加操作，不存在的话就提示“已经成功添加该项目”并将输入的内容添加，这段代码应该在combo1_keypress中吧

Answer 2

应该把过程的的名称一起复制过来
if keyascii=13 then
单看这句的话，就是如果变量keyascii的值等于13的时候。
如果要是放在 _ONKEYPRESS事件中，就表示判断是否按的是回车（ENTER）键，那么if keyascii=13 then
就表示如果按下的是回车键 就执行下面的代码

For i = 0 To Combo1.ListCount - 1
If Combo1.Text = Combo1.List(i) Then
Label1.Caption = "已经存在该项"
Exit For
End If
Next

Label1.Caption = "已经成功添加项目"
Combo1.AddItem Combo1.Text

大概的意思是，查找combo1的列表中是否已经有了combo1中输入的内容，如果有就不要添加了，如果没有就把combo1.text添加到combo1.list中

Answer 3

这个是判断最后一个输入的是否为回车，如果是则执行相应内容。

keyascii 是最后一个输入的键值，一般放在KeyPress事件中