13问答网 > 按键精灵粘贴板怎么提取纯数比如；a123456a啊a。我复制粘贴后变成123456

按键精灵粘贴板怎么提取纯数比如；a123456a啊a。我复制粘贴后变成123456

2025-04-05 04:06:14

推荐回答（1个）

回答1：

a = Plugin.Sys.GetCLB()
Do
b = Plugin.Sys.GetCLB()
//TracePrint a
//TracePrint b
If a <> b Then
c =提取字符串中的数字(b)
TracePrint c
Plugin.Sys.SetCLB c
a = c
b = c

End If

Delay 100

Loop

Function 提取字符串中的数字(字符串)
Dim 数字
数字=""
For i = 1 To len(字符串)
If Asc(mid(字符串, i, 1)) >= 47 and Asc(mid(字符串, i, 1)) <= 57 Then
数字=数字&mid(字符串, i, 1)
End If
Next
提取字符串中的数字=数字
End Function

按键精灵粘贴板怎么提取纯数 比如；a123456a啊a。我复制 粘贴后变成123456

按键精灵粘贴板怎么提取纯数比如；a123456a啊a。我复制粘贴后变成123456