Question

vb中if keyascii=0 then command1.value=1 是什么意思?

全过程是这样的:
private sub command1.click()
static num as integer
if text1.text<>"123456" then
num=num+1
if num=3 then
msgbox"口令无效,请与管理员联系!",16,"校对口令"
end
end if
msgbox"口令错误,请重新输入!",64,"校对口令"
text1.selstart=0
text1.sellength=len(text1.text)
text1.seltext=""
text1.setfocus
else
load mainfrm
mainfrm.show
unload fom1
end if
end sub
private subcommand2.click()
end
end sub
private sub text_keypress(keyascii as integer)
if keyascii=0 then
command1.value=1
end if
end sub
在这段程序中,大部分都能理解,但是就最后这一小段,觉得没起什么作用呢,删了它,依旧能够运行啊?请教高手?

Answer 1

如果你按下键盘上的 0 ,command1的值就等于1, 不知道你的command1表示的是什么~

KeyAscii是键盘输入后传递给程序的ASCII码，关于ASCII码，各种电脑书籍一般都有附录，网络上搜索也很多。

常规ASCII码是0～127，一般可以显示的是32～127

Answer 2

Command1在代码里看应该是一个按钮,
那么它的Value属性应该是这个按钮是否会被激活,
1表示激活状态,也就是True
0相反,表示Flase
你把它删了运行看不出区别,是因为你的代码里之前并没有使它变成false的语句.