VB6.0模块和类模块区别
①.模块 Module1.bas代码： 调用示例： ②类模块 Class1.cls代码： 调用示例： 小结 模块中的公有函数、子过程可以直接调用，而类模块中的公有函数、子过程必须由类实例对象来调用！
分类：Win编程
共 358 篇foreach+Control.Controls无法一次性移除所有子控件解决方法
使用foreach+Control.Controls移除所有Button： 结果发现只移除了10个，界面还剩下10个！改用for循环： 结果同上，正确的代码应为： 究其原因，应是调用Remove或RemoveAt方法时，也改变了Controls内容所致，做个测试： 结果： i值：0， Controls.Count值：20， 移除：button1 i值：1， Controls.Count值：19， 移除：button3 i值：2， Controls.Count值：18， 移除：button5 i值：3， Controls.Count值：17， 移除：button7 i值：4， Controls.Count值：16， 移除：button9…
托盘气球提示示例
代码如下：
VB6.0 获取指定文件夹下的文件[夹]
'说明：获取指定文件夹的子文件夹 '参数： ' path:字符串,指定的文件夹路径 ' searchOption:布尔值,True 所有子文件夹; False 当前文件夹的子文件夹 '返回值：数组 '注意：数组第1项（GetFolders(0)）始终为空,应从第2项（GetFolders(1)）开始计算 Public Function GetFolders(path As String, searchOption As Boolean) As String() ReDim result(0) As String Dim arr() As String Dim i, j …
VB6.0函数返回数组示例
调用示例：
VB6.0 Dictionary排序
参考： ·排序的 String 类型的值的数据填充的脚本字
VB6.0 ListView控件添加数据
1).怎么获取选中行文本？
VB6.0 MSHFlexGrid控件添加数据三种方法
1.绑定到数据源 2.使用AddItem方法添加数据 3.逐一单元格添加数据 说明：添加部件"Microsoft Hierarchical FlexGrid Control 6.0 (OLEDB)"才能使用MSHFlexGrid。
淘宝网开放平台API(taobao.items.all.get)调用示例
using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Xml; using System.Net; using System.Web.Security; using System.IO; using System.Text.RegularExpressions;…
VB6.0读取XML示例
Option Explicit Private Sub Form_Load() '需引用 Microsoft XML, v6.0 Dim xmlDoc As DOMDocument Dim nodeList As IXMLDOMNodeList Dim node As IXMLDOMNode On Error Resume Next Set xmlDoc = New DOMDocument xmlDoc.loadXML ("<xml><website><domain>mzwu.…