vb.net发送退格键 vb退格代码

请教，vb里如何输出一个退格键

如果是在你的程序内发送按键用 sendkeys，测试代码：

Text1.SetFocus

Text1.SelStart = Len(Text2.Text)

SendKeys "{backspace}"

如果是向其他软件窗口发送就复杂些，你要先用 FindWindow()获取窗口句柄，然后发送消息 SendMessage()，以上都是API函数，具体可以百度

相关问答

Q1: vb.net 退格键功能怎么实现？

left函数不能直接用的，如果要用得这样：microsoft.VisualBasic.Left()

mid函数可以直接用

另外还可以这样写：TextBox.Text.Substring（）

（）内容根据studio提示操作即可

Q2: VB中SendKeys与退格键backspace怎么联用？

SendKeys "{BKSP}" 即可。

见以下例程：

Private Sub Text1_Change()

'非数字校验~~~~~~~~~~~~~~~~~~

If IsNumeric(Text1.Text) = False And Text1.Text "" Then

MsgBox "请输入数字！", 48, "错误提示"

SendKeys "{BKSP}" ’两个联用

End If

End Sub

Q3: vb.net实现backspace

下面的代码可以实现只能输入数字、小数点和退格键。

Private

Sub

TextBox1_KeyPress(ByVal

sender

As

Object,

ByVal

e

As

System.Windows.Forms.KeyPressEventArgs)

Handles

TextBox1.KeyPress

If

Char.IsDigit(e.KeyChar)

Or

e.KeyChar

=

Chr(Keys.Back)

Or

e.KeyChar

=

"."

Then

e.Handled

=

False

Else

e.Handled

=

True

End

If

End

Sub

Q4: VB 如何实现向句柄发送按一次回车键？

VB向句柄发送回车键vb.net发送退格键：

rivate Function SendClick(hwnd As Long, mX As Long, mY As Long)

    '发送点击消息

    Dim I As Long

     

    I = PostMessage(hwnd, WM_LBUTTONDOWN, 0, (mX And HFFFF) + (mY And HFFFF) * H10000)

    I = PostMessage(hwnd, WM_LBUTTONUP, 0, (mX And HFFFF) + (mY And HFFFF) * H10000)

End Function

Q5: 如何用VB制作按键精灵F1~F12

F1－F12的keyCode分别为112-123 用VBS的Sendkeys方法

set WshShell = CreateObject("WScript.Shell")

WshShell.SendKeys "{F1}"

WshShell.SendKeys "{F2}"

WshShell.SendKeys "{F3}"

WshShell.SendKeys "{F4}"

WshShell.SendKeys "{F5}"

WshShell.SendKeys "{F6}"

WshShell.SendKeys "{F7}"

WshShell.SendKeys "{F8}"

WshShell.SendKeys "{F9}"

WshShell.SendKeys "{F10}"

WshShell.SendKeys "{F11}"

WshShell.SendKeys "{F12}"

SendKeys 方法

请参阅

WshShell 对象 | Run 方法

将一个或多个键击发送到活动窗口（仿佛是在键盘上击键一样）。

object.SendKeys(string)

参数

object

WshShell 对象。

string

表示要发送的键击（一个或多个）的字符串值。

说明

使用 SendKeys 方法可以将键击发送到无自动化界面的应用程序中。多数键盘字符都可用一个键击表示。某些键盘字符由多个键击组合而成（例如，CTRL+SHIFT+HOME）。要发送单个键盘字符，请将字符本身作为 string 参数发送。例如，要发送字母 x，则请发送 string 参数 "x"。

注意 要发送空格，则请发送字符串 " "。

可使用 SendKeys 同时发送多个键击。为此，可将每个键击按顺序排列在一起，以此来创建表示一系列键击的复合字符串参数。例如，要发送键击 a、b 和 c，则需要发送字符串参数 "abc"。SendKeys 方法将某些字符用作字符的修饰符（而不使用其本身的含义）。这组特殊的字符可包括圆括号、中括号、大括号，以及：

加号 "+"、

插入记号 "^"、

百分号 "%"、

和“非”符号 "~"。

用大括号 "{}" 括起这些字符可以发送它们。例如，要发送加号，请使用字符串参数 "{+}"。SendKeys中使用的中括号 "[ ]" 无任何特殊含义，但是必须把它们括在大括号中，以便容纳确实要赋予其特殊含义的应用程序（例如，对于动态数据交换 (DDE) 就是这样）。

