征求和字符串相关的经典或常用算法,该怎么处理
征求和字符串相关的经典或常用算法
鄙人要考二级，想请各位帮忙。呵呵，如果指点的老大们比较多，偶再开一贴，表示谢意。
算法一：字符串中，去掉空格-> 定义一个空的数组,对字符串从第一个字符一直循环 到最后最后一位(for i = 1 to len(s))
有无代码均可
.....
.....
.....
.....
谢谢
------解决方案--------------------
看不太懂要求，是必须用数组吗？
“字符串中，去掉空格”，如果单纯要实现这个要求，可以用Replace函数
str=replace(str, " ", " ")
------解决方案--------------------
字符串数组用这个吧
dim strArray() as string
strArray=split( "你的字符串 ",space(1))
然后数组中的元素就全部是没有空格的了你可以使用for循环来进行连接，不过使用replace更简单些
------解决方案--------------------
字符串替换
字符串查找
字符串截取
字符串合并
....
------解决方案--------------------
莫名其妙的问题，没头没尾。。。
不过看你给100分，不很懂你的问题，还是回答你吧。
Private Function GetString(ByVal sString As String, ByVal sSign As String) As String
Dim aTempArray() As String
Dim iCount As Long
GetString=VBNullString
aTempArray() = Split(sString, sSign)
For iCount = 0 To UBound(aTempArray)
If Len(aTempArray(iCount)) Then GetString= GetString & aTempArray(iCount)
Next iCount
End Function
调用：
Private Sub Form_Load()
Debug.Print GetString( " Spider Man 不过看你给 100分，不很懂你的问题， 还是回答你吧。 ", " ")
End Sub
当然最简单的还是用Replace，不过你要求用数组。呵呵。
------解决方案--------------------
KMP算法，相当于Instr，不过二级应该不考。。。
------解决方案--------------------
原来楼主不是求答案，是要题目，呵呵
二级没考过，不知道要求什么难度
统计一篇英文文章每个单词出现的次数，按频率排序输出算不算二级难度？
我考3级B的时候做过这道题。
------解决方案--------------------
就像围棋的定式一样
===================
这个比喻，对于像我这样不懂围棋的人来说太难理解了
:)
------解决方案--------------------
模式匹配算法
------解决方案--------------------
1000万个字符串排序 算不算~
------解决方案--------------------
用VB基本函数解析html，不知这个达到二级的难度没有
鄙人要考二级，想请各位帮忙。呵呵，如果指点的老大们比较多，偶再开一贴，表示谢意。
算法一：字符串中，去掉空格-> 定义一个空的数组,对字符串从第一个字符一直循环 到最后最后一位(for i = 1 to len(s))
有无代码均可
.....
.....
.....
.....
谢谢
------解决方案--------------------
看不太懂要求，是必须用数组吗？
“字符串中，去掉空格”，如果单纯要实现这个要求，可以用Replace函数
str=replace(str, " ", " ")
------解决方案--------------------
字符串数组用这个吧
dim strArray() as string
strArray=split( "你的字符串 ",space(1))
然后数组中的元素就全部是没有空格的了你可以使用for循环来进行连接，不过使用replace更简单些
------解决方案--------------------
字符串替换
字符串查找
字符串截取
字符串合并
....
------解决方案--------------------
莫名其妙的问题，没头没尾。。。
不过看你给100分，不很懂你的问题，还是回答你吧。
Private Function GetString(ByVal sString As String, ByVal sSign As String) As String
Dim aTempArray() As String
Dim iCount As Long
GetString=VBNullString
aTempArray() = Split(sString, sSign)
For iCount = 0 To UBound(aTempArray)
If Len(aTempArray(iCount)) Then GetString= GetString & aTempArray(iCount)
Next iCount
End Function
调用：
Private Sub Form_Load()
Debug.Print GetString( " Spider Man 不过看你给 100分，不很懂你的问题， 还是回答你吧。 ", " ")
End Sub
当然最简单的还是用Replace，不过你要求用数组。呵呵。
------解决方案--------------------
KMP算法，相当于Instr，不过二级应该不考。。。
------解决方案--------------------
原来楼主不是求答案，是要题目，呵呵
二级没考过，不知道要求什么难度
统计一篇英文文章每个单词出现的次数，按频率排序输出算不算二级难度？
我考3级B的时候做过这道题。
------解决方案--------------------
就像围棋的定式一样
===================
这个比喻，对于像我这样不懂围棋的人来说太难理解了
:)
------解决方案--------------------
模式匹配算法
------解决方案--------------------
1000万个字符串排序 算不算~
------解决方案--------------------
用VB基本函数解析html，不知这个达到二级的难度没有