模拟数字键盘

[zqy1975]

有两个TEXT，用模拟数字键盘输入（0-9），当那个TEXT获得焦点是，就输入模拟键盘值。用VB.NET怎么写一个程序，谢谢

[TTisme]

真巧，我也在做一个类似的界面，搭铁问一下有没有什么属性可以让某控件一直保持焦点或让其它的控件不得到焦点？？？

[TTisme]

像windows带的屏幕键盘，它就可以让你在点击它时，焦点保持在别的窗体上，如何做到？

[兔子-顾问]

模拟键盘是你做的还是用系统的？

[zqy1975]

键盘是自己做的

[zqy1975]

WinForm程序

[兔子-顾问]

在TextBox失去焦点的时候，记录下是哪个Textbox，然后你每次模拟按键的按钮点击都先吧对应的textbox设置焦点，然后执行SendKeys.Send(...)

[zqy1975]

能不能给一段代码，我很菜啊，比如，textbox1,textbox2,模拟键盘用BUTTON0至BUTTON9程序怎么写谢谢

[newxdlysk]

Dim i As Integer
Private Sub TextBox1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.GotFocus
     i=1
End Sub
Private Sub TextBox2_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox2.GotFocus
     i=2
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If i = 1 Then
            TextBox1.AppendText("1")
        ElseIf i =2 Then
            TextBox2.AppendText("1")
        End If
End Sub

[wuyq11]

SendKeys.SendWait("111");
如计算器IntPtr hwndCalc = FindWindow ( null, "计算器" ); //查找计算器的句柄

[zqy1975]

怎么没人高手站出来

[Nichol888]

学习中。。。

[zqy1975]

高手啊高手