vb
Hustudent20080101
MFC Qt 瑞萨 ARM Linux
展开
-
vb 类型符
数值型: %整型 &长整型 !单精度型 #双精度型 VB的标准数据类型数据类型关键字类型符前缀存储空间范围数值数据类型字节型Byte Byt1 个字节0 到 255整型Integer%Int2 个字节-32,768 到 32,767长整型Long&Lng4 个字节-2,147,483,648 到 2,147,483,647单精度型Single!Sng4 个字节负数:-3.402823E转载 2012-05-02 14:16:49 · 1820 阅读 · 0 评论 -
VB定义接口
VB定义接口 标签: vbfunctioninterfacebuttonexe2011-12-31 14:02 1175人阅读 评论(0)收藏举报本文章已收录于:本文来自:http://www.cnblogs.com/guoxinliu_917/archive/2009/03/20/1418013.html1. 新建一个VB EX转载 2016-05-06 11:09:41 · 551 阅读 · 1 评论 -
获取对象的接口信息(方法/属性/事件)(VB6代码)
获取对象的接口信息(方法/属性/事件)(VB6代码)作者:admin 日期:2009-06-29字体大小: 小 中 大要不是WS的超级绿豆提起这东西,我还不知道呢....真是个好玩意!!能列出一个对象的接口,包括方法,属性,事件.....微软直接做了啊.记录一下,以后要用到时免得忘了:复制内容到剪贴板 程序代码Option Exp转载 2016-05-06 11:11:43 · 808 阅读 · 0 评论 -
在VB6下如何实现继承,重载和多态----DynamicClassFactory
在VB6下如何实现继承,重载和多态----DynamicClassFactory (一)[问题点数:100分] 不显示删除回复 显示所有回复 显示星级回复显示得分回复 只显示楼主 收藏 账号:zzz1117昵称:zzz1117关注 博客空间最新帖子:让你的VB动态起来——EnjoyVBLib...让您在 V转载 2016-05-06 11:25:49 · 1302 阅读 · 0 评论 -
Public Function Merge2(rng As Range, splitter As String) As String
Public Function Merge(rng As Range, splitter As String) As String'Merge = ThisWorkbook.NameDim Str As StringStr = ""Dim n As RangeFor Each n In rng Str = Str & n.Value & splitterNext n转载 2016-05-31 15:38:18 · 507 阅读 · 0 评论 -
Public Function MyReplace(rng As Range
Public Function MyReplace(rng As Range, strFrom As String, strTo As String) As String'Merge = ThisWorkbook.NameDim Str As StringStr = ""Dim n As RangeFor Each n In rng If n.Value转载 2016-06-01 18:54:55 · 632 阅读 · 0 评论 -
ADODB.Connection对象的Execute方法
ADODB.Connection对象的Execute方法 2014-03-10 11:53 3801人阅读 评论(0)收藏举报本文章已收录于:通常 应该这样用conn.execute(sql) ,conn也就是一个ADODB.Connection对象的实例。ADO是Active Data Object的缩写,称为A转载 2016-11-03 19:30:51 · 697 阅读 · 0 评论 -
vb中函数的调用与参数的传递
VB中的Type/With和For Each……Next 不同模块过程的调用、菜单的编辑vb中函数的调用与参数的传递 2010-12-14 20:44:59| 分类:技术应用 | 标签:|举报|字号大中小 订阅 用微信 “扫一扫”将文章分享到朋友圈。转载 2016-11-04 14:07:17 · 1843 阅读 · 0 评论 -
VB6.0实现读写配置文件(*.ini文件)
VB6.0实现读写配置文件(*.ini文件)2013-11-08 HydroLIB 文章来源'声明:Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationNa转载 2016-11-04 16:19:02 · 7331 阅读 · 0 评论 -
VB字符串处理函数一览
VB字符串处理函数一览2012-01-04 chinablank 文章来源mid(字符串,从第几个开始,长度) ByRef在[字符串]中[从第几个开始]取出[长度个字符串] 例如 mid("小欣无敌",1,3)则返回 "小欣无" instr(从第几个开始,字符串1,字符串2) ByVal 从规定的转载 2016-11-05 11:13:51 · 1538 阅读 · 0 评论 -
VB6.0调用SetTimer实现定时器
VB6.0调用SetTimer实现定时器Timer.bas:Option ExplicitDeclare Function SetTimer Lib "user32" (ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) A转载 2016-11-07 16:33:16 · 3477 阅读 · 0 评论 -
【VB6】实现VB6中类的静态方法
【VB6】实现VB6中类的静态方法标签: vbclass类静态函数2016-02-13 19:52 303人阅读 评论(0)收藏举报本文章已收录于:分类: VB(16) 作者同类文章X版权声明:本文为博主原创文章,未经博主允许不得转载。目录(?)[+]原创文章转载 2016-11-07 17:32:43 · 882 阅读 · 1 评论 -
vb 引用adodb问题
vb 引用adodb问题工程--引用 后为什么工具箱上没有显示ADODB的控件呢?用ADODB如何链接Access啊?一楼错的,是工程-引用中的,但是引用后在工具箱上看不到控件啊鋒聲瀟瀟| 浏览 6794 次2010-04-04 17:10 |举报描述不清违规检举侵权投诉我有更好的答案可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资转载 2016-11-07 19:06:21 · 994 阅读 · 0 评论 -
VB中Execute的用法
VB中Execute是指ADO命令之一:Execute 方法。Execute 方法,执行在 CommandText 属性中指定的查询、SQL 语句或存储过程。语法对于按行返回的 Command:Set recordset = command.Execute( RecordsAffected, Parameters, Options )对于不按行返回的 Comma转载 2016-11-07 19:27:32 · 6611 阅读 · 1 评论 -
vb6中用new创建的对象是否要delete呀?
vb6中用new创建的对象是否要delete呀?比如Dim rs As New ADODB.Recordset操作完成后,是否需要Delete rs之类的代码? magic7004| 浏览 1427 次2008-10-21 19:03 |举报描述不清违规检举侵权投诉我有更好的答案可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整转载 2016-10-31 13:22:53 · 736 阅读 · 0 评论 -
VB ListView控件各种操作详解
VB ListView控件各种操作详解 2013-11-30 12:45 13809人阅读 评论(0)收藏举报本文章已收录于:分类: VB(81) 作者同类文章X[vb] view plain copy print?Private Sub Form_Load()转载 2016-12-15 14:18:58 · 797 阅读 · 0 评论 -
vb6不支持多重接口继承
VB6 如何实现多重接口继承 [问题点数:20分,结帖人xxyj6450]不显示删除回复 显示所有回复 显示星级回复显示得分回复 只显示楼主 收藏 取消关注关注xxyj6450三断笛 本版等级:本版专家分:4084 <dd title="用户结帖率:97.53%总发帖:162正常结帖:158未结帖:4"转载 2016-05-06 10:48:23 · 869 阅读 · 0 评论 -
VB6 如何实现多重接口继承
发表于: 2009-09-20 11:11:05 直接来代码Visual Basic code?12345678910111213141516'类C1public sub C() end Sub '类C2Implements C1public转载 2016-05-06 10:45:41 · 1032 阅读 · 0 评论 -
数据库记录的增、删、改
n数据库记录的增、删、改操作需要使用AddNew、Delete、Edit、Update和Refresh方法。n它们的语法格式为: 数据控件.记录集.方法名1.增加记录 ①调用AddNew方法。 ②给各字段赋值。给字段赋值格式为: Recordset.Fields(”字段名”)=值。 ③调用Update方法,将缓冲区内的数据写入数据库。转载 2012-05-02 12:24:06 · 1975 阅读 · 0 评论 -
执行Matlab命令
用VBScript来控制MATLAB的尝试 Set matlab=WScript.CreateObject("Matlab.Application")matlab.visible=falsematlab.execute("t=0:0.1:2*pi;y=sin(t);plot(t,y)")matlab.execute("pause(5)")matlab.qu转载 2012-05-05 14:00:23 · 950 阅读 · 0 评论 -
设置墙纸
'Download by http://www.codefans.netPrivate Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" _ (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, _转载 2012-05-04 09:46:49 · 612 阅读 · 0 评论 -
托盘控件
VERSION 5.00Begin VB.UserControl 托盘控件 BackStyle = 0 '透明 CanGetFocus = 0 'False ClientHeight = 885 ClientLeft = 0 ClientTop = 0 ClientWidth转载 2012-12-09 22:02:57 · 704 阅读 · 0 评论 -
UserControl1练习
'缺省属性值:Const m_def_TimeFormat = "hh-mm-ss"'属性变量:Dim m_TimeFormat As String'注意!不要删除或修改下列被注释的行!'MappingInfo=Timer1,Timer1,-1,IntervalPublic Property Get Interval() As Long Interval = Timer1.原创 2012-12-10 09:57:29 · 613 阅读 · 0 评论 -
PropertyBag对象实现数据连续操作
为了将数据保存到PropertyBag对象,可以先建立一个对象新的实例。使用WriteProperty方法来保存数据,这一方法包含有三个参数:识别属性的字符串,属性的数值,一个缺省数值。如果属性的数值与缺省数值相同时,属性的数值将不会被保存。其范例如下: Dim objPB As PropertyBag Dim strValueToPersist As String strVa转载 2012-12-10 10:05:47 · 1448 阅读 · 0 评论 -
COM 组件设计与应用(二)——GUID 和 接口
COM 组件设计与应用(二)——GUID 和 接口发布日期:2005-06-21 16:36浏览次数:3069次标 签:COM文章概要:书接上回,话说在 doc(Word) 复合文件中,已经解决了保存 xls(Excel) 数据的问题了。那么,接下来又要解决另一个问题:当 WORD 程序读取复合文件,遇到了 xls转载 2012-12-10 08:35:33 · 767 阅读 · 0 评论 -
[VB]UserControl中的主要事件
[VB]UserControl中的主要事件用VB创建ActiveX控件避不可免地与UserContro1打交道,准确理解其含义是保证程 序正确运行的关键。以下结合本人的经验,简要地解释VB5中UserControl的主要事件, 借此与大家交流: ◆ Initia1ize Event 在控件的实例被创建或重新创建时发生,它总是控件实例生命周期内的第一个事件转载 2012-12-10 08:40:27 · 2730 阅读 · 0 评论 -
PropertyBag
Dim objPB As PropertyBagDim strValueToPersist As StringPrivate Sub Command1_Click()strValueToPersist = "TestingPersist"Set objPB = New PropertyBagCall objPB.WriteProperty("PersistValue", str转载 2012-12-10 10:55:44 · 1716 阅读 · 1 评论 -
Dim MyPropBag As PropertyBag
'缺省属性值:Const m_def_TimeFormat = "hh-mm-ss"'属性变量:'Dim m_TimeFormat As StringDim MyPropBag As PropertyBag'注意!不要删除或修改下列被注释的行!'MappingInfo=Timer1,Timer1,-1,IntervalPublic Property Get Interval()原创 2012-12-10 11:32:08 · 915 阅读 · 2 评论 -
Declare Function GetVersion Lib "kernel32" Alias "GetVersion" () As Long
GetVersionVB声明Declare Function GetVersion Lib "kernel32" Alias "GetVersion" () As Long说明判断当前运行的Windows和DOS版本返回值Long,低16位包含了windows版本;低字节包含了主版本号(3代表windows 3.10,4代表nt 4.0);高字节包含了两个数位的转载 2013-04-22 08:21:25 · 1022 阅读 · 1 评论 -
Function Merge
Public Function Merge(rng As range, splitter As String) As String'Merge = ThisWorkbook.NameDim Str As StringStr = ""Dim n As rangeFor Each n In rng Str = Str & n.Value & splitterNext n原创 2016-05-25 19:03:53 · 439 阅读 · 0 评论 -
VB6实现真正的继承【转】
VB6实现真正的继承【转】MSDN中有. 代码重用的许多(内部)方面有两种主要的代码重用窗体—二进制和源代码。二进制代码重用,是通过创建和使用一个对象来实现的,而源代码重用,则是通过继承来实现的— Visual Basic 不支持。(源代码重用也可以通过复制和修改源代码来实现,但这种技术没有什么新意,而且存在许多人所共知的问题。)Visual Basic 已成为二进转载 2016-05-06 10:41:39 · 761 阅读 · 0 评论 -
Win7系统下解决VB6.0鼠标滚轮支持
Win7系统下解决VB6.0鼠标滚轮支持首先,请看一篇转帖:原帖地址:http://tieba.baidu.com/p/1969613735不知道阅读这篇帖子的朋友有没有遇到跟在下一样问题:VB6.0没有内置加载项来提供鼠标滚轮支持的功能。如果代码量少的话还能将就,要是碰到几百行的代码简直是无法忍受的。于是百度一下有没有这样的东西,结果还真找到了。原来人家微软也发现了VB这转载 2016-12-20 10:33:26 · 647 阅读 · 0 评论