tbzp666的个人资料

请教大神算法思路你有一个迷宫，里面有障碍和非零数字:你可以从任何一个方块开始，在迷宫中行走，最后停在某个方块。每走一步，你只能走进四个相邻的方块(上、下、左、右)中的一个，并且你不能走进障碍物或者走进一个方块超过一次。当你完成时，你可以按照你遇到的顺序写下你遇到的数字，从而得到一个数字。例如，您可以获得数字9784、4832145等。你能得到的最大号码是791452384，如上图所示。你的任务是找到你能得到的最大数字。 [输入格式] 最多有25个测试用例。每次测试从两个整数R和C开始(2<=R，C<=15，R*C<=30)，迷宫的行数和列数。接下来的R行代表迷宫。每行正好包含C个字符(没有前导或尾随空格)，每个字符要么是' # '要么是九个非零数字中的一个。迷宫中至少会有一个无障碍方块(即含有非零数字的方块)。输入被R=C=0的测试用例终止，您不应该处理它。 [输出格式] 对于每个测试用例，在一行中打印出你能找到的最大数字。 1) 这是什么算法？ 2）如何生成一个10×10的矩阵，每个字符是1～9和“#”其中的任意一个，怎么表示 3）如何判断起始点，用随机数么？ 4）是不是从起始点到最大数，找它的完整路径？

请教算法你有一个迷宫，里面有障碍和非零数字:你可以从任何一个方块开始，在迷宫中行走，最后停在某个方块。每走一步，你只能走进四个相邻的方块(上、下、左、右)中的一个，并且你不能走进障碍物或者走进一个方块超过一次。当你完成时，你可以按照你遇到的顺序写下你遇到的数字，从而得到一个数字。例如，您可以获得数字9784、4832145等。你能得到的最大号码是791452384，如上图所示。你的任务是找到你能得到的最大数字。 [输入格式] 最多有25个测试用例。每次测试从两个整数R和C开始(2<=R，C<=15，R*C<=30)，迷宫的行数和列数。接下来的R行代表迷宫。每行正好包含C个字符(没有前导或尾随空格)，每个字符要么是' # '要么是九个非零数字中的一个。迷宫中至少会有一个无障碍方块(即含有非零数字的方块)。输入被R=C=0的测试用例终止，您不应该处理它。 [输出格式] 对于每个测试用例，在一行中打印出你能找到的最大数字。这是什么算法？与图有关？ 1）如何生成一个10×10的矩阵，每个字符是1～9和“#”其中的任意一个，怎么表示 2）起始点从哪里开始，又从什么时候结束

DYSMANTLE蓝眼珠有多少个？每个墓地有一个，几个怪物、但是加上DLC和宠物岛、dlc2、方尖碑，根本不够啊是不是只能作弊呢？

请求编写一个关于文件的程序！编写把任意若干个文本文件合成一个新的文本文件 ①文本文件名是数字+中文而且带有特殊字符 ②文本文件内容是中英文并且带有特殊字符 ③不要改写内容 ④文件是可以任意添加的 ⑤添加方式如图示（⑤这个可以忽略）

求菜谱位置坐标和道具位置坐标更新了添加了哪些新菜谱和道具，不知道位置

如何使得标签竖向显示文字？这个只能显示1列，我的意思是能显示多列，像古代写信一样，一列显示不下，从右向左排（或从左向右排）

form2为什么仍然显示我创建了form1和form2，在form1中编写了代码运行后，当我单击command1后，再单击对话框中取消按钮，为什么form2仍然加载是不是因为show的功能比unload方法强大

有更简便的图形打印算法没有？

在编程中遇到的问题及解决处理（自赏），请勿灌水。记录在编程中遇到问题的解决思路脑子越来越僵化，解决问题没有以前反应那么快，所以把它当做学习编程路的日记记下来。请勿灌水，仅供参考。如果吧友有什么问题，请另发新帖。如果说的有什么不对，请斧正。

被删贴了发布的是个敏感问题，挂一个星期才被删

