VB中 Replace 函数
VB中 Replace 函数
描述
返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。
语法
Replace(expression, find, replacewith[, compare[, count[, start]]])
Replace 函数的语法有以下参数：
参数 描述
expression 必选。字符串表达式，包含要替换的子字符串。
find 必选。被搜索的子字符串。
replacewith 必选。用于替换的子字符串。
start 可选。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。
count 可选。执行子字符串替换的数目。如果省略，默认值为 -1，表示进行所有可能的替换。
compare 可选。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。
设置
compare 参数可以有以下值：
常数 值 描述
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文本比较。
vbDatabaseCompare 2 执行基于数据库（在此数据库中执行比较）中包含的信息的比较。
返回值
Replace 返回以下值：
如果 Replace 返回
expression 为零长度 零长度字符串 ("")。
expression 为 Null 错误。
find 为零长度 expression 的副本。
replacewith 为零长度 expression 的副本，其中删除了所有由 find 参数指定的内容。
start > Len(expression) 零长度字符串。
count 为 0 expression 的副本。
说明
Replace 函数的返回值是经过替换（从由 start 指定的位置开始到 expression 字符串的结尾）后的字符串，而不是原始字符串从开始至结尾的副本。
相关文档：
Private Function Utf8ToUni(B() As Byte) As String
'不使用 API，将 Utf8 转换为 Unicode
Dim BU As Long
On Error Resume Next
BU = -1: BU = UBound(B)
If BU = -1 Then Exit Function
On Error GoTo 0
&n ......
接着外挂教程 VB 从零开始编外挂
需要VBAPI函数：
FindWindow←寻找窗口列表中第一个符合指定条件的顶级窗口
GetWindowThreadProcessId←获取与指定窗口关联在一起的一个进程和线程标识符
--------------------------------------------------------------------------------------------------------------- ......
这里是 利用replace 函数 在vb中实现 消除空行的一个程序
这里的容器是richtext
可以扩充到其他容器 和其他字符 用于编写查找替换功能
'--------------------------------------------------------------------------------------------
' 消除空行 , 利用instr函数, 搜索文本里的vbcrlf(回车 + 换行), 两个回车替换 ......
在C语言中，escape的符号很好用，
比如
"中国一定强"
这个字串可以写成：
"\x4E2D\x56FD\x4E00\x5B9A\x5F3A"
用字元编码编写程序，在其他不同语言的windows运作时，比较不会有问题。
（我尽量不想在程序中写入中文）
但是vb如果全部要用字元编码写的话，就会很麻烦而且一个一个都要手写成：
ChrW(&H4E2D) ......
最近在利用vb编写关于百度空间验证码自动识别的程序，但是一直没能实现，原因就是我的水平还是太菜。于是从网上寻找了很多关于验证码识别的源代码，从里面学到不少东西，算是没白努力吧。在此总结一下学到的东西，希望能对朋友们有些帮助吧。
首先整理下编写验证码识别的思路吧：
1 ......
