余思培的个人资料

度娘日常饿了刚刚的帖子...... 嗯......度娘饿了，吞了

关于内存映射文件操作的一个问题我在学习内存映射文件的时候，从CreateFile到MapViewOfFile能够成功，从UnMapViewOfFile 到 CloseHandle能成功，but......怎么进行内存操作的时候......就不会了，请问一下各位大佬，怎么进行内存操作？

二维征服汉化解锁(包含直装版和obb版) 前段时间(有很久了吧)，我曾经发帖给大家演示了怎么融合破解版与汉化版使之成为汉化破解版，but......由于网上下载的各版本不一样，以及Java学习的也不太精通，所以......效果并不太理想。后来又过了一段时间，我找到了obb验证的地方，but......我不知道怎么去破解他，所以也就不了了之了。再后来，我找到了其obbMD5加密算法，并根据其算法简单做了一个工具，使之可以获得与其游戏获取相同的一段验证码，but......我太懒了，所以也就到此为止了。 And今天，实在没有游戏玩了，也忍受不了obb一体之加载之慢，网上下载的其他汉化解锁版运行闪退，又不想加群(觉得一丢丢麻烦)，于是乎...... obb分离的一个包就完成了，然后有遇到网上下载的汉化解锁不可用的，又恰好找到贴吧的同志，你可以选择下载此版本(虽然我也不敢保证其没有问题。)

最近想尝试写一个武将，但写到某个技能时，发现某一个语句始终无法正常执行，所以想请教一下贴吧大佬们，怎样才能执行到如图A处？

准备写的一个小工具，其中一个功能是显示图片，此部分我利用新的窗体来实现但每次关闭显示图片的窗体后，原窗体都会被置为最底层，请问有什么方法解决吗？ //部分代码及运测如下图 //ps:运测的图片是我以前写的一个工具的截图，是图片。

请问一下，通过BitBlt复制位图到窗体DC，为什么要在au 请问一下，通过BitBlt复制位图到窗体DC，为什么要在autoredraw=true的前提下，我尝试在autoredraw=false的情况下复制位图到窗体DC，并尝试使用refresh刷新但无法显示成功。请问一下稍微深一点的原因是什么？或者有什么方法可以在autoredraw=false的情况下显示出来。

VB吧是又被广告盯上了吗？今天又看见几个同一类无意义隐晦低俗 VB吧是又被广告盯上了吗？今天又看见几个同一类无意义隐晦低俗回复贴。前一段时间出现过一阵，后面没了，现在又出现了吗？

测试性压缩工具最近几天，忍住贪玩的心，把一直想弄得压缩工具终于写出来了(虽然还有几个重大错误bug没有解决) 恩......虽然还没有修复完bug，虽然还没有没有写好注释，但兴奋的心忍不住现在先分享一波(现在分享的仍有重大bug)

出于调试的需要以及闲的无聊的现状，写了一个输出调试的小工具。小工具把常用的数组输出整合了一下，写了一个指令解析模块，然后输出则是以行(hang)为单位即时输出（对于某些贼耗时间的输出，即时输出虽然耗时更久，但至少能看到进度） //另附一个数组常见操作的整合模块，以及用于充当临时测试的则是一个之前写的桶排序模块

关于浮点数的几点问题我做了一个整合数组相关模组用于后续新的应关于浮点数的几点问题我做了一个整合数组相关模组用于后续新的应用算法实现时可以便捷测试。在做这个功能模块的时候，我采用了用命令的方式来测试这个整合模块，但这中间产生了一个问题，我想要浮点数数组添加一个新成员时（我设计的命令为NewV = [Value]，value为一个值），我如何判断新成员的范围是否在浮点数的范围以内，以单精度浮点数为例，他的范围约为[-3.4*10^38,-1.5*10^-45]∪[1.5*10^-45,3.4*10^38]，但由于精度原因，是不是可以直接省略中间部分（两个范围以内，VB会收束为0），是不是直接判断[-3.4*10^38,3.4*10^38]就可以了。另，对于这种级别的数，判断的时候使用if判断比较好还是错误陷阱捕获比较好。另,错误陷阱的布设是否需要专门的语句来表示错误处理结束归纳起来，想要问的问题有3个： 1.对赋值浮点数前，是用其值域判断是否超出范围，还是使用错误陷阱捕获超出范围情况 2.如果使用值域判断，是否可以省略掉两个超高精度小数边界 3.如果使用错误陷阱捕获，在错误处理结束后是否需要专门的语句用以结束错误处理

问一个mod制作的问题我想创建一个传承角色的mod，并且想给问一个mod制作的问题我想创建一个传承角色的mod，并且想给该角色指定一个动作模型，但是该模型是汉家江湖扩展包里面的模型，我查默认的表里面查不到那个模型ID怎么办？

出了！！！

我在实际操作中遇到一种这样的问题：■问题我有一个数组A，我需我在实际操作中遇到一种这样的问题： ■问题我有一个数组A，我需要对数组A的元素进行排序，但排序结束后我能以排序后的结果对原数组A的映射关系进行操作。 ●表达原数组隐射关系为：原下标→目标元素排序后隐射关系为：现顺序→目标元素要求建立映射关系或为：原下标→现顺序→目标元素现顺序→原下标→目标元素 □例：存在有限无序数列(数组)U，但其元素的值得范围为[0，n] 数组A对数列U中每一个出现的元素进行统计，数组A有元素n+1个然后对数组A进行排序排完序之后能够找到统计总数顺序第几的数是哪一个，总共有多少个本例中，原下标为某数目标元素为U中某数的出现次数现顺序数量为排序后的最终顺序即要求为：通过【最终顺序】找到【某数】，并知道其【出现次数】 ■请教内容这一类排序我不知道叫什么，我姑且称之为指向性排序，即不破坏原有映射指向关系的排序，并且也在选择排序的基础上写了一个这个暂被我称之为指向性排序的算法我想请教一下大佬这类问题一般怎么解决？我写出来的这个暂时性处理的算法可以怎样去修改和完善？ //代码运测见2楼