魔方矩阵，请教！魔方矩阵，也称为魔方方阵或幻方，是一个由整数填充的n×n正方形矩阵，具有以下特点： ①每行数字之和相等：魔方矩阵的每一行数字相加，其和都是一个固定的常数。 ②每列数字之和相等：同样地，魔方矩阵的每一列数字相加的和也是那个固定的常数。 ③两条主对角线数字之和相等：从左上角到右下角的主对角线（主对角线1）和从右上角到左下角的主对角线（主对角线2）上的数字之和也是那个常数。 ④填充数字连续且不重复：对于n阶魔方矩阵，通常使用1到n^2的连续整数填充，并且每个数字只出现一次。 \****************************************************************************************************\ 【遇到的问题】不规定1的初始位置（第一行的中间一列），假定1的初始行和列在任意行任意列，有规律安排其他数么？这个算法与数独有关么

做了一个蝴蝶飞舞的程序，请斧正做了一个蝴蝶飞舞的程序，从左下角飞到右上角，再从右上角飞到左下角，但总感觉别扭，请斧正问题有四： 1）蝴蝶的初始位置设置 2）蝴蝶飞到右上角会消失，得等一会才出现，左下角也是一样如何设置蝴蝶飞到右上角，马上返回，时钟控件的interval设置均为1000 3）使用时钟控件过多，能减少到一个时钟控件么？如果用多层选择结构，那就算了 4）能给两张同一蝴蝶图片，一张合拢，一张张开。多张更好。我找了好久没有找到素材程序见下楼

这个总过不去时间总来不及，老式怀表和勇士服都装备上了，为什么总看着大门关了是不是要用个变速齿轮

请教答案是什么 #include<stdio.h> #include<string.h> int main() { char a[5] = {'H', 'e', 'l', 'l', 'o'}; char b[] = "Hello"; printf("%d\n",strlen(a)); printf("%d\n",strlen(b)); return 0; } 答案有的是5 5，有的是6 5， AI说是 5 6 还有的说是 10 5 请问，按最新标准结果是什么

一个与代码有关的问题将照片中的文字转化为纯文本文字的原理是什么

变量自加自减 i=3 j=(++i)+(++i)+(++i)运行后 j的结果与编译器、计算机的位数有关？ j的结果为18 但编译器运行结果为16

怎么生成一个随机稀疏多项式怎么生成一个随机稀疏多项式比如多项式中的项的系数为p、项的指数为e f(x)=7+3(x,1)+9(x,3)-5(x,7) 要求：（1）多项式的项最多5项，最少3项；（2）指数可以从0到10任意选5（比如0,、1、2、3、4；2、4、5、9、10等等）(3)系数为1时，写成f(x)=7+(x,1)+2(x,3) 我遇到的难题是：指数往往是0,、1、2、3、4，不是机选。

一个简单的问题——怎么调试程序怎么在运行阶段查看变量的变化，已学会用断点和debug.print在立即窗口中查看以下如何去设置，如何查看，这个不懂

vb一些问题格式：for i=初值 to 终值！ step 步长。为什么可以避免误差? 如 For i = 1.05 To 1.95! Step 0.1 Print i Next i而下面这个不行 For i = 1.05! To 1.95! Step 0.1 Print i Next i这个又可以了，但循环次数减少了 For i = 1.05! To 1.95! Step 0.1! Print i Next i

vb怎么调用模块 VB怎么调用类模块、用户控件、属性页?

十个空汽水瓶某商店规定：三个空汽水瓶可以换一瓶汽水。小张手上有十个空汽水瓶，她最多可以换多少瓶汽水喝？”答案是5瓶，方法如下：先用9个空瓶子换3瓶汽水，喝掉3瓶满的，喝完以后4个空瓶子，用3个再换一瓶，喝掉这瓶满的，这时候剩2个空瓶子。然后你让老板先借给你一瓶汽水，喝掉这瓶满的，喝完以后用3个空瓶子换一瓶满的还给老板。如果小张手上有n个空汽水瓶，最多可以换多少瓶汽水喝？输出一行，表示最多可以喝的汽水瓶数。如果一瓶也喝不到，输出0。

