Question

vb text 光标通过命令按钮做上下移动的程序怎么编写哇？求大神指导

这是我要做的开发面板，要图上那4个方向控制文本框里的光标移动，左右已经搞定了，就是上下总是想不出来。。

Answer 1

Private Sub Command1_Click() '上
Text1.SetFocus
SendKeys "{Up}"
End Sub
Private Sub Command2_Click() '下
Text1.SetFocus
SendKeys "{Down}"
End Sub
Private Sub Command3_Click() '左
Text1.SetFocus
SendKeys "{Left}"
End Sub
Private Sub Command4_Click() '右
Text1.SetFocus
SendKeys "{Right}"
End Sub

Answer 2

Private Sub Command1_Click()
Text1.SetFocus
SendKeys "{DOWN}"

End Sub

Private Sub Command2_Click()
Text1.SetFocus
SendKeys "{UP}"

End Sub

Private Sub Form_Load()
Text1.Text = "adfa" & vbCrLf & "adfadffff" & vbCrLf & "aklllllll"

End Sub

Answer 3

可以向文本框发送按键消息