フォーム1でエンターキーを押したらフォーム2に移動するといったものを作りたいのですが、どうすればいいのでしょうか?
編集 削除つまりForm1のKeyPressイベントで、KeyAsciiがAsc(vbCr)の時にForm2が表示されればいいんだな?
……さ、後は"(,,゜Д゜) ガンガレ!"
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyenter
jettosetto2.Visible = True
End Select
End Sub
といったコードを書いてみたんですが、うまくいきません。
どう変えればいいのでしょうか?
連レスすいません。そのままコピペしてしまったので・・・
jettosetto2 のところは Form2 です。
vbKeyenterってなんだ!?…きっとvbKeyReturnではないかと(orz
編集 削除ああ本当だ馬鹿なことしてました。
できました。ありがとうございました。