升二星散分，兼征代码！解决方法

升二星散分，兼征代码！
注意：这个帖子是“基础类”的技术帖，请其它版主不要再把它移到别的版块！！！
终于升二星了！升颗星不容易啊！

鉴于.net Framework是目前的一大方向，特开始写一些仿.net的实用类模块，有兴趣的也可回复补充一下自己封装的类成员等，多谢：）

File.cls

VB code

'---------------------------------------------------' 模块      : File' 时间      : 2010-7-10 07:20' 作者      : 杨过.网狐.cn 等' 功能      : 使用近似.net Framework中System.IO名称空间中File类成员设计的方式设计VB6版的File类' 备注      :'---------------------------------------------------Option ExplicitPrivate Declare Function GetFileAttributesAPI Lib "kernel32" Alias "GetFileAttributesW" (ByVal lpFileName As Long) As LongPrivate Function GetFileAttributes(ByVal lpFileName As String) As Long    GetFileAttributes = GetFileAttributesAPI(StrPtr(lpFileName))End FunctionPublic Sub Delete(ByVal path As String)    Dim blnResult As Boolean        blnResult = DeleteFile(path)    If (Not blnResult) Then        Err.Raise GetLastError    End IfEnd SubPublic Function Exists(path As String) As Boolean    Exists = (GetFileAttributes(path) <> &HFFFFFFFF)    End FunctionPublic Function GetAttributes(ByVal path As String) As Long ' FileAttributes    GetAttributes = GetFileAttributes(path)End Function

代码最近更新于2010-7-12

[解决办法]
不会 帮顶
[解决办法]
果断接分
[解决办法]
恭喜升星
[解决办法]
恭喜楼主！
[解决办法]
路过，道喜
[解决办法]
帮楼主顶。
[解决办法]
边看世界杯，边接分！
[解决办法]
恭喜...
[解决办法]
果断接分
[解决办法]
这是个什么
[解决办法]
恭喜恭喜
[解决办法]
^_^
[解决办法]
恭喜楼主！
[解决办法]
恭喜楼主！
[解决办法]
恭喜恭喜啊 接分~
[解决办法]
congratulations to you！
[解决办法]
接分，路过.........................
[解决办法]
好久没来了,顶个先 :) 老杨同志还奋斗在第一线哈:)
[解决办法]
恭喜LZ！
刷分！
[解决办法]
恭喜

不过不支持lz这么做。VB是很低端的用户群。

不要看着五星大酒店气派，就在贫民街区也想开一家。
[解决办法]
恭喜楼主啊, 顺便接分
[解决办法]

另外，12楼的头像太销魂了。
[解决办法]
升两星不容易，升三星更不容易，提前恭喜楼主升三星，记得多给点分哈：）
[解决办法]

[解决办法]
恭喜
接分
[解决办法]
恭喜恭喜 ！哈哈 接分来了！
[解决办法]
恭喜恭喜。。。恭喜恭喜。。。恭喜恭喜。。。
[解决办法]
恭喜升星
[解决办法]
恭喜楼主，贺喜楼主。
[解决办法]
恭喜楼主!
[解决办法]
恭喜，恭喜。。。。
[解决办法]
还在3个三角前徘徊的人接分
[解决办法]
恭喜、恭喜、恭喜你呀，恭喜、恭喜、恭喜你！
[解决办法]
恭喜，恭喜
[解决办法]
楼主：多谢！
[解决办法]
支持
[解决办法]
恭喜 楼主啊！
 JF！
[解决办法]
技术分吗？

蹭
[解决办法]
友情接分!
[解决办法]
恭喜楼主……

[解决办法]
恭喜楼主撒！顺手接分
[解决办法]

[解决办法]
接点分！
[解决办法]
恭喜。
[解决办法]
jffff
[解决办法]
恭喜恭喜
[解决办法]
恭喜恭喜!
[解决办法]
我也要分
[解决办法]
升星一直是我的梦想，呵呵
[解决办法]
恭喜，继续升吧
[解决办法]
恭喜恭喜了！
[解决办法]
等待接分
[解决办法]
恭喜楼分，顺便接分，提升人气
[解决办法]
受益匪浅，接分！
[解决办法]
? !
[解决办法]
恭喜升级
接分为了更有条件问问题
------解决方案--------------------

看看自己几星了
[解决办法]
不会 帮顶
[解决办法]
不会帮顶，路过
[解决办法]
恭喜楼主！
[解决办法]
帮顶。
[解决办法]
这个真不会
  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) 

http://feiyun0112.cnblogs.com/
[解决办法]
这个真不会
[解决办法]
这个真不会
[解决办法]
恭喜LZ！

[解决办法]
vb版那个超级楼高的神帖哪去了？
[解决办法]
恭喜LZ！
[解决办法]

探讨

vb版那个超级楼高的神帖哪去了？

[解决办法]
接分。。。。
[解决办法]
恭喜！~~接分~~~~
[解决办法]
接分!!
[解决办法]
再顶贴。
[解决办法]
不厚道的接分
[解决办法]
我为分狂！(*^__^*) 嘻嘻……
O(∩_∩)O谢谢
[解决办法]
恭喜发财,我来接分
[解决办法]

[解决办法]

[解决办法]
来接分滴。。。嘻嘻
[解决办法]
来接分啊~~~~
[解决办法]
吃碗面条相对叉子我还是喜欢用筷子；
编小程序相对VB.NET我还是喜欢用VB6.
[解决办法]

[解决办法]
恭喜一下！
[解决办法]
100
翻页

查看更多 下一篇