我爱舞女泪
我爱舞女泪
关注数: 0
粉丝数: 23
发帖数: 1,774
关注贴吧数: 0
VB吧这么久了还是依然丢帖子，真是让人寒心！真是让人失望！ VB吧这么久了还是依然丢帖子，真是让人寒心！真是让人失望！VB吧这么久了还是依然丢帖子，真是让人寒心！真是让人失望！VB吧这么久了还是依然丢帖子，真是让人寒心！真是让人失望！
使用人工智能实现自动推箱子，感兴趣的进来讨论下！ 最近在写推箱子的游戏，我要使用人工智能实现自动推箱子，其要实现的效果为：利用鼠标点击箱子可以选择要推的箱子，鼠标再点击目的地，如果有箱子被选择，就自动推动被选择的箱子到此坐标，否则，人移动到此坐标！这具体的移动步骤，当然是自动选择最短的路径。也就是说，你只要选择要它搬哪个箱子，并指定要搬到的目的地，它就自动搬好，当然，如果出发点到目的地没有路可走，有障碍物，当然它就不会搬！其它的已经实现，就是自动推箱子的问题有点复杂，我先分析一下自动推箱子的思路，并使用图解的方法，让大家能更清晰明了：符号提示：★ 代表人▲ 代表目的地○ 代表放箱子的洞● 代表箱子□ 代表可以行走的空地■ 代表不能通行的墙→←↑↓ 代表行走的四个方向图一■■■■■■■■■■■■□▲□□□□□□□■■■■■■■■□□□■■□□□□□□□□□■■□★□□□□□■■■■■■■■■■■■■■这第一个图是最简单的，只移动人，将人移动到目的地就可以了，它的行走路线就应该是如图■■■■■■■■■■■■□▲←←←←←□□■■■■■■■■↑□□■■□□□□□□↑□□■■□★→→→→↑■■■■■■■■■■■■■■图二■■■■■■■■■■■■□○□□□□□□□■■■■■■■■□□□■■□□□●□□□□□■■□★□□□□□■■■■■■■■■■■■■■这个图，是要先将人移动到箱子左边，再推动到箱子转角的地方，人必须要走到箱子的下面，向上推到顶，再走到箱子的右边推，直到进洞，为了直观，我把人走的路线，和箱子走的路线分开画■■■■■■■■■■■■□○←←←←←□□■■■■■■■■↑□□■■□□□●→→↑□□■■□★□□□□□■■■■■■■■■■■■■■上面的是箱子应该走的路线，下面的是要让箱子实现以上的路线，则人的路线图■■■■■■■■■■■■□○←←←←←↑□■■■■■■■■↑→□■■□↑→→→→↑□□■■□★□□□↓→■■■■■■■■■■■■■■图三■■■■■■■■■■■■■□□□□□□□□○□■■□□□■□■■■□□■■■■■□●□□□□□■■□□★□□□□□■■■■■■■■■■■■■■■此图就有些复杂了，同样，还是先是箱子行走路线，这里因为重复了路线，我将分两次显示■■■■■■■■■■■■■□□←←←□□□○□■■□□□■↑■■■□□■■■■■□●□□□□□■■□□★□□□□□■■■■■■■■■■■■■■■人行走路线■■■■■■■■■■■■■□□←←←←←←↑□■■□□□■↓■■■↑□■■■■■□→→→→→□■■□□★→↑□□□■■■■■■■■■■■■■■■第二步■■■■■■■■■■■■■□→→→→→→→○□■■□□□■□■■■□□■■■■■□□□□□□□■■□□□□□□□□■■■■■■■■■■■■■■■人行走路线■■■■■■■■■■■■■→→→→→→→→○□■■↑←←■□■■■□□■■■■■□□□□□□□■■□□□□□□□□■■■■■■■■■■■■■■■从以上图中可以看出，要做以自动推箱子，还是非常复杂的，如果要推一个箱子，它要可以自动推动指定的那个箱子，并会自动绕开障碍物，如果障碍物是要推的那个箱子，则要自动将这个箱子推到可以开路的地方，但他不能去推动其它箱子来达到排除障碍物的目的。希望大家都讨论一下自己的看法和思路！谢谢
举报百度！！！ 总是无缘无故地丢帖子！请你们检查一下，怎么总是丢帖子？
在picturebox在画个一个矩形框，并可以移动它，类似photoshop中选 这是我写的代码请新建一个工程，放一个图片框控件在窗体上，不改控件名称，放入以下代码Option Explicit'矩形结构Private Type RECT Left As Long Top As Long Right As Long Bottom As LongEnd Type'操作类型Enum OpType None = 0 Draw DragEnd EnumDim rc As RECT '所画矩形Dim ot As OpType '操作类型Dim m_X As Long '当拖动矩形时，鼠标位置的 X 坐标Dim m_Y As Long '当拖动矩形时，鼠标位置的 Y 坐标Private Sub Form_Load() ot = None With Picture1 .ScaleMode = vbPixels .AutoRedraw = False .Appearance = 0 End WithEnd SubPrivate Sub Form_Resize() Picture1.Move ScaleX(8, vbPixels, ScaleMode), ScaleY(8, vbPixels, ScaleMode), _ ScaleWidth - ScaleX(16, vbPixels, ScaleMode), _ ScaleHeight - ScaleY(16, vbPixels, ScaleMode)End SubPrivate Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If vbLeftButton = (Button And vbLeftButton) Then Select Case ot Case OpType.None With rc If X > .Left And X < .Right And Y > .Top And Y < .Bottom Then '如果已经画好了矩形，如果点击矩形范围内任意位置，则视为拖动矩形 m_X = X m_Y = Y ot = Drag Else '反之则视为重画矩形 Call DrawRect .Left = X .Right = X .Top = Y .Bottom = Y ot = Draw End If End With Case OpType.Draw Case OpType.Drag End Select End IfEnd SubPrivate Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If vbLeftButton = (Button And vbLeftButton) Then With rc Select Case ot Case OpType.None Case OpType.Draw '画矩形时，先画一次清除上次画的矩形
直接取字节的某一位的算法 直接取出指定字节(Byte)的某一位(Bit)的值,结果只会是0或1,也就是想知道这个位上是0还是1,大家有什么优的算法,不妨帖出来供大家研究和学习!我这里先帖出我的算法，经测试，第一种方法比第二种方法在速度上要快一半有多，很明显，第一种方法，用的是常量，所以少了计算步骤，而第二种方法还要先计算幂，所以就慢了许多，但从代码量上来讲，第二种方法较简捷。Option ExplicitDim byts(0 To 255) As BytePrivate Sub Command1_Click() Dim ts As Single, td As Single Dim i As Integer, j As Long, k As Integer, b As Byte ts = Timer For j = 0 To 1000 For i = 0 To 255' Debug.Print byts(i), For k = 7 To 0 Step -1' Debug.Print ByteBit(byts(i), k),' Debug.Print ByteBitEx(byts(i), k),' b = ByteBit(byts(i), k) b = ByteBitEx(byts(i), k) Next' Debug.Print "================================================" Next Next td = Timer Text1.Text = ts Text2.Text = td Text3.Text = td - ts Debug.Print Now, td - tsEnd SubPrivate Sub Form_Load() Dim i As Integer For i = 0 To 255 byts(i) = i NextEnd Sub'取字节的某一位Private Function ByteBit(ByVal bytValue As Byte, ByVal intBitIndex As Integer) As Byte Select Case intBitIndex Case 0 ByteBit = bytValue And &H1 Case 1 ByteBit = (bytValue And &H2) \ &H2 Case 2 ByteBit = (bytValue And &H4) \ &H4 Case 3 ByteBit = (bytValue And &H8) \ &H8 Case 4 ByteBit = (bytValue And &H10) \ &H10 Case 5 ByteBit = (bytValue And &H20) \ &H20 Case 6 ByteBit = (bytValue And &H40) \ &H40 Case 7 ByteBit = (bytValue And &H80) \ &H80 End SelectEnd Function'取字节的某一位Private Function ByteBitEx(ByVal bytValue As Byte, ByVal intBitIndex As Integer) As Byte Select Case intBitIndex Case 0 To 7 ByteBitEx = (bytValue And 2 ^ intBitIndex) \ 2 ^ intBitIndex End SelectEnd Function以下是测试结果:调用ByteBit07-04-12 01:32:27 2.015625 07-04-12 01:32:31 2.202637 07-04-12 01:32:34 2 07-04-12 01:32:37 2.016113 07-04-12 01:32:40 2 07-04-12 01:32:43 2.015625 07-04-12 01:32:46 2 07-04-12 01:32:49 2.016113 07-04-12 01:32:55 1.983887 07-04-12 01:32:59 1.984863 07-04-12 01:33:03 2 07-04-12 01:33:06 2.015137 =====================================调用ByteBitEx07-04-12 01:34:41 4.219238 07-04-12 01:34:47 4.219238 07-04-12 01:34:52 4.203125 07-04-12 01:34:57 4.203125 07-04-12 01:35:02 4.21875 07-04-12 01:35:07 4.202637 07-04-12 01:35:11 4.219238 07-04-12 01:35:15 4.203125 07-04-12 01:35:19 4.219238 07-04-12 01:35:23 4.21875 07-04-12 01:35:28 4.219238
关於最短路迳的算法解析 今天在书上终於找到一个更好的算法，叫等高算法，实现的思路是：先由终点向四周出发，标识出步数，直到起点为止，再由起蹼，找标识出来的步数最小的坐标行走，就是最短路迳。如图，要从★点走到☆点┏━━━━━━━━━━━━━━━━━┓┃□□□□■■■■□□□□□□□□□┃┃□☆□□■■■■□□□□□□□□□┃┃□□□□■■■■□□□■■□□□□┃┃□□□□■■□□□□■■□□□■■┃┃■□□□■■□□□■■□□□■■■┃┃■□□□□□□□■■□□□■■■■┃┃■□□□□□□■■□□□■■□□□┃┃■□□□□□□■■□□□■■□□□┃┃■■■■■■■■■□□□□□□□□┃┃■■■■■■■■□□□□□□★□□┃┃■□□□□□□□□□□□□□□□□┃┗━━━━━━━━━━━━━━━━━┛由终点向四周标识出行走步数，直到到达起点为止，如图┏━━━━━━━━━━━━━━━━━┓┃ 2 1 2 3■■■■161718192021222324┃┃ 1☆ 1 2■■■■151617181920212223┃┃ 2 1 2 3■■■■141516■■21222324┃┃ 3 2 3 4■■11121314■■232223■■┃┃ 4 3 4 5■■101112■■252423■■■┃┃■ 4 5 6 7 8 910■■272625■■■■┃┃■ 5 6 7 8 910■■292827■■□□□┃┃■ 6 7 8 91011■■302928■■□□□┃┃■■■■■■■■■313029303132□□┃┃■■■■■■■■□3231303132★□□┃┃■□□□□□□□□□323132□□□□┃┗━━━━━━━━━━━━━━━━━┛再起点，找所标识出来的步数最小的路迳行走，为了直观，我把其它位置上的步数清除了┏━━━━━━━━━━━━━━━━━┓┃□□□□■■■■□□□□□□□□□┃┃□☆□□■■■■□1617181920□□□┃┃□ 1 2 3■■■■1415□■■21□□□┃┃□□□ 4■■□1213□■■2322□■■┃┃□□□ 5■■1011□■■□24□■■■┃┃■□□ 6 7 8 9□■■□2625■■■■┃┃■□□□□□□■■□□27■■□□□┃┃■□□□□□□■■□□28■■□□□┃┃■■■■■■■■■□□293031□□□┃┃■■■■■■■■□□□□□32★□□┃┃■□□□□□□□□□□□□□□□□┃┗━━━━━━━━━━━━━━━━━┛当然，在有些地方，不是唯一的，如1到4，9到16，21到26，29到32（从第二个图中可以看出），但这不影响找出的路迳是否为最短路迳的正确性。这个算法中，标识出行走步数的算法，需要优化，因为，大家可以注意到，从起始点到达终点，只需走32步，但在第二个图中，我们开始并不知道有多少步，所以有很标步骤是多馀，书上是用两个堆椎，交替实现，速度提高不少，但我没看懂，没理解到它的意思，它也没讲详细，所以我也没办法讲给大家。此算法有源码，要的留下邮箱！
IP拔号问题？！？！？ 请问各位，L7能不能设置IP拔号？或者如何IP拔号？不可能要每次要打长途时先把电话记下来，再手动加上IP17951拔号吧？也不能把存储带有17951的号码，因为这样的号码不能发短信啊？也不可能把一个长途号码分别存为两个号码吗吧？
能用摩托的工具把MP3存到内存卡里吗？ 请教下，我通过摩托的工具，往机器里只能加两三首MP3，不知道如何将MP3保存到内存卡里？好像它都只能保存到手机的内存里，满了就无法再保存了我直接保存到内存卡里的歌曲，不支持中文名？在手机里全显示成乱码？有过工具保存的，在列表中虽然是中文，但查看详细资料时，也是乱码不？请问是怎么回事？
回复刚才的一个VB程序员被岳父拒之门外的帖 我说两句，如果你认为学会了VB就可以放松下来，不再去学习，那么这样确实是不对的，学无止境！VB本来就是为初学者入门而设计的，如果认为学会了VB，就万事大吉了，那么这种想法就是错的！不过，故事中的岳父，确实太偏激了学VB只是让我们更容易上手，更快捷入门，我们入门，还要继续学习更深，更高级的技术和知识，所以不要把VB当做是终点，就没错个人意见
一个模拟声波的画曲线图的例子，要的进来！ 这是我写的一个控件，可以自由调节控件边框宽度、颜色、背景颜色，图形边框宽度、颜色、背景颜色，可以像股票软件一样显示鼠标所在点的值，可以根据所显示的数据大小动态改变值的标签（标示值随要显示的数据的值改变，也可以固定），可以用格式字符串规定值标签显示的格式。一般需要都可以通过一个或两个属性改变达到。
打开帮助文件中指定内容的问题？？？ 有没有人知道如何通过关键字打开chm帮助文件？就是去按指定的关键字打开相应的页面（在帮助文件中建有索引，相当于打开帮助文件后，输入关键字查找，就像VB或MSSQL按F1后，自动找到相应页面）？？？如，我在帮助文件中有索引“ABC”，此“ABC”的索引的连接是GGG.htm（我不管它实现链接到什么页面，这里只是举个例），那么我要实现的功能和效果就是指定关键字为“ABC”，它应该会在索引中按“ABC”来查找，并在右边显示它链接的页面GGG.htm，也就是说，此GGG.htm路径对我来说是未知的！请问有没有人知道如何实现？请高手指点一下！
◇链接·海外文物之最 中国流失国外的文物，就绘画而言，美国收藏最多，仅华盛顿弗利尔博物馆就有1200余幅；美国大都会博物馆所藏中国绘画近500幅；大英博物馆所藏中国绘画最精。在瓷器方面，以收藏亚洲艺术品著称的法国集美博物馆收藏最佳。就地方志和古籍而言，美国最多，美国国会图书馆就有4000多种地方志。 就甲骨片而言，日本是收藏最多的国家，在流失海外的近3万片甲骨片中，日本有近13000片。就敦煌宝藏而言，而今敦煌遗书在我国国内仅存2万件，仅占三成；藏于大英图书馆东方写本部有13700件；藏于法国巴黎国立图书馆有6000件；藏于俄罗斯圣彼得堡亚洲民族研究所12000件；藏于英国印度事务部图书馆近2000件，此外，日本、美国、瑞典、奥地利、韩国也均有敦煌文物收藏。 他乡国宝 ●欧洲 大英博物馆(英国) 女史箴图 大英博物馆收藏有中国文物23000余件，许多是珍品、孤品，其中东晋顾恺之《女史箴图》唐代摹本最为引人注目，敦煌文物也极其重要。大英图书馆(英国) 中国珍贵文献和古籍6万多种，其中有波罗蜜佛经最早版本、《永乐大典》45卷及甲骨片、敦煌藏经等。 枫丹白露宫(法国)在西方博物馆中，收藏和展览圆明园珍宝最多最好的要数法国的枫丹白露宫，有中国文物3万多件。 巴黎东方博物院(法国) 收藏有圆明园玉印两方，“保合太和”与“圆明园印”。 巴黎集美博物馆(法国) 这里收藏的瓷器从中国最早的原始瓷器一直到明清的青花、五彩瓷，多为精品。
我爱舞女泪申请VB吧主 我爱舞女泪申请VB吧主，希望与大家共同学习，共同发展，共同提高
关于实现双击文件自动打开的方法，要的进来 要实现在资源管理器里双击文件时，让系统使用你和程序来打开这个文件，或用户从命令行输入参数时打开指定参数的文件，我们需要实现两个功能：一是向系统注册文件类型，就是打开方式，使用API向注册表中写入注册表信息二是在程序中使用Command()函数获得命令行参数，但要注意，当用户是双击文件来打开的，那么此参数是被一对双引号引起来的字符串，我们需要先替换双引号（你放心，一个合法的文件名和路径是不会有双引号的），并加载此文件内容即可另外，从资源管理器里双击文件来的打开文件时，获得的文件名当然肯定是一个文件名，但是，当用户从命令行输入命令时，可以输入多个，如：我的记事本.exe c:\autoexec.bat d:\abc.txt，此时获得的参数实际上是两个参数，如果直接使用这参数当文件名打开时，会找不到文件，我们需要使用Split()函数分隔参数（分隔字符为空格）但还有一个问题，当文件名或路径中包含空格时，用户输入路径时需要将文件完整路径使用双引号引起来如：我的记事本.exe "D:\Program Files\Microsoft Visual Studio\VB98\NWIND.MDB"这时如果直接使用空格分隔就有问题，在这里，其实我们只传了一个文件名，但使用空格分隔就会分出四个参数来我现在的示例并没有考虑以上两个问题以下是源代码，要的也可以留下邮箱工程中有一个窗体：frmEdit，窗体上有一个TextBox控件：txtText（为了配合以下代码，或者你可以将以下代码中的控件、窗体名称改成你的）还有一个模块，名字随便'模块代码部分Option ExplicitPrivate Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" ( _ ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As LongPrivate Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" ( _ ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, _ lpType As Long, lpData As Any, lpcbData As Long) As Long ' Note that if you declare the lpData parameter as String, you must pass it By Value.Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" ( _ ByVal hKey As Long, ByVal lpszSubKey As String, lphKey As Long) As LongPrivate Declare Function RegSetValue Lib "advapi32.dll" Alias "RegSetValueA" ( _ ByVal hKey As Long, ByVal lpszSubKey As String, ByVal fdwType As Long, _ ByVal lpszValue As String, ByVal dwLength As Long) As Long Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As LongPrivate Const ERROR_SUCCESS = 0&Private Const ERROR_BADDB = 1&Private Const ERROR_BADKEY = 2&Private Const ERROR_CANTOPEN = 3&Private Const ERROR_CANTREAD = 4&Private Const ERROR_CANTWRITE = 5&Private Const ERROR_OUTOFMEMORY = 6&Private Const ERROR_INVALID_PARAMETER = 7&Private Const ERROR_ACCESS_DENIED = 8&Private Const HKEY_CLASSES_ROOT = &H80000000Private Const HKEY_LOCAL_MACHINE = &H80000002Private Const MAX_PATH = 256&Private Const REG_SZ = 1Private Const RFT_APP_NAME = "我的记事本"Private Const RFT_FILE_TYPE = "ZZZfiles"Private Const RFT_FILE_EXT_NAME = ".zzz"Public strCmdLine As String'注册文件类型，这里每次运行都会去注册，
自定义进度条控件，要的留下邮箱！ 供初学者学习，也希望大家提出宝贵意见和建议！控件特点（肯定比微软的要好）：两位小数精度显示进度值可以自定义边框样式（目前只实现了三种样式：无边框，凹陷效果，凸起效果），边框宽度，边框颜色，进度条颜色，背景颜色，进度文字颜色
大家用过UltraEdit-32吗？ 大家用过UltraEdit-32吗？ 如果是文本文件则自动以文本方式打开，如果是非文本文件，则自动以十六进制方式打开，而且速度也是飞快的可VB里没有可以显示这个十六进制代码与文本同时出现的控件，最关键的是：用VB将内容以十六进制代码速度慢得无法接收，才几十K的文件就要很久，如果打开1M的文件简直就像死机一样半天才能打开，目前采用的方法是：先一次读入所字节到字节数组，再将每个字节逐个转换，这样的效率太差了，有没有更好的算法？请教高手！
拦截用户用鼠标操作窗体的边框和标题栏的窗口消息 请问有人会拦截当用户用鼠标操作窗体的边框和标题栏的消息吗？就是当用户点击标题栏、按下鼠标并移动窗体、操作边框调整窗体大小时的这此操作？
属性窗口 大家应该都对属性窗口不陌生吧？此窗口有几个特点：一、始终在调用此窗口的源窗口的前面，但不会在其它窗口的最前面二、可以操作此窗口，也可以操作调用此窗口的源窗口暂时还没有发现与一般的对话框有其它什么不同其实这些特点，在某些查找对话框上也可以看到，而最多见的，就是在资源管理器上复制文件时出现的复制进度提示窗口了，比如打开一个资源管理器，复制文件，此窗口会一直保持在此资源管理器的前面，但我们再打开一个资源管理器或其它窗口时，前面的资源管理器的复制进度提示窗口不会覆盖在其它窗口上面，而仅仅是在其对应的管理器的窗口的前面而已，请问大家，要实现有以上特点的窗口，需要怎样做？望高手赐教！
哪里有“游戏编程”的书籍下载？ 哪里有“游戏编程”的书籍下载？我昨天到书店看到几本
举报帖吧管理员 是管理员在删我的帖吗？我要投诉！！！！ 我发过也回复那么多帖，为什么总不翼而飞？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？
是管理员在删我的帖吗？我要投诉！！！！ 是管理员在删我的帖吗？我要投诉！！！！我发过也回复那么多帖，为什么总不翼而飞？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？
哪里有“游戏编程”的书籍下载？ 哪里有“游戏编程”的书籍下载？我昨天到书店看到几本
CS Command 错误？ 我在编译时提示： 运行时错误：“-2147352571(80020005)”： 类型不匹配 请问是什么原因？谁知道？编译已经完成，写应用程度时出现此提示，无法完成生成新的EXE？
Tree控件问题 怎么用代码选择树控件的某个节点？不是check，而是select
自己写组合框控件（ComboBox） 请门路如何实现操作控件但不会抢去父窗体的焦点？系统中的ComboBox控件相信大家都不陌生，此控件由文本框和列表框组合而成，无论是操作、点击、选择、滚动列表框，都不会抢去父窗体的焦点，请问要如何实现？
我刚才发的帖怎么不见了？另一个帖的回帖也不见？ 我刚才发的帖怎么不见了？另一个帖的回帖也不见？
中搜在线是个垃圾公司 中搜在线是个垃圾公司，专门制造些垃圾搜索工具，在用户毫无知觉的情况下自动安装而且无法卸载！严重BS此公司！
请教哪位高手懂FTP协议？？？！！！ 我想使用winsock控件结合FTP协议下下载文件，但发送如“LIST”命令时返回：list150 Opening ASCII mode data connection for /bin/ls.425 Can't open data connection.是不是这里需要打开另一个所谓的数据连接？那么又是如何打开呢？好像用Inet控件可以下载，但下载是控件内部完成的，是不是无法知道已经下载了多少字节？就不能实现进度控制？哪位高手帮忙回答一下，谢谢！
[email protected]
:104337058
怎样释放压缩文件？ 在VB里怎样释放压缩文件？如rar、zip等类型的压缩文件？
使用FTP协议下载文件 谁知道如何用FTP协议下载文件？使用winsock控件并使用FTP协议。谢谢。
[email protected]
:104337058
为什么我写的控件只能将控件工程添加到应用程序工作下才能使用？ 为什么我写的控件只能将控件工程添加到应用程序工作下才能使用？ 我写了一个类似于组合框的控件（因为系统的组合框不能满足我的需要），将控件编译成ocx文件后，在其它应用程序工程中添加此控件，运行时不能点击列表中的项，将此控件工程添加到应用程序工程下就可以，但应用程序发布成exe文件并安装后运行，当打开有此控件的窗体时，整个程序就异常关闭退出，只能在进程中看到这个程序，系统资源占用非常高！如果是控件未注册，那么应该提示“XX控件未注册”等信息，但此时没有提示任何信息就关闭并死机！ 请各们高手指教！
请教 RegQueryValueEx 的问题！！！ 为什么我调用： result = RegQueryValueEx(nKeyHandle, "CD_KEY", 0, ByVal REG_SZ, sValue, nLength) 异常退出！提示“"0x77f47854" 指令引用的 "0x00000001" 内存。该内存不能为 "written"。”
请问各位大侠，有没有谁知道如果检测计算机里有没有安装SQL Server 请问各位大侠，有没有谁知道如果检测计算机里有没有安装SQL Server？
请问那里可以找到谭浩强的C++语言设计 请问那里可以找到谭浩强的C++语言设计偶要QQ：104337058
1
下一页
