Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
本次更新主要是针对高端用户的,普通用户了解一下如何在全局代码中定义变量即可(绿色字体部分):
1、增加了引用外部库的功能(这里必须是托管的DLL,也就是.net下编译的DLL),对于非系统的DLL文件,以前库文件只需复制到Foxtable目录下即可,现在除了复制,还得引用;除了引用的功能,还增加了命名空间的定义。以lxl斑竹提供的库为例:
一旦加上了引用,就可以直接在代码中使用改库的功能:
Dim app As New Office.Excel.Application
Dim book As Office.Excel.Workbook = app.Workbooks.Open("C:\112.xls")
Dim sheet As Office.Excel.Worksheet = book.Sheets.Item(1)
app.Visible = True
sheet.PrintPreview()
book.Close()
app.Quit()
2、增加全局代码的功能:
你可以在这里定义API函数,例如:
Declare Function getUserName Lib "advapi32.dll" Alias "GetUserNameA" _
(ByVal lpBuffer As String, ByRef nSize As Integer) As Integer
<DllImport("kernel32.dll", CharSet:=CharSet.Ansi, CallingConvention:=CallingConvention.Cdecl)> _
Public Function lstrlenA(ByVal InString As String) As Integer
End Function
如果不是系统的,而是第三方的DLL,请事先将其复制到foxtable目录下。
一旦定义了,就可以直接在任何地方使用上面的API函数,例如:
Return lstrlenA("ABC")
Foxtable的全局变量定义和使用都不便利,而且不是所有的事件都能引用,现在你可以在全局代码中定义变量,用Public代替Dim,这样定义的变量可以在任何事件代码中引用,例如:
Public gbStartDate As Date
Public gbEndDate As Date
这样就定义了两个日期型全局变量,分别为gbStartDate 和 gbEndDate ,你可以在任何事件代码中直接使用,例如:
MessageBox.show("起始日期:" & gbStartDate)
为了避免全局变量和事件中定义的变量出现名称冲突,建议全局变量统统用gb开头。
全局代码中不仅可以定义变量和API函数,还可以直接定义过程或者函数,例如:
Public Function LenStr(ByVal val As String) As Integer
Dim b() As Byte = System.Text.Encoding.ASCII.GetBytes(val)
Return b.Length
End Function
定义好之后,你可以在任何事件代码中使用这个函数:
MessageBox.show(lenstr("ren们"))
3、虽然原有的全局变量不够便利,但是可以绑定,而且有事件跟踪其值的变化,所以不仅不会淘汰的,还增加了一个统一定义的界面:
先顶起再说。
从这个版本开始,你可以研究你的加密狗了。
让对方提供Dll库以及vb.net使用的例程即可。
从这个版本开始,你可以研究你的加密狗了。
让对方提供Dll库以及vb.net使用的例程即可。
谢谢,样狗已经备齐,学到一些知识,就是没有深入研究,现在好了,在此表示感谢!
狐表成为真正的开发工具,从今天开始,这个日子是狐表成长史上的一个重要里程碑!
我顶