你能帮我把一个子报表放在一个主设计报表中，并把它们之间的数据连接起来吗 感谢要添加子报表，您只需从“插入”菜单中选择“子报表”，然后完成创建新子报表或指向要用于子报表的现有报表的步骤 如果选择创建新报告，请为其命名，然后选择“报告向导”创建子报告。选择连接后，只需像通常使用向导一样创建报告。您可以在向导的“报告选择”部分中设置链接，但最简单的方法是右键单击添加到主报告中的新子报告，然后选择“更改子报告链接”。在这里，您可以指定主报告中的哪个字段将链接到子报告中的字段。“子报表链接”屏幕是非常不言

我有一个遗留的vb6应用程序，需要在Server2008计算机上运行。 我无法让comdlg32.ocx注册，应用程序依赖于此。有什么建议吗？显而易见，但你是以管理员的身份运行Regsvr32吗？显而易见，但你是以管理员的身份运行Regsvr32吗？嗯，对你有帮助吗 我唯一的另一个建议是，在这种情况下，经常是有用的，特别是如果您在64位操作系统上运行这个vb6应用程序，那么请注意comdlg32.ocx是否将其所有依赖项都显示为32位库。Hmm，对您有帮助吗 我唯一的另一个建议是，在这种情况下，

当我从组合框中选择值时，相关值应显示在文本框中 组合框代码 cmd.CommandText = "select distinct PERSONID from T_PERSON" Set rs = cmd.Execute While Not rs.EOF If Not IsNull(rs("PersonID")) Then txtno.AddItem rs("PersonID") End If rs.MoveN

我最近修复了VB6应用程序中的一个错误，但我不确定到底出了什么问题 有问题的部分是CreateEvent的错误API声明。这是API Viewer生成的： Declare Function CreateEvent Lib "kernel32" Alias "CreateEventA" (lpEventAttributes As SECURITY_ATTRIBUTES, ...) As Long 下一个是错误的声明，显然有人不想导入安全属性结构 Declare Function CreateE

Visual Basic 6在我的程序重新生成后崩溃。每当我对代码进行更改后启动（F5或Ctrl-F5）我的程序时，VB6就会崩溃，并显示以下消息： VB6.EXE[XXXX]中发生未经处理的win32异常 我无法用XXXX制作任何图案。是516850121488等等；每次撞车都会改变 然后，JIT调试器允许我在VS2010中调试VB6（它只显示一系列反汇编）。如果我说不，VB6将关闭。然后，我可以立即打开并启动我的程序，它运行得很好；我在崩溃前所做的更改已保存。或者，我可以进行更改，保存它们，

在VB6中，溢出错误的可能原因是什么？当它发生时，我正在使用字符串 是RAM还是硬盘空间？或者它是VB6内部的东西？我想在这里暗中试探一下，正如Hogan所说，一些代码会有所帮助。通常，当VB6处理数学公式中的整数或long时，字符串会发生溢出错误，并且结果太大，无法容纳整数或long 根据公式的性质，您可以通过在末尾添加“.0”来强制系统将数字用作浮点来避免问题。否则，请使用各种Cxxx函数将数字显式转换为范围更大的类型 你考虑的一点是浮点比整数整数精度要低，所以确保在转换时不要丢失所需的精度

如何在VB 6中检查对象的类型-除了“TypeName”之外，还有其他方法吗？因为用“TypeName”检查对象是不可行的。我希望使用类似QuichWatch窗口的方法。对于对象变量，请使用TypeOf。。。是： If TypeOf VarName Is TypeName Then ''# ... End If 例如： Dim fso As New Scripting.FileSystemObject If TypeOf fso Is Scripting.FileSystemObject

我正在存储一个交错的数字数组，大致如下所示 Dim mainarray() as Variant Dim smallarray() as Integer ReDim mainarray(fairly_large_size) For i = 1 to fairly_large_size ReDim smallarray(some_variable_moderate_size) 'fill in smallarray mainarray(i) = smallarray N

