Private Sub Command1_Click()
'需引用microsoft excel 110 object library
Dim X As ExcelApplication
Set X = New ExcelApplication
XCOUNTIF()
End Sub
vb6中用控件数组 更简单名称属性设置统一如:label1 设置完这些控件的Index属性会自动变更
那你就可以
for i = 0 to 9
label1(i)caption=i+1
next
vb中FindWindow函数可以用来返回窗体的句柄。
1、VB60中的API声明:
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
2、具体使用:
dim i as long
i=FindWindow(vbNullString,"窗体的标题")
注意:这里的vbNullString是空的,没有任何字符,即不传递。和""空字符串是不一样的!
3、例子:
有一个标题名字是计算器的窗体或软件,获取这个计算器的句柄
Option Explicit
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Sub Command1_Click()
Dim i As Long
i = FindWindow(vbNullString, "计算器")
msgbox& i '显示窗体句柄
End sub
PRINT Mid("ABCDEFG", 2, 3)
将以上语句输到立即窗口,输出BCD,
L就是长度,以上语句的意思是说,从ABCDEFG中的第2个字符起,取3个字符出来
Private Sub Form_Load()
MsgBox SSWR("1123456", 6)
End Sub
Function SSWR(x As String, n As Integer) As Double
If Mid(x, InStr(x, "") + n, 1) >= 5 Then
x = Left(x, InStr(x, "") + n - 1) + (1 / (1 10 ^ (n - 1)))
Else
x = Left(x, InStr(x, "") + n)
End If
SSWR = x
End Function
http://wwwibook8com/book/vbhtm
VB编程工具
Visual Basic 60简体中文版 Visual Basic 60绿色精简版 MSDN VB6精简版
VB入门教程
VB程序设计系列教程 VB 趣味例程 VB6实例教程
中文VB6傻瓜书 VB最简单入门教程 VB 60中文版范例入门与提高
VB初哥教学 VB编程标准 看实例学VB 60
VBNET学习教程 VBNET控件时尚编程百例 VB 中文版实用培训教程
VB经典编程 VB6循序渐进教程 VB 60 中文版教程
VB_NET实例解析与应用编程 VBNET中高级篇 VB精彩编程200例
VB超级教程 VB API函数大全 Visual Basic 60实例教程
VB 60数据库开发学习教程 VBNET数据库编程从入门到精通 VB60入门提高
21天学通Visual BasicNET Visual BasicNET实用全书 Visual BasicNET学习范本
Visual BasicNET培训教程 Visual Basic实用编程标准 VB学习教程
VB的控件的学习
VB编程开发技术
COM+与VB6分布式应用程序设计 Visual Basic 插件开发人员指南 VBNET高级开发指南
VBNet高级编程 VBNET 面向对象可重用组件开发 Visual Basic精彩编程200例
VBNet多媒体编程 VBNET高级程序员指南 Visual BasicNET GDI+技术教程
VBNet控件应用编程实例教程 VBNET XML Web开发人员指南 VB和SQL Server编程指南
用VBNET开始AspNET11的开发 VB 游戏编程学习系统 Visual BasicNET 编码技术
VBNET面向对象CLASS的实现 VBNET应用集锦例程 VBNET实例解析应用编程
Visual BasicNet与动态网页技术 VB6开发宝典 VB系统资源
VB 例程序讲解 VBNET数据库开发实例 VBNET与数据库开发教程
VB语言程序设计 VBNET面向对象的实现 Visual Basic 60应用编程150例
Visual BasicNET项目开发实践 Visual Basic 60 开发宝典 Visual Basic 60网络编程
Visual Basic60企业级应用程序开发 Visual Basic60数据库程序设计 Visual Basic NET程序设计基础
Visual BasicNET数据库开发教程 Visual Basic 6 循序渐进教程 VB游戏编程21天自学通
Visual BasicNET进销存程序设计 Visual Basic程序设计导学 Visual BasicNET技术内幕
VBNET和SOL Server 2000高级编程 利用VB设计打印复杂报表 Visual BasicNET编程基础
Visual Basic60元件程序开发指南 VBNet网络数据库整合应用 Visual Basic或C#创建WS
Visual BasicNET程序设计与应用
VB开发手册与指南
VBNet与ASPNet代码手册 VB 60中文版语言参考手册 VB编程经验手册
VB API 函数使用手册 VBA高级开发手册 VB速查手册之技巧篇
VBNET Remoting 技术手册 VBNet调试技术手册 Visual Basic 60 组件工具指南
VBNet字符串和正则表达式参考手册 VBScript语言参考 VB6程序设计参考手册
VB技巧问答10000例 VB5 开发WEB数据库指南 VBscript英文帮助手册
VB6控件参考手册 VB6语言参考手册 VB6程序员指南
VB5开发WEB数据库指南 VBA 高级开发指南 VB中文版实用参考手册
VB编程经验手册 VB6组件工具指南 Visual Basic API函数参考手册
Visual Basic 60实用参考手册 Vsual Basic 60 控件参考手册 Visual BasicNET类设计手册
Visual BasicNET 语言参考手册 Visual Basicnet 反射参考手册 Visual Basicnet线程参考手册
Visual Basic编程经验手册 Visual BasicNet专家指南 Visuai BasicNET编程培训教程
VB速查手册之技巧篇 VBscript英文帮助手册
VB其它相关资源
VBSCRIPT函数方法速查 Visual Basic 第三方控件大全 Visual Basic 语言参考-函数速查
Access 2003 VBA 程序员参考书 VB、C快速进阶 V30 VB系统资源
VB Script语言参考 VB编程技巧集 VBScript 教程及语言参考
VBScript与JScript实例教程 VB精华文摘 Visual Basic 术语解释
VB常用函数 VBScript学习 VB学习一点通
VB Script基础 VBScript 帮助手册 Visual Basic 常用数值算法集
VB视频相关
VB编程与应用(电大)29讲 编程经典Visual Basic 用多媒体学Visual Basic
电子科大--- VB程序设计 VBnet多媒体教学
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)