pb調用VB寫的DLL方法
1、先把VB编译好的DLL文件放到系统的SYSTEM32文件夹下
2、用regsvr32注册这个DLL文件
3、Pb下调用
oleobject ole_1
ole_1=create oleobject
long ll_ret
ll_ret=ole_1.connecttonewobject( 'add.addstring ')//其中add为VB的工程名，addstring为VB的类模块名
string ls_message,ls_first,ls_second
ls_first= "你好 "
ls_second= ",我是嘘嘘兔! "
ls_message=ole_1.add(ls_first,ls_second) //这个add为vb中声明的函数
messagebox( ' ',ls_message)
相关文档：
Dim strPath As String = Server.MapPath("~\文件夹")
'判断保存文件路径是否存在 不存在则创建
If Not Directory.Exists(strPath) Then
Directory ......
Private Function NMoneyToSMoney ( NMoney As Variant ) As String
If IsNumeric ( NMoney ) = False Then
NMoneyToSMoney = "不是数字� ......
上午:
VB总结：
下图是用mindmanager制作的VB总结mdb：
常用控件的分类：
属性和过程：
方法和过程
事件过程、Function过程和过程：
VB总结大图：
分歧如下：
数据包括：数据类型、变量、常量、运算符、表达式等几部分，而流程控制语句应不应该加入其中。
我感觉不应该，用“冰块模子&rdquo ......
本文引自。感谢原创！http://useway.blog.51cto.com/736087/176913
VB无所不能之三：VB截获Windows消息的钩子
——作者：钟声
博客地址：http://useway.blog.51cto.com
VB一直被认为是一个可以通过简单的方法，完成Windows界面应用程序的一个语言。对Windows系统方面的编程似乎首 ......
这里是 利用replace 函数 在vb中实现 消除空行的一个程序
这里的容器是richtext
可以扩充到其他容器 和其他字符 用于编写查找替换功能
'--------------------------------------------------------------------------------------------
' 消除空行 , 利用instr函数, 搜索文本里的vbcrlf(回车 + 换行), 两个回车替换 ......