我得到“对象不源自动化事件” 在下面的VB6.0行中 公共事件连接作为连接 请帮助也许您还有另一个名为连接的类？从另一个库还是从您自己的代码？我想你想要一个，试试强迫它 Public WithEvents conn As ADODB.Connection 我也有同样的问题。我已经为VB6项目编写了一个.NET库。有公众代表参加的公共活动。它以前起过作用。现在，程序集找不到让它痛苦不已，当我使它对COM互操作可见时，它显示了对象并没有在声明时生成自动化事件。对象声明相同：Public with

非常简单：我在确保VB DLL遵守IIS和ASP中设置的超时方面遇到了一个问题 我工作的一个网站使用了大量的本地DLL，它们的方法可能运行的时间比web用户愿意等待的时间更长。如果访问者按Escape或关闭浏览器，则该过程自然会在服务器上继续，占用CPU时间和内存 在我的ASP中，我将server.scriptTimeout设置为一个较低的数字（比如10秒），并且我在IIS中对整个web应用程序执行了相同的操作（因为我知道如果server.scriptTimeout低于IIS超时，则忽略它） 如

在Visual Basic 6中，如何获取下的所有键值，例如： HKEY\ U当前\用户\软件\ Microsoft\Windows\CurrentVersion\Run 将返回以下值（取决于用户）： “C:\Program Files\Steam\Steam.exe” -沉默的 “C:\程序 Files\Skype\Phone\Skype.exe“/nosplash /最小化 “C:\Program Files\Windows Live\Messenger\msnmsgr.exe“ /背景 等

我正在使用非常旧版本的InstallShield Express 4来打包我的VB6应用程序。在XP上安装它，效果很好。但是，当我在Windows7上安装它时，没有使用“以管理员身份运行”，所有内容似乎都是只读的。我无法编辑INI文件，因为访问被拒绝。应用程序就是不能正常运行。就好像连文件夹都无法访问一样。它安装在默认的“程序文件”文件夹中。我卸载应用程序，使用“以管理员身份运行”选项重新安装，将快捷方式的兼容性设置为“以管理员身份运行”，一切正常 我的问题是，这是VB6中继承的东西，应用程序必

我目前正在维护一个VB6应用程序，但对VB6知之甚少。 我遇到了一些令我困惑的代码 Private Sub Form_KeyPress(KeyAscii As Integer) KeyAscii = Asc(UCase(Chr(KeyAscii))) If KeyAscii = 27 And TypeOf Me.ActiveControl Is TextBox Then KeyAscii = 0 SendKeys "^Z" End If End Sub 我所

我试图使用MSXML2.DOMDocument类解析visual basic 6.0中远程服务器上驻留的xml文件的内容 我正在使用MSXML2.DOMDocument类的Load方法来传递url。url的格式为http:///ABC.xml，但是，服务器需要用户凭据才能访问文件 如何使用此类或其他支持类传入用户凭据？在许多情况下，可以使用http://:@/ABC.xml，也可以使用XMLHTTPRequest帮助对象发出实际请求 请注意，当您使用MSXML DOMDocument对象时，您没

在下面的图片中，我的VB显示了那些特殊的字符，而不是“É” 我怎样才能解决这个问题呢？一开始我没想到！如果我在“编辑器格式选项”中更改字体，它将修复我的问题。

我是vb新手，我有3个文本框，我想在用户单击表单中的特定按钮时将其设置为随机值，因此： 代码如下： Private Sub cmdjouer_Click(Index As Integer) txt1 = Math.Randomize(9) txt2 = Math.Randomize(9) txt3 = Math.Randomize(9) End Sub 我得到以下错误 预期的函数或变量 我确信problom是随机函数 如果您有任何想法，我们将不胜感激 Microsoft.SPOT.Ma

