谁知道这个VB程序哪错了

你这样的问题让大家猜的好辛苦啊，应该是指键码吧？是指按A键的时候让Form2.Visible = True吗？如果是的话，楼上的朋友们都已经说了，你也可以这样：

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
'// A 键
Case vbKeyA
Form2.Visible = True

End Select
End Sub

另外，要想使窗体第一个接收键盘事件，必需将窗体的 KeyPreview 设置为 True，这样才能确保正常的接收键盘事件。

a 是变量，你要用 'a' 字符

a 是变量，你也没有定义啊！

用if 语句也行
if keycode='a' then
form2.visible = true
end if

我总觉得更多的时候用if语句比用select case 容易些。

你的意思 是想按A的时候让form2可见是吧。。。
那你应该用ascii码。。。
case a 改成 case ascii(65)

case 65
或
case asc("A")