【测试】出了一点状况先随便吐槽点什么

如何改变动态数组的下标下界？如果我想用Array函数声明一个数组，a = Array(1, 7, 8, 17, 23, 24, 59, 62, 101) 但又想改变数组的下标下界为1（不想从0 开始），除了用Option base语句、单个赋值和使用a = Array(“”，1, 7, 8, 17, 23, 24, 59, 62, 101)外，还有什么方法？另解:Dim a() ReDim a(1 To 10) b = Array("", 1, 7, 8, 17, 23, 24, 59, 62, 101) For i = 1 To 9 a(i) = b(i) Next 还有其他方法么

求format函数用法资料有些书籍写的不全，求format函数用法完整版,或者地址

怎么读取异地文件如果我想读取同一局域网中另一台电脑中的文件，怎么办？假如我是A电脑，想读取B电脑中的某一excel文件（123.xls），怎么做？能否修改文件

谁能做？

求书名，书名！！！以前看过的一本C语言习题集，很后悔当时没有记下书的名字，只能记下里面的一些题目，网上多能搜得到，只记得书很厚，求书名二楼是其中的一些题目

张某背后的大佬是谁说张XX与川大校长有关根本不可能，最有可能的是张XX所在院系的某位大佬力挺张XX，而川大又离不开该大佬。事实应该是这样的

控件能否在自定义坐标系中设定其height属性和width属性在图片框中建立一个自定义范围，再在图片框中建立一个控件，比如shape 如果设定标签的height属性和width属性比如设定范围:scale（0,150）-（300，0），如何设置shape1的高度为100（在自定义坐标系下）

两个字节的二进制转换原码、反码、补码

这个问题实在不懂，聚类算法听了半天，也没有听懂，网上没有找到实例，请大佬解答，或者清晰的思路选哪种聚类最好

为什么会溢出【题目】一个具有10个元素的一维数组a，下标从1到10，每个数组元素的值是随机函数产生的（150,310）之间的随机整数。请用Visual Basic6.0语言编写一个程序求出最大值和最小值的积，并将结果显示在文本框控件Text1中 Dim i As Integer, a(1 To 10) As Integer Dim Max As Integer, Min As Integer, s As Long Randomize For i = 1 To 10 a(i) = Int(Rnd * 159) + 151 Next Max = a(1): Min = a(1) For i = 1 To 10 If a(i) > Max Then Max = a(i) If a(i) < Min Then Min = a(i) Next s = Max * Min Text1.Text = s 运行程序后，Vb说“”实时错误‘6’：溢出”，为什么

求教，怎么指定输出格式随机生成50个【30,150】之间的整数，在文本框中输出怎么使得数据排列看起来更整齐如下图所示，注意是在文本框中，不是在窗体上输出我用了Tab（）函数，系统提示用法不正确，应该如何做

求助有关几率问题比如对于某个事件，有10%的几率完成事件A，20%的几率完成事件B，30%的几率完成事件C,40%的几率完成事件D，如何写代码

判断excel文件是否关闭

请大佬解释一个突然发现的问题（不是写程序）问题是：当文本框text1的enabled属性设置为False时，我对“字体”、“字号”进行编写代码时正常但对字体颜色编写时，文本框不起作用（不改变颜色）当文本框text1的enabled属性设置为True时，能改变颜色编写代码如下： Rem 选择字体 Private Sub Option1_Click(Index As Integer) Text1.FontName = Option1(Index).Caption End Sub Rem 选择字号 Private Sub Option2_Click(Index As Integer) Text1.FontSize = Option2(Index).Caption End Sub Rem 选择字体颜色 Private Sub Option3_Click(Index As Integer) Select Case Index Case 0 Text1.ForeColor = vbRed Case 1 Text1.ForeColor = vbGreen Case 2 Text1.ForeColor = vbBlue Case 3 Text1.ForeColor = vbYellow End Select End Sub 请大佬们解释为什么？