我已经为此使用了大量的网站，但没有一个有效的，所以我希望我能得到一个正确的答案 我试过这个，有人能告诉我它有什么问题吗 Private sub Picture1_mouseDown x = picture1.currentx y = picture1.currenty End sub Private sub Picture1_MouseMove If button = 1 then line (picture1.currentx,pict

请告诉我一些建议，如何限制输入数据只接受文化代码，如文本框中的en US 我已经尝试过这个代码，但它接受所有5个字母字符…我希望它只接受文化代码的格式是en US if Length(textbox1.text) > 5 then enter only five chars else if Length(textbox1.text) < 5 then enter up to five chars 如果长度（textbox1.text）>5，则 只输入五个字符 否则，如果长度

我从Form\u Load调用此方法，错误发生在代码Private子..的第一行。我从工具箱MSCOMM Private Sub OpenPort() MSComm1.Settings = "19200,8,N,1" MSComm1.CommPort = 4 MSComm1.PortOpen = True End Sub 该错误意味着MSComm1没有设置属性 什么类型的MSComm1是MSComm1？它是一个控件吗？错误发生后，请尝试在“监视”窗口中查看MS

我正在开发一个使用ActiveReports 2的旧式VB6应用程序。我正在尝试在页面上画线条。当我有一个报告，其中数据导致生成的报告有多个页面时，我注意到DrawLine方法只在最后一页上绘制线条 例如，在ActiveReport的ReportEnd事件处理程序中，我有以下代码： Me.Pages(0).DrawLine 2000, 2000, 2000, 5000 Me.Pages(1).DrawLine 2000, 2000, 2000, 5000 Me.Canvas.DrawLine

我想知道是否可以在运行时将文件插入resource.RES文件，而不是在设计时使用资源编辑器插入文件。有人能帮我了解一下这个信息吗？提前谢谢。不幸的是，不，不是直接的。不过你不需要这么做 你可以做一个乱七八糟的黑客，让用户运行一个程序，该程序在运行时编译另一个你的程序，然后运行它。你不能在程序运行时修改它。

我有一个在标准计算机上运行的应用程序，但是当我试图通过citrix运行该应用程序时，会出现此错误消息 运行时错误3633无法加载DLL:MSJTER35.DLL 问题出在我的应用程序或Citrix中

我安装了VB6，我安装了Sourcegear Vault 5.x，现在我在每次启动VB6时都会收到此消息 当然，我不能使用内置的源代码管理命令。 我已尝试重新安装SourceGear Vault，但没有成功。我错过了什么 如何修复它？常规信息 当VB6加载源代码管理外接程序但没有默认的MSSCCI提供程序时，您将收到此错误消息 MSSCCI代表Microsoft源代码控制接口，它是大多数IDE用于连接到版本控制系统（VCS）的标准API。它最初是为Visual SourceSafe开发的，当您

提及 我尝试了这个示例，但没有像中那样工作，因为我看不到有颜色的行。 我的表单上有一个加载listview项目的命令按钮，一旦完成，我调用例程来设置颜色。 我使我的图片框可见，以查看预期结果，结果与预期一致。因此，有效地将ListView的Picture属性设置为PictureBox的Image属性对我来说毫无用处 无论如何，这是我的代码： 'pbxBG.Visible = True If lsvPersonalisation.ListItems.Count <> 0 Then

我使用CodeSmart 3.4.6.297从我的vb6项目中获取代码度量。 现在，我想在使用TeamCity的构建过程中包括codesmart 我知道codesmart可以是命令行中的用户。这对我有用。我有我的command line.xml文件： <sourcemonitor_commands> <write_log>true</write_log> <command> <project_file>P

如何在vb6项目中添加新文件夹？我有一个表单，表单使用了一些图像现在我想移动文件夹下的所有图像vb6中项目下的图像？稍后将引用此文件夹中的图像。您无法在VB6 GUI中执行此操作。它有一个固定的布局——记住它已经有15年的历史了，事情（特别是项目）要简单得多 但是，您可以将文件本身放在不同的文件夹中。您可以在磁盘上创建子文件夹并将文件移动到其中。”“另存为…”可能适用于单个文件。如果您想处理大量文件： 启动新项目 将文件分发到所需的文件夹中 使用“添加文件”添加每个文件夹中的文件 不能在VB6

我有一个vb6应用程序，它是参照项目文件夹中的.ini文件编译的。我导入了该文件并将其作为模块添加。这是确保文件随安装程序一起分发的最佳方法吗？理想情况下，文件应存储在程序文件中的应用程序文件夹中。程序文件中的文件夹不可写。像ini文件这样的文件进入AppData\Appname，这在Win 98中是不存在的（VB6的设计目的） 在VB6的安装程序中，可以指定要添加到安装程序中的文件以及将这些文件放置在何处。但是AppPath需要由硬编码的路径指定（可能一个%AppData%\AppFolder

我已经准备好把这篇文章写在《暮光之城》的“w”下了 我有一个用户控件类，并且在定义中有它 Private Const m_def_FillColor As Long = &H99FF 然后： 现在，如果我在即时窗口中进行调查： ? m_def_FillColor -26113 ? &h99ff -26113 我想，好的。这可能就是为什么我在尝试将其用作颜色时出错的原因。我检查十六进制值并得到： ? hex( m_def_FillColor ) FFFF99FF

我想自动执行一些操作， 要确保一切都像手工操作一样进行，最好的方法是打开现有表单，对表单进行更改，然后调用其中一个表单按钮中包含的相同函数 因此，我想知道是否有一种方法可以在用户看不到任何东西的情况下执行此操作？（可以看到一些窗口闪烁）来自“帮助” 加载语句 将窗体或控件加载到内存中 语法 对象占位符是要加载的窗体对象、MDIForm对象或控件数组元素的名称 备注 您不需要在表单中使用Load语句，除非您希望在不显示表单的情况下加载表单。对表单的任何引用（集合中的引用或如果…TypeOf语句中的

我有一个游戏服务器，错误溢出问题6 调试： If Spell(spellnum).END > 0 Then TempPlayer(Index).END = GetPlayerStat(Index, Endurance) SetPlayerStat Index, Endurance, GetPlayerStat(Index, Endurance) + Spell(spellnum).END SendStats Index End If 调试突出显示： Tem

我的表格上有一个图片盒。当我点击它时，我想让它执行一个函数（在本例中，将一个值设置为一个变量）。一、 然而，我们还没有找到任何方法来做到这一点 picturebox应该在运行时单击时为变量设置一个值 我曾考虑过在picturebox上放置一个文本框并使其透明，但我还没有找到一种通过visual basic使文本框透明的方法。应该有更直接的方法吗 我能得到一些帮助吗？谢谢。您可以双击图片框，它将显示代码。从那里插入所需的代码 Private sub picture1_click() End s

我想使用以下代码将文件夹中的所有excel文件添加到电子邮件中： Dim fs Set fs = CreateObject("Scripting.FileSystemObject") Set MItem = OutlookApp.CreateItem(olMailItem) MItem.Display With MItem .Bcc = EmailAddr .Subject = Subj .Body = Msg For Each File In fs.GetFolder(CurDir&

我正在将服务器从Windows 2003升级到2012 R2。 我们的一个VB6应用程序将CDO.dll用于MAPI，即用于发送邮件 我的问题是: 如何安装/注册CDO.DLL 安装CDO.DLL的先决条件是什么 我是否需要在服务器上安装Outlook，应用程序才能发送邮件 Microsoft不再开发或支持CDO 1.21。您可以从下载独立版本的MAPI以及CDO 1.21。它上一次更新是在2014年，预计不会有新的bug修复。就功能而言，它在过去15年中一直没有更新 您可以切换到Outlook

我已经让我的NSIS脚本文件工作了一段时间32位。。。 在新版本（不用于开发）Win7/Win10（64）上，.OCX文件存在问题 程序及其支持文件安装在C:\Program files（x86）。。。或D:\程序文件（x86）。。。 这包括：Program.exe、Uninstall.exe、.dll、.tlb、.olb、.ocx及其.manifest文件。 我的安装是“免费的”。 他们的数据文件位于：C:\Users\Public。。。或D:\Users\Public 启动新安装在Win7（

我正在使用Microsoft Project 2016执行一些办公自动化。如果我打开2016年mpp文件没有问题，我可以关闭应用程序。但是，如果我在MS Project 2016上打开2003或2007文件，我总是在关闭应用程序时弹出一个窗口，要求我将文件升级到新版本 由于无法在自动化中与此对话框进行交互，因此完全阻塞了流程并破坏了应用程序 是否有任何注册表项或配置可以在Office或MS Project中完成，以在关闭时禁用此文件升级弹出窗口 Dim objMPP As New MSProje

在vb6中，是否可以从dll本身中获取.dll的文件名？ 我知道这很奇怪，但我现在的情况是，我有一个可执行文件，在运行时加载一个dll，每个dll都有它的文件名版本，所以X_V904.dll，X_V905.dll，等等。 我需要将加载的dll文件名与数据库中的值相匹配。我无法将文件名传递给dll，我只能尝试从dll本身的代码中获取I 我到处找，找不到任何方法，这是不可能的，还是以前有人尝试过这样做？您可以使用应用程序对象获取文件名。试试这个： App.EXEName 可以使用应用程序对象获取文

当我从第10个月选择相同的日期时，比如说dtpckr1=02-10-2019和dtpckr2=02-10-2019..数据网格不打印任何内容，并显示msgbox not found记录，我为方便起见对其进行编码…但当我从上个月选择开始日期和本月的结束日期时，dtpckr1=30-09-2019和dtpckr2=02-10-2019，它会显示所有数据第09个月，从第10个月开始没有。。。奇怪的是，当选择从09月开始的日期时，即使它是相同的dtpckr1=13-09-2019和dtpckr2=13-

我正在调查一些旧VB6代码中的内存泄漏，这些代码似乎与记录集对象有关，因此我试图获取对象上的引用计数。我在网上找到了一些代码，这些代码将提供对对象的引用计数，并且它适用于一个自行开发的类。但当我尝试将其应用于ADODB记录集对象时，计数总是1492925242。我在现有应用程序中尝试过这个，然后在一个虚拟应用程序中尝试过——总是返回相同的数字（除非没有引用，否则它是0） 下面是获取引用计数的代码： Private声明子rtlmovemory Lib“kernel32”（dest为Any，src为

VB6运行时错误372-加载控制失败的已知原因是什么？您的版本可能已过时 我有一个activceX控件，它是由几个标准windows控件和一个Far Point构建的。 该控件用于VB6桌面应用程序。我看到的行为是，在某些工作站上，这种主动控制偶尔会失败。我已确认工作站上有正确的参考资料。奇怪的是，控制不会马上失效。它将在主窗体上正常工作，但在打开另一个窗体时失败 它似乎也与运行时7内存不足错误有关。当这些错误通常发生时，任务管理器中不会显示异常的CPU或内存使用情况 似乎该问题可能与MSCOM

有VB6.0反编译器这样的东西吗 如果有这样的免费产品吗？你可以在维基的网页上试试运气。VB6编译成机器代码，所以你所能做的就是将其反汇编 有些工具声称可以解析和翻译机器代码，但我从未尝试过 VB6编译为本机EXE文件，而不是p代码。因此，您将对ASM进行黑客攻击。VB改革器和VB反编译器。它们非常易于使用。编译为机器代码是一种选择。您还可以编译为P代码。反编译P代码更合理，尽管我不知道那里的反编译器是否真的工作。我完全忘记了P代码。：）我几乎没有做过VB6编程。主要用于测试C++组件。不正确

我们有一个应用程序，它有一个“启动器”应用程序，当主应用程序在后台加载时，它有一个漂亮的UI。这两个应用程序都是用VB6编写的（叹气） 在Windows7中，如果用户锁定启动程序，我们会在任务栏上看到两个不同的图标（一个用于主应用程序，然后锁定启动程序图标）。这看起来很奇怪 我尝试过使用以下函数：到目前为止没有效果 按照文档中的建议，在弹出任何UI之前，我给了他们相同的名字（Company.Product）。如果我在launcher应用程序运行时将其锁定，则效果良好。如果我为启动器锁定可执行文件

现在我在VB6中做这件事，但我认为我在VB6中做什么并不重要，不是吗？我相信这和数学有关 这就是问题所在，看看这张图片 如图所示，有一条黑线和一个灰色圆圈。我希望圆从左下角移动到右下角，但我也希望它沿着直线的路径移动，这样它就可以到达第二张图片，如下所示： 现在我如何才能做到这一点？同样，使用VB6。我认为有多种方法可以实现这一点，但我首先想到的是。它做出了一些假设。。。就像你的直线朝正方向走，它从0,0开始。如果这两种情况都不正确，那么您需要编写更多代码来进行调整 ============

这或多或少是一个学术问题，帮助我更好地理解这个过程。。。与其说是要求了解如何绕过二进制兼容性，不如说是不需要解释为什么我不应该尝试这个：） 假设我在vb6中创建并编译了一个没有公共成员的dll。事实上，我认为它可能不允许您在没有至少一个公共方法的情况下编译，所以假设我们创建一个公共方法，但它只是为了让dll编译，否则我们将忽略它 现在假设我将项目兼容性设置为该dll，并且在任何情况下我都不会更新该dll或将兼容性更改为该dll的更新版本 在这个场景中，我认为vb6永远不会抛出那些破坏兼容性的错误

我在VB6中有一个Coolbar，它有6个带区，每个带区都有一个子工具栏类型。用户可以移动这些标注栏并设置其可见性。当软件重新启动时，我需要恢复设置，但我在恢复顺序/位置时遇到一些问题（我可以恢复可见性和宽度，没有问题） 还原时遇到问题的设置是Coolbar.Bands（Index）.Position和Coolbar.Bands（Index）.NewRow，因为这两个属性都是只读的 我知道我可以保存Position和NewRow属性，然后在运行时而不是在设计时创建每个标注栏，然后使用保存的属性确

我使用下面的代码从表中检索数据。 之后，我将结果数据绑定到网格。 问题在于速度。这个查询需要2到3分钟才能执行，而从后端执行则需要30到40秒 -----------当前代码------------------ rs.ActiveConnection = con //con is connection con.Errors.Clear rs.CursorLocation = adUseServer rs.CursorType = adOpenDynamic rs.LockType = adLoc

我在VB6中调用IcmpSendEcho来测试一个设备的以太网协议。 以太网的MTU是1500字节，所以我尝试发送1500字节，但VB6不允许我这样做。 它只允许我发送1014个字节，当我发送1014个字节时，IcmpSendEcho会给我一般失败的错误 当我发送250字节时，它工作得很好，但如果我发送的字节超过250字节，它会给我错误提示 我想不出这个问题。以太网协议最多可以处理1500字节，而我的甚至不能处理250字节。是否有任何方法来调试或解决此问题 Private Declare F

在我的VB项目中，我们使用版本为6.1.97.86的MSCOMCTL.OCX，在vbp文件参考中如下 Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0; mscomctl.ocx 当在windows 8或具有版本6.1.98.34的MSCOMCTL.OCX的pc中打开此项目时，vbp文件升级为Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}2.1}0；mscomctl.ocx 现在，当这个项目（有2

