如何删除字符串间字符 本帖最后由 day2008 于 2009-08-12 10:32:43 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Sub Form_Initialize() S = "456454|asdasdas." & _"asd12321312" & _vbCrLf & _"asdasd123"l = InStr(S, "|")l1 = InStr(S, vbCrLf)S1 = Mid(S, l, l1 - l)S = Replace(S, S1, vbCrLf & vbCrLf)Debug.Print SEnd Sub VB记事本程序中如何快速定位光标所在的行与列? 0x01或0x02分别代表什么数值 请教各位:哪儿能找到关于做microsoft expression web designer插件的资料? 高手请进 写入注册表失败:字符串自动截断了。哪位大虾帮忙解决 想控制text的输入为数字 這段代碼為什么有錯(將sql中的表導入到access中) 请帮帮忙吧! 高分求:如何在WIN98中进入被屏蔽的C盘!!!!!!大家帮帮我呀!!!! 怎样突破数组下标的限制? 如何删除字符串间字符 MSDN里一段让人很汗的文字:关于抓BUG的的
S = "456454|asdasdas." & _
"asd12321312" & _
vbCrLf & _
"asdasd123"
l = InStr(S, "|")
l1 = InStr(S, vbCrLf)
S1 = Mid(S, l, l1 - l)
S = Replace(S, S1, vbCrLf & vbCrLf)
Debug.Print S
End Sub