怎么把vb与excel建立关联？能解决这些问题吗？求助通过建立通用对话框后，还要用到Open语句么？下图中能解决以下问题： 1.打开工作簿，通过列表框列出工作簿中含有每张工作表的名称 2.选择列表框中某张工作表，输入行数和列数，单击“确定”按钮, 在Text1中显示该单元格的内容 3.选择列表框中某张工作表，判断该工作表中（单元格中有内容的）有多少行，多少列。另外，其他问题 1.每张工作表的名称怎么获得 2.抽取工作表中某一行 3.判断工作簿中有多少张工作表，能否通过代码增加新的工作表，保存 4.能否建立一个新的工作簿 5.能否把工作表中数据进行修改，比如修改工作簿的名称、对某列数据进行排序，保存

请教一个打印图形的算法，这个算法怎么写

一个简单问题为什么一个窗体可以调用另一个窗体中的控件对象，而不能调用另一个窗体的通用过程原理是什么？比如创建两个窗体 Form1和Form2 在Form1中创建命令按钮，在其单击事件中书写（1）Call Form2.Command1_Click 或Call Form2.Command1 均为（错误）（2）Form2.Command1.Value = True（正确）在（2）中Command1是作为Form2的属性还是什么？

想做一个程序，请教大佬们给点思路出题程序第一步，选择题类型，有A、B、C、D四个选项，正确选择只有一个，有限定时间（时间用倒计时方式，最好用扫雷格式上的数字符号），正确打√，错误打×（同时给出正确答案），同时计算得分，给定一段时间，自动跳入下一题（我在考虑是否用多个窗体，每个窗体保存一道选择题，这个思路立刻Pass掉，是否考虑从文件中抽取）第二步，在第一步的基础上，同时设置两个人来答题，思路同上面一样

请教一个问题，这个算法题哪里出错了求一个数组元素的和，并求其最大值和最小值 Private Function Sum(b%(), m%, n%) As Integer m = LBound(b): n = LBound(b) For i = LBound(b) To UBound(b) s = s + b(i) If b(i) > m Then m = b(i) If b(i) < n Then n = b(i) Next i Sum = s End Function Private Sub Form_Click() Dim a%(1 To 10), Max%, Min% Randomize For i = 1 To 10 a(i) = Int(Rnd * 89) + 10 Print a(i); Next i Print Print "Sum="; Sum(a(), Max, Min) Print "Max="; Max, "Min="; Min End Sub 最大值没有问题，但为什么最小值都是1？

开发工具？请问各位，你们现在用的是什么开发工具，我用的是Turbo C

请教，输入任意长度的字符串，要求将字符顺序倒置，怎么改？输入任意长度的字符串，要求将字符顺序倒置，例如，将输入的“ABCDEF”变换成 “FEDCBA”。运行时，只能把前半部分顺序颠倒到后半部分，后半部分怎么颠倒到前半部分如；“abcdef” →"abccba" 虽然StrReverse()函数可以实现这个功能，但这个程序怎么改符合要求？

请大佬们帮帮忙？程序中某段代码改改颜色 Select Case score Case Is >= 90 Print "优秀" Case Is >= 80 Print "良好" Case Is >= 70 Print "中等" Case Is >= 60 Print "及格" Case Is >= 0 Print "不及格" Case Else Print "Error!" End Select 请把“Case” 改成红色，其余代码颜色不变，注意是在代码窗口中设置

求助！字符串提取单词在从一个英文短文中提取每个单词，并把单词的首字母大写如短文：Upholding national sovereignty, security and development interests is the paramount principle in the policy. On the basis of this prerequisite, Hong Kong and Macao maintain their capitalist system over the long run and enjoy a high degree of autonomy, he noted. 输出为： Upholding National Sovereignty Security And Development Interests Is The Paramount Principle In The Policy On The Basis Of This Prerequisite Hong Kong And Macao Maintain Their Capitalist System Over The Long Run And Enjoy A High Degree Of Autonomy He Noted

Vb中一个很基础的问题为什么 abs，sgn，int，fix不可以作为一个变量，而sqr，exp，log，sin可以作为一个变量存在呢？它们同样都是内部函数名，为什么会有区别呢

请教矩阵的输出?条件怎么写形成一个N×N的矩阵输出（N可以为奇数，也可以为偶数）