我有一个具有32（256x256、48x48、32x32、16x16）、8（256x256、48x48、32x32、16x16）和4（32x32、16x16）位图标的图标 我已经指定要在窗体和应用程序本身中使用我的图标，出于某种原因，在运行应用程序之后，在应用程序中使用图标，而不是使用漂亮的图标应用程序在所有区域使用4位图标 我碰巧发现这篇文章： 它似乎不容易解释如何创建RC和RES文件我发现最好的方法是每个图标文件只有一个图标图像。如果希望图标显示为16x16，请提供一个带有（比如）8位颜

在组件部分，我选择了一个图像查看器ACTIVEX控件，它是第三方组件。我尝试在我的应用程序中使用它，但是，每当我在工具箱窗口中单击对象并将其拖到我的窗体时，我都会收到以下消息 **License information for this component not found. You do not have an appropriate license to use this functionality in the design environment.** 现在的问题是，我确实有这个组件

我需要格式化一个固定长度的字符串。 我试图从中使用此格式函数 产出123.12 但是我想要的输出是前导空格。（下划线应为空格字符） 输出123.12 string s=“string在这里” stringline1=string.Format（“{0,27}”，s） string line2=string.Format（“{0，-27}”，string.Format（“{0，”+（（27+s.Length）/2）.ToString（）+“}”，s）） stringline3=string.For