API版本的TrimNull函数
2004-12-03 00:26
169 查看
很有用的API版本的TrimNull函数:
Private Declare Function lstrlenW Lib "kernel32" (ByVal lpString As Long) As Long
Private Function TrimNull(startstr As String) As String
TrimNull = Left(startstr, lstrlenW(StrPtr(startstr)))
End Function
Private Declare Function lstrlenW Lib "kernel32" (ByVal lpString As Long) As Long
Private Function TrimNull(startstr As String) As String
TrimNull = Left(startstr, lstrlenW(StrPtr(startstr)))
End Function
相关文章推荐
- API版本的TrimNull函数
- IoC模式的类型及其实现
- Solaris 10 的困惑与喜悦
- 中国DNN当前的运作方式
- [导入]Linux内核飞行十二年[转贴]
- 2004-11-30 Sybase EBF 12150: 12.5.3 IR
- 保护卡自动改IP程序实现方法(根据现有保护卡的种种迹象猜的)
- 理解网页中各种不常用的
- 电灯泡杂谈
- property procedures offers a few advantages
- [转载]大学生创业:一个硬件网站站长自述创业经历
- 到神农架看看吧
- HTML文档中小meta的大作用
- 一份不错的性能测试计划模版,可惜是英文的。(转自QACity)
- 好像知道了什么是喝花酒
- 网页制作小技巧
- Community Server 1.0 Beta安装使用记录(二)
- SQL注入天书—ASP注入漏洞全接触
- 当今中国最经典的25句话
- 闰年