十道任意两位数加减乘除运算，大佬们看看哪里出错了 Private Sub Command1_Click() Dim i%, Score%, a Randomize a = Array("+", "-", "*", "M") For i = 1 To 10 Text1.Text = Int(90 * Rnd) + 10 Text2.Text = Int(90 * Rnd) + 10 Text3.Text = InputBox("第" & i & "题结果是：", "请输入结果", 0, 6000, 3000) Label1.Caption = a(Int(Rnd * 4)) Select Case Label1.Caption Case "+" If val(Text3.Text) = Val(Text1.Text) + Val(Text2.Text) Then Text4.Text = "√" Score = Score + 10 Label3.Caption = "Your Score is:" & Score Else Text4.Text = "×" End If Case "-" If val(Text3.Text) = Val(Text1.Text) - Val(Text2.Text) Then Text4.Text = "√" Score = Score + 10 Label3.Caption = "Your Score is:" & Score Else Text4.Text = "×" End If Case "*" If val(Text3.Text) = Val(Text1.Text) * Val(Text2.Text) Then Text4.Text = "√" Score = Score + 10 Label3.Caption = "Your Score is:" & Score Else Text4.Text = "×" End If Case "M" If val(Text3.Text) = Val(Text1.Text) Mod Val(Text2.Text) Then Text4.Text = "√" Score = Score + 10 Label3.Caption = "Your Score is:" & Score Else Text4.Text = "×" End If End Select Next i Label3.Caption = "Your Score is:" & Score End Sub

从10名学生的成绩表中，找出不及格的学生姓名如果“姓名”和“成绩”合成一个记录，用记录类型怎么做上述程序注：不要用输入框！！

一个算法题，麻烦大佬们解释一下当我输入0.25时，为什么输出为“酒后驾驶”，如果输入小于0.3的数，x的值应该为0，为什么会出现上述情况？

请教窗体的事件有关问题窗体的Terminate事件是什么？何时发生？它与QueryUnload事件和Unload事件有什么区别？网上找的答案说的不清不楚的。

大家来看一看，此题是否有误？此题为2016年高考题高职高考题出的很混蛋，错误多多，出题老师真没水平，没有在程序中验证。

请教此题正确还是错误？【此题为判断题】 VB支持弹出菜单,所谓"弹出菜单"是指单击鼠标后打开的菜单。（） A、正确 B、错误在【学通Visual Basic的24堂课】中说单击一般是通过鼠标左键来完成，此题是错误的。（右键触发弹出菜单）但照【学通24】说法，左键，右键，中键事件统统可触发单击事件。此题是正确的。请高手们解答！

请教大佬们问题，从文件中读取数据实在搞不懂每次产生200个随机四位数素数到文件中要求： 1.每次启动时，产生的素数都不相同（不是追加） 2.产生的素数任意两个不相等 3.文件中，相邻两个数中间空一格，每10个数换行 4.怎么调用文件中的数据另外，vb打开产生的文件，“汉字”是“乱码”问题怎么解决？

“通用对话框”名称究竟怎么书写？教材有误？是CommandDialog控件还是CommanDialog控件？在网上搜索CommandDialog控件居然是正确的？

请大佬们解释这样一句话窗体的CLick事件（1）Click事件是在一个对象上按下然后释放一个鼠标时发生。（2）该事件也会发生在一个控件的值改变时。第二句话怎么理解，什么叫控件的值，是Caption属性么？

请大佬们帮帮我写这个题这个题是由C语言转换来的，我想不起来用Vb怎么做请输入星期几的第一个字母来判断一下是星期几，如果第一个字母一样，则继续判断第二个字母。

VB问题，高手进程序1 For i = 1.05 To 1.95 Step 0.1 Print i Next i 程序2 For i = 10.5 To 19.5 Print i Next i 为什么程序2运行10次循环，而程序1运行9次循环？我觉得都是10次，但程序结果如下

VB中ScrollBar控件的滑块和箭头都不显示，重装vb也不行上午只是把win10更新了而已，求教怎么办