用API修改注册表的完整模块

日期：2008年5月6日作者：查看:[大字体中字体小字体]

        ReDim ValueType(CountValue - 1) As Long             ' 重新定义数组, 使用数组大小与注册表关键字的子键数量匹配
        For i = 0 To CountValue - 1
            ValueName(i) = Space(255)
            l = 255
            RegEnumValue hKey, i, ByVal ValueName(i), l, 0, ValueType(i), ByVal 0&, ByVal 0&
            ValueName(i) = Left(ValueName(i), l)
        Next i

        ' 下面的二重循环对字符串数组进行冒泡排序
        For i = 0 To UBound(ValueName)
            For j = i + 1 To UBound(ValueName)
                If ValueName(i) > ValueName(j) Then
                    s = ValueName(i)
                    ValueName(i) = ValueName(j)
                    ValueName(j) = s
                End If
            Next j
        Next i
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] [21] 下一页
用API修改注册表的完整模块相关文章：
·Web2.0在中国步入歧途缺赢利模式VC有错
·Flash与Photoshop合作制作模糊渐变动画
·CSS模块化设计——从空格谈起
·用AutoCAD五分钟内完成三维足球建模
·完全防御DDoS攻击的实时监测模型
·3DsMAX三维建模U盘造型
·BPEL模型基础
·AutoCAD滚珠轴承建模全过程
·Javascript的一种模块模式
·进入Cisco路由器配置模式
用API修改注册表的完整模块相关软件
·公司企业网站管理系统模板功能强大版
·服装专卖店网站模板免费版
·NDS《旋转滚球》模拟器
·行会2之维京霸主－模拟方式免CD补丁
·医院大亨－模拟方式免CD补丁
·NDS《神奇四侠2 银影侠》模拟器
·NDS模拟器NO$GBA 2.4b
·CPS3街机模拟器
·NDS《新彩虹岛中文汉化版》模拟器
·CPS3《红色地球》模拟器

上一篇:提高Visual Basic访问数据库效率

下一篇:大数阶乘的计算（二）

特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

用API修改注册表的完整模块

精品推荐

热点TOP10

特别推荐