请教一下，斐波那契数列用递归计算还是用通项式计算好一点？请教一下，斐波那契数列用递归计算还是用通项式计算好一点？

请教一个在TextBox的换行的问题。Chr(10) & C 请教一个在TextBox的换行的问题。 Chr(10) & Chr(13) 与 vbCrLf有什么区别，或内在内在，或外在？ //ps：我以前也没有注意到这个问题，直到我测试时遇到了问题。(图片贴楼下)

仿桶排序思想的内部排序都知道桶排序是个外部排序，但由于刚接触排序算法不久，就想着自己按照看过的排序思想来写一个排序算法。算法早已完成，并已在逻辑上和Java编译器上验证过了。最近返校，然后开始把这个算法用VB实现。（镇楼图为运行效果）

数组传递复制问题请教返校后，我将之前写的桶排的代码实际运行，结果发现了很多问题，其中，最麻烦的一个问题就是数组复制传递问题。例如 Dim intS() As Integer Dim intT() As Integer intS = intT 这个过程中记得没错应该是传址但由于我需要建立的数组需要灵活度所以我建立了新的数组 Dim intR() As Variant Dim intS() As Integer ReDim intR(n) As Variant 'n为一个整型 For i = 0 to n intR(i) = intS Next 并在后面进行数组内部数组的长度的的改变，以期达到灵活的目的，但事实上根据前面发现intR里面的每一个元素都使用的是intS，所以根本达不到目的。询问问题 1.怎样使intR里面每一元素不一样，使之各元素之间相对独立 2.数组的传值问题 -①函数传值可不可以定义一个变体，然后将变体与数组之间在进行传址或传值以期达到传递数组(传值)或者达到函数返回数组 -②数组之间复制传值只有通过遍历数组和API来完成吗？目前主要是以上两个问题，并且我在百度的时候看到的搜索结果不是很明白，所以来贴吧求问。

今天返校，终于可以实操了，so很多之前没注意的问题会逐渐暴露今天返校，终于可以实操了，so很多之前没注意的问题会逐渐暴露，so我会开始各种提问，预告知，请见谅，本帖今晚删。

#排序算法#非经典选择排序与桶排序前段时间接触Java，然后开始把我二月份没有验证的几个排序算法转为Java验证后再翻译为VB语言，顺便谈一点我自认为的想法的经验，以及对我自己所尝试写的这几种排序的看法。 (镇楼图为Java的演示效果)

问个问题，我写了个Android的小工具，某个方法代码只有二问个问题，我写了个Android的小工具，某个方法代码只有二十行左右，但编译打包后，看了看反编译后对应方法的smali语言有上百行，并且其中有很多反复赋值的无意义语句。类比VB，怎样才能让VB写的代码在实际编译后，内部的无意义操作减少？

#排序算法#排序算法的VB语言实现最近因为需要对数据进行排序，所以算法这块发的贴可能有点多了(算上本帖已经3贴了)，本来的目的是希望得到大佬们的指点与提示错误，但发现好像兴致都不太高，所以就集中到此帖当中，并给予后来者以参考。此帖中算法不是算法的标准实现，故可能不太容易看出其本来的算法实质。出于交流考虑，本帖中采取中文变量名(PS：VB6是可以以中文作为变量名的，虽然不常用。) //镇楼图为桶排序//

#算法#一种无实际意义的求均值算法本算法用于求一组数据的均值(例程中为模糊均值，误差范围为(-n,0],n为数据总量) 由于一般求均值都是数据总量直接除所有数据相加，且本算法相较于此很复杂故实际意义不大，效率也比较低，此处拿出来仅供参考，有兴趣的可以探讨一下此算法背后的思路。

【算法表达】一种排序算法的分类、纠错与完善#排序算法# 作为一名业余的VB爱好者，我学习VB并不是完全按照资料书上的顺序来安排学习的，而是任务导向型，即预设一个任务，然后逐渐学习通过完成既定任务的过程中所需要的知识和技巧，再加上在上大学之前我一直没有充裕的时间来学习VB，所以到现在我才开始接触排序算法。回归正题，当我需要排序算法时，我最先想到的是冒泡排序法，但我又想挑战一下，所以我结合了所查找到的一些常见的排序的基本思路，我写出了此算法的程序表达。（由于回家没带电脑，所以没有试运行。）所以希望大佬们能看看此算法表达属于那种算法或其变种，有什么逻辑错误或表达错误，还有什么地方值得改进。(使用中文变量名是因为更方便于交流时的算法理解)

Visual Basic 6如何判断目标路径为文件还是文件夹如题，VB6的Dir函数可以判断出路径是否正确，但我不知道怎么才能判断目标路径是文件还是文件夹。 //ps:做的一个小程序，其中文件检查的代码如下，但运行时发现如果是路径输入为文件夹地址，则会发生实时错误53。（小程序目的是操作文件） //ps:自学VB没太久，很多都不知道，网上找不到答案才到贴吧来问。 //ps:额外问题：ActiveX EXE怎么注册，生成的程序只要移动位置就又不能创建对象怎么解决。大佬们救救我吧！

三桅战船的进击😂

II代凶残的野蛮人之前有人说这一个版本的野蛮人多么多么厉害，我没在意，因为我一般不习惯开野蛮人，而且晋升系统的缘故，我也一般只将其作为练兵的杂牌兵，直到今天......

World of Empires II