VB
文章平均质量分 54
greatbody
I am an coder
展开
-
[vb]VB文字编码与Windows记事本的探究
1、微软的记事本程序的问题微软的记事本,在保存文件的时候,会默认保存成ANSI格式。网传在记事本中输入“联通”后,不加修改就直接保存为默认的ANSI格式,之后打开就是乱码。测试结果显示,输入“联通”默认保存后,字节内容是:193,170|205,168如果按照UNICODE保存“联通”两个字,从记事本保存的文件中,可以提取出的字节序列是:255,254|84,128|26,144原创 2013-03-01 16:10:34 · 1049 阅读 · 3 评论 -
【VB6】使用VB6创建和访问Dom树【爬虫基础知识】
使用VB6创建和访问Dom树我们知道,在VB中一般大家会用WebBrowser来获取和操作dom对象。 但是,有这样一种情形,却让我们纠结不已: 我们需要做爬虫,然后爬虫不需要太高的效率,但是我们被复杂的正则表达式给弄的头晕眼花。 不知道何去何从。今天,下定决心研究下html的解析,终于掌握了对IHTMLDocument等接口对象的使用。源代码放在:http://www.extencent.c原创 2015-06-07 20:59:21 · 2388 阅读 · 0 评论 -
【转载】MP4文件数据结构以及提取部分信息的代码
原文链接:http://bbs.pfan.cn/post/413874.htmlMP4文件数据结构以及提取部分信息的代码一、名词解释track:音轨,它是样本的集合,对于媒体数据来说,音轨表示一个视频或音频序列。hint track:索引音轨,这个特殊的音轨并不包含媒体数据,而是包含了一些将其他数据音轨打包成流媒体的指示信息。如果文件只是本地播放,可以忽略索引音轨,因为它们只与流媒体有关系。本文转载 2016-09-24 21:49:59 · 1045 阅读 · 0 评论 -
VB6存取UTF-8文件
目录目录功能介绍代码演示功能介绍这个代码可以将VB变量的Unicode字符存为UTF-8格式的文本文件。代码演示'工程要引用 Microsoft ActiveX Data Objects 2.8,下面两个通用方法建议放在模块中Public Sub SaveAsUTF8(ByVal Text As String, ByVal FileName As String) Dim oStream转载 2016-07-31 12:53:30 · 3896 阅读 · 0 评论 -
【VB6】实现VB6中类的静态方法
原创文章,欢迎支持 在VB的使用过程中,较为高级和较为具有兼容性的编程方式是创建类模块。比如创建了一个数组创建类,专门用来创建特定类型的数组,它被存在一个“ArrayHelper.cls”文件中。代码如下:Option Explicit'///////////////////'@@summary'@@require'@@reference'@@license'@@author'@原创 2016-02-13 19:52:09 · 3717 阅读 · 0 评论 -
【VB6】VB6类库项目中的Persistable
原文链接:https://msdn.microsoft.com/en-us/library/aa268076(v=vs.60).aspx转载内容:Visual Basic ReferenceVisual Studio 6.0Persistable PropertySee Also Example Applies To原创 2016-02-13 17:53:43 · 1334 阅读 · 0 评论 -
【VB6】VB6类库项目中的MTSTransactionMode
原文链接:https://msdn.microsoft.com/en-us/library/aa227438(v=vs.60).aspxIntroductionAt the beginning of Chapter 11, "Using ActiveX DLLs from WebClasses," I discussed how WebClasses don't hav原创 2016-02-13 17:32:20 · 852 阅读 · 0 评论 -
【VB6】VB6类库项目中Instancing属性
来源页面:https://msdn.microsoft.com/en-us/library/aa234184(v=vs.60).aspx引用内容如下:Visual Basic ReferenceVisual Studio 6.0Instancing PropertySee Also Example Applies To原创 2016-02-13 16:38:03 · 2055 阅读 · 0 评论 -
【VB6】文件拖拽技术
关键词:VB,文件,拖拽接下来介绍的技术可以用于文件拖拽。文件拖拽的例子很多,比如你用QQ的时候,将文件拖拽到聊天窗口就进入了文件传输的窗口现在开始:接收对象首先,我们这次让ListBox接受文件的拖入1.配置ListBox 属性 值 OLEDragMode 0 - Manual OLEDropMode 1 - Manual2.创建事件处理Private Sub List1_原创 2015-06-07 22:05:56 · 3756 阅读 · 0 评论 -
【VB6】动态创建RichTextBox
据说动态创建RichTextBox是有问题的,需要用特殊的技巧。这里找了一个验证有效的,贴出来,供参考:Set objRTB = Controls.Add("RICHTEXT.RichtextCtrl.1", "rtxt")原创 2015-01-10 21:25:19 · 1069 阅读 · 0 评论 -
VB6高精度计时类模块
创建一个类模块,粘贴如下代码:'大整数结构体Private Type LARGE_INTEGER LowPart As Long HighPart As LongEnd Type'获取时间计数器计数值Private Declare Function QueryPerformanceCounter _ Lib "kernel32" (原创 2015-01-07 23:59:10 · 2233 阅读 · 0 评论 -
【VB.NET2010】注册表写入方法
这里,以添加启动项为例: Private Sub SetAuto_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SetAuto.Click 'ok at 13-08-13 设置开机自动启动 Dim kReg As RegistryKey M原创 2013-08-16 21:26:47 · 2458 阅读 · 0 评论 -
【VB.NET2010】遍历进程,获取进程映像路径
在VB.NET中,我们可以轻易的获取系统中正在运行的进程的名字,路径等数据。而不需要像VB6中一样使用一大堆的API函数。下面是我某个程序中的一段代码,用来将进程名显示在一个列表框中 Sub UpdateCurrentTask() 'ok at 13-08-12 负责在独立线程实时更新正在运行的线程的变化【完成】 '负责更新显示的进程 Dim kPro原创 2013-08-17 09:58:32 · 3327 阅读 · 0 评论 -
【SQL】查询重复人名的次数并列出
select count(姓名) as 重复次数,姓名from 某表 group by 姓名order by 重复次数 asc原创 2013-08-16 00:08:24 · 5387 阅读 · 6 评论 -
VB简单堆栈类的实现
Private Stack() As StringPrivate itemCount As LongPrivate Sub Class_Initialize() ReDim Stack(0)End SubPublic Sub Push(ByVal inString As String) ReDim Preserve Stack(itemCount + 1) Stac原创 2013-04-21 19:09:31 · 1841 阅读 · 0 评论 -
VB利用堆栈实现表达式计算
VB利用堆栈实现表达式计算 前几天对上学期老师的课件进行了深入学习后,我觉得有必要写个程序实践下,验证表达式计算设计十分正确。于是诞生了如下的程序。 需要说明一点,这里的代码都是自主设计的,未参考网上的任何代码,所以,此代码拥有完全自主知识产权。 版权所有,转载请注明出处:SunSoftForm1.frm文件内容:VERSION 5.00Beg原创 2013-04-22 20:07:58 · 1633 阅读 · 0 评论 -
【VB6】实现哈夫曼编码
Private ContentString As StringPrivate ItemCount As LongPrivate Nodes() As NodePrivate Type Node preID As Long leftID As Long leftValue As Long rightID As Long rightVa原创 2013-04-27 14:54:12 · 1307 阅读 · 0 评论