作者Y78 (Y78)
看板Visual_Basic
标题Re: [VB6 ] VB新手问题~ 有关 Keypress 跟 Enter P …
时间Tue Jan 27 22:00:35 2009
不知道是不是你要的 我个人觉得是不太像啦
光是从Enter事件里改显示隐藏就够奇怪了
刚刚研究了一下 发现Enter事件会在Textbox.focus的时候触发
所以把keypress改成这样
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Chr(13) Then
e.Handled = True
TextBox2.Visible = True
TextBox2.Focus()
End If
End Sub
Textbox2.Focus() 就会触发Textbox2.text的enter事件
而textbox2的enter里面写这样
Private Sub TextBox2_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox2.Enter
'代表有人执行TextBox2.Focus()
TextBox2.Visible = True
TextBox1.Visible = False
Label1.Text = "Now Please entry here"
End Sub End If
textbox1的部份也照做
但是这样 好像就不太符合要在enter里面改显示隐藏了(我在keypress先改了
仅供参考 不确定正确
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 122.116.162.36
1F：推 shirleylam:真感谢你阿!!! 原来 Enter 可以用 Focus来触发 XD~~ 01/28 00:59
2F：→ shirleylam:应该是正确了吧.. 很感谢你的帮助!!! Y78大新年快乐^^ 01/28 01:01
3F：→ Y78:新年快乐~ 01/28 01:56