要发送左中括号字符，请发送字符串参数 "{[]"；要发送右中括号字符，请发送字符串参数 "{]}"。

要发送左大括号字符，请发送字符串参数 "{{}"；要发送右大括号字符，请发送字符串参数 "{}}"。

某些键击不生成字符（如 ENTER 和 TAB）。某些键击表示操作（如 BACKSPACE 和 BREAK）。要发送这些类型的键击，请发送下表中列出的参数：

键 参数

退格键 {BACKSPACE}、{BS} 或 {BKSP}

BREAK {BREAK}

CAPS LOCK {CAPSLOCK}

DEL 或 DELETE {DELETE} 或 {DEL}

向下键 {DOWN}

END {END}

ENTER {ENTER} 或 ~

ESC {ESC}

HELP {HELP}

HOME {HOME}

INS 或 INSERT {INSERT} 或 {INS}

向左键 {LEFT}

NUM LOCK {NUMLOCK}

PAGE DOWN {PGDN}

PAGE UP {PGUP}

PRINT SCREEN {PRTSC}

向右键 {RIGHT}

SCROLL LOCK {SCROLLLOCK}

TAB {TAB}

向上键 {UP}

F1 {F1}

F2 {F2}

F3 {F3}

F4 {F4}

F5 {F5}

F6 {F6}

F7 {F7}

F8 {F8}

F9 {F9}

F10 {F10}

F11 {F11}

F12 {F12}

F13 {F13}

F14 {F14}

F15 {F15}

F16 {F16}

要发送由常规键击和 SHIFT、CTRL 或 ALT 组合而成的键盘字符，请创建表示该键击组合的复合字符串参数。可通过在常规键击之前添加一个或多个以下特殊字符来完成上述操作：

键 特殊字符

SHIFT +

CTRL ^

ALT %

注意 这样使用时，不用大括号括起这些特殊字符。

要指定在按下多个其他键时，按下 SHIFT、CTRL 和 ALT 的组合，请创建复合字符串参数，用括号括起其中的组合键。例如，要发送的组合键指定：

如果在按 e 和 c 的同时按 SHIFT 键，则发送字符串参数 "+(ec)"。

如果在按 e 时只按 c（而不按 SHIFT），则发送字符串参数 "+ec"。

可使用 SendKeys 方法发送一种在一行内重复按键的键击。为此，要创建复合字符串参数，以指定要重复的键击，并在其后指定重复次数。可使用 {键击 数字} 形式的复合字符串参数来完成上述操作。例如，如果要发送 10 次 "x"，则需要发送字符串参数 "{x 10}"。请确保在键击和数字之间有一个空格。

注意 只可以发送重复按一个键的键击。例如，可以发送 10 次 "x"，但不可发送 10 次 "Ctrl+x"。

注意 不能向应用程序发送 PRINT SCREEN 键 {PRTSC}。

示例

下面的示例演示如何将一个 .wsf 文件用于以不同脚本语言（VBScript 和 Jscript）写成的两个作业。每个作业都运行 Windows 计算器并将它发送给键击以执行简单的计算。

package

job id="vbs"

script language="VBScript"

set WshShell = WScript.CreateObject("WScript.Shell")

WshShell.Run "calc"

WScript.Sleep 100

WshShell.AppActivate "Calculator"

WScript.Sleep 100

WshShell.SendKeys "1{+}"

WScript.Sleep 500

WshShell.SendKeys "2"

WScript.Sleep 500

WshShell.SendKeys "~"

WScript.Sleep 500

WshShell.SendKeys "*3"

WScript.Sleep 500

WshShell.SendKeys "~"

WScript.Sleep 2500

/script

/job

job id="js"

script language="JScript"

var WshShell = WScript.CreateObject("WScript.Shell");

WshShell.Run("calc");

WScript.Sleep(100);

WshShell.AppActivate("Calculator");

WScript.Sleep(100);

WshShell.SendKeys ("1{+}");

WScript.Sleep(500);

WshShell.SendKeys("2");

WScript.Sleep(500);

WshShell.SendKeys("~");

WScript.Sleep(500);

WshShell.SendKeys("*3");

WScript.Sleep(500);

WshShell.SendKeys("~");

WScript.Sleep(2500);

/script

/job

/package

关于vb.net发送退格键和vb退格代码的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。