VB ExeCuteLine
来源:互联网 发布:淘宝紫米商学院怎么样 编辑:程序博客网 时间:2024/03/29 09:04
这段代码是我无意中在网上发现的,虽然代码很短,但其所实现的功能却是很强大的.有了这个函数的帮助可以使我们程序的灵活性大大的提升,但编码难度会有一定提高,所以请慎用.
Private Declare Function EbExecuteLine()Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Unknownn1 As Long, ByVal Unknownn2 As Long, ByVal fCheckOnly As Long) As Long
Private Function ExecuteLine()Function ExecuteLine(sCode As String, Optional fCheckOnly As Boolean) As Boolean
ExecuteLine = EbExecuteLine(StrPtr(sCode), 0&, 0&, Abs(fCheckOnly)) = 0
End Function
ExecuteLine "VB 命令"
Private Function ExecuteLine()Function ExecuteLine(sCode As String, Optional fCheckOnly As Boolean) As Boolean
ExecuteLine = EbExecuteLine(StrPtr(sCode), 0&, 0&, Abs(fCheckOnly)) = 0
End Function
ExecuteLine "VB 命令"
这个函数可以把一个字符串当做VB代码并执行.
例如
ExecuteLine "MsgBox ""Hello World"" "
- VB ExeCuteLine
- VB
- VB
- VB
- VB
- vb
- vb
- VB
- VB
- vb
- VB
- vb
- VB
- vb
- vb
- VB
- vb
- VB
- 用Ajax 1.0制作一个按钮提交后UpdatePanel动画
- VisualStudio2005技巧集合--打造自己的CodeSnippet
- 遍历文件夹
- 转一首普希金的诗,给郁闷的日子煽煽情!
- DataGrid的双向排序
- VB ExeCuteLine
- 调用约定(calling convention)(转)
- WebLogic中SQL Server2000的JDBC Pool配置
- IIS 服务器的权限检查
- 一个比较不错的JS时间控件
- 9210的Micaps第15类调色板数据
- StreamWriter输出中文乱码
- 深入浅出VA函数的使用技巧
- 一个完整的DLL远程注入函数