CodeBus
www.codebus.net
Search
Sign in
Sign up
Hot Search :
Source
embeded
web
remote control
p2p
game
More...
Location :
Home
Search - vb c
Main Category
SourceCode
Documents
Books
WEB Code
Develop Tools
Other resource
Search - vb c - List
[
Other resource
]
c-gps
DL : 0
以前用VB,C#等很轻松将GPS信息解码。但是最近要使用C语言,(网上有一个VC的按位解的)苦于C操作字符串的难度,请各位大侠放出一份C代码解GPS。 我先贴上我用C解的代码,是直接将VB和C#的思路转过来的。 现在可以读出经度或纬度-before using VB, C#, etc. is easy to decode the GPS information. However, the recent use of C language, (the Internet by a VC-Solutions) cited a string C operation difficult, Please Shanhaiguan released a GPS Solution C code. I affixed my first solution with C code directly to C# and VB of the ideas turn. Can now read latitude and longitude
Update
: 2008-10-13
Size
: 4.87kb
Publisher
:
gavin
[
Windows Develop
]
VB+C
DL : 0
使用VB加C语言混合编程,对图像进行锐化和滤波. 本人原创.原理简单,适合学习.
Update
: 2008-10-13
Size
: 159.58kb
Publisher
:
dai
[
WinSock-NDIS
]
VB注册码代码示例
DL : 3
软件限时使用与注册功能的实现 众所周知,一些共享软件往往提供给使用者的是一个功能不受限制的限时使用版,在试用期内使用者可以无限制的使用软件的全部功能(只是可能会出现提示使用者注册的窗口),试用期一过部分(或全部)功能失效,要想继续使用只能向作者索取注册码(或注册文件)完成对软件的合法注册,注册后的软件将解除一切使用限制。如果您也开发出一个有价值的作品,是否也希望为自己的软件增加一个这样的功能呢?这里笔者就提供一个实现软件限时的完整代码。 软件启动后会首先运行本代码并从注册表HKEY_LOCAL_MACHINE\Software\MyProgram子键下的三个键值MyProgram1-3中读取键值数据。其中MyProgram2的值是软件首次运行日期,MyProgram3的值是软件当前运行时的日期,MyProgram1的值是软件的使用标志:如果软件在试用期内则其值为字符串sign1;如果软件试用期满则其值为字符串sign2,如果软件已经注册则其值为字符串sign3。全局变量ZHUCE依据读取的MyProgram1键值而赋值:ZHUCE=-1说明试用期满,ZHUCE=-2说明软件已注册,ZHUCE=其它值为剩余天数,您的主程序代码要依据此全局变量ZHUCE的值设计相应的交互响应。 为方便您将代码嵌入现存的程序代码中,本示例将全部代码写入一个模块.bas中(模块名随意,也可添加到已有模块中)。注意,代码中的Private Sub Main()过程为整个程序的启动入口,您需要在“工程属性”对话框中将“启动对象”设置为“Sub Main()”。 '通用模块 Global ZHUCE As Integer '说明:全局变量ZHUCE=-1试用期满,ZHUCE=-2已注册,ZHUCE=其它值为剩余天数 Declare Function RegOpenKeyEx Lib "advapi32" Alias "RegOpenKeyExA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal ulOptions As Long, ByVal samDesired As Long, ByRef phkResult As Long) As Long Declare Function RegQueryValueEx Lib "advapi32" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, ByRef lpType As Long, ByVal lpData As String, ByRef lpcbData As Long) As Long Declare Function RegCloseKey Lib "advapi32" (ByVal hKey As Long) As Long Private Sub Main()'程序总入口 Dim a As Long, rc(3) As Long, hKey As Long, KeyValType As Long, KeyValSize(3) As Long Dim c As String, h As String, tmpVal(3) As String Dim datetime As Integer datetime = 30'试用期天数 ZHUCE = -1 On Error GoTo cuowu '以下从注册表HKEY_LOCAL_MACHINE\Software\MyProgram的三个值中取出相关数据字串tmpVal(3) a = RegOpenKeyEx(&H80000002, "Software\MyProgram", 0, 131135, hKey) ' 打开注册表关键字 For a = 1 To 3: tmpVal(a) = String$(1024, 0): KeyValSize(a) = 1024: Next rc(1) = RegQueryValueEx(hKey, "MyProgram3", 0, KeyValType, tmpVal(1), KeyValSize(1)) rc(2) = RegQueryValueEx(hKey, "MyProgram2", 0, KeyValType, tmpVal(2), KeyValSize(2)) rc(3) = RegQueryValueEx(hKey, "MyProgram1", 0, KeyValType, tmpVal(3), KeyValSize(3)) For a = 1 To 3 If (Asc(Mid(tmpVal(a), KeyValSize(a), 1)) = 0) Then tmpVal(a) = Left(tmpVal(a), KeyValSize(a) - 1) Else tmpVal(a) = Left(tmpVal(a), KeyValSize(a)) End If Next a = RegCloseKey(hKey) '关闭注册表 '使用期限判断 If tmpVal(3) = "sign3" Then ZHUCE = -2: Exit Sub '查找到已注册标志sign3 If Len(tmpVal(1)) = 1023 And Len(tmpVal(2)) = 1023 And Len(tmpVal(3)) = 1023 Then '首次使用,将当前日期分别写入tmpVal(1)和tmpVal(2)中,在tmpVal(3)中写入准许运行标志sign1 CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram3", Date$, "REG_SZ" CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram2", Date$, "REG_SZ" CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram1", "sign1", "REG_SZ" ZHUCE = datetime MsgBox "试用期剩余" & Trim(datetime) & "天" Else If tmpVal(3) = "sign2" Then '查找到永久中止标志sign2中止使用 ZHUCE = -1 Exit Sub MsgBox "试用期已满,请您注册!" End If If Date datetime Then '使用期超过datetime天中止使用 '写入tmpVal(3)中止使用字串sign2 CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram1", "sign2", "REG_SZ" ZHUCE = -1 MsgBox "试用期已满,请您注册!" Else '写入当前日期于tmpVal(2)中 CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram2", Date$, "REG_SZ" ZHUCE = datetime - (DateValue(Date) - DateValue(tmpVal(1))) MsgBox "试用期剩余" & Trim(datetime) & "天" End If End If End If cuowu: End Sub 从安全保密角度出发,当您应用上述代码时紫色部分应该根据您个人的保密设想进行必要的修改(当然您也可以不修改而直接应用):①示例中的代码把软件的注册与运行信息保存在HKEY_LOCAL_MACHINE\Software\MyProgram子键下的MyProgram1-3三个键值内,请根据您个人的保密原则修改为您所需要的子键名,以隐蔽为原则!②MyProgram1键值中的数据(字符串sign1或sign2或sign3分别对应着试用/期满/注册)应根据您个人的保密设想修改成需要的字符串,也以隐蔽为原则! 主程序中当用户输入正确的注册码(注册码当然是您随意愿而设)后,请执行语句: CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram1", "sign2", "REG_SZ" 完成软件注册。(该行代码中的Software\MyProgram\MyProgram1和sign2请与上述代码保持一致!)
Update
: 2009-05-16
Size
: 17.63kb
Publisher
:
dianfeng
[
.NET/ASPX
]
Programming and Problem Solving with VB.NET
DL : 0
Visual Basic is arguably the most popular computer programming language for application development in the United States and around the world today. Visual Basic is also an excellent language to teach as a "first" computer language because of its easy-to-learn syntax and flexibility. This book treats Visual Basic as a serious programming language and not as just another Windows application. One concern that is frequently voiced when discussing the differences between Visual Basic and C++ is the level of object-oriented programming supported by Visual Basic. With the release of VB. NET, the language will support all the major features of object-oriented programming–encapsulation, inheritance, and polymorphism.
Update
: 2009-05-21
Size
: 5.45mb
Publisher
:
richardhjc
[
Books
]
VB API
DL : 0
VB API函数大全-VB API function Guinness
Update
: 2025-02-19
Size
: 973kb
Publisher
:
宋建国
[
Internet-Network
]
vb_winsock
DL : 0
c/s模式socket编程,Visual Basic代码-c/s mode socket programming, Visual Basic code
Update
: 2025-02-19
Size
: 5kb
Publisher
:
吴铁堤
[
Books
]
Excel VB 参考
DL : 0
Excel VB 参考-Excel reference VB
Update
: 2025-02-19
Size
: 1.69mb
Publisher
:
张易图
[
Books
]
VB实例
DL : 1
vb实例,内容不错-vb examples, as well
Update
: 2025-02-19
Size
: 1.83mb
Publisher
:
顾都都
[
Books
]
Visual Basic 6.0 开发宝典
DL : 1
十分不错的VB程序开发例程-very good VB Programming routines
Update
: 2025-02-19
Size
: 13.45mb
Publisher
:
黑黑子
[
Books
]
编程规范-delphi&java&vb&vc
DL : 0
delphi&java&visul c++的各种语言的编程规范,语言通俗易懂,编程高手的心得!-delphijavavisul the various standardized programming language, easily understood language, programming experts in the experience!
Update
: 2025-02-19
Size
: 60kb
Publisher
:
和平
[
Other
]
VB精华文摘-系统篇
DL : 0
学习VB的实用教材,快快下载吧!-VB practical learning materials quickly download!
Update
: 2025-02-19
Size
: 34kb
Publisher
:
dy
[
2D Graphic
]
CAD IN VB
DL : 0
VB 中实现CAD,对想开发CAD的朋友们大有帮助。-VB CAD, CAD development right to the friends who helped significantly.
Update
: 2025-02-19
Size
: 3kb
Publisher
:
梁俊
[
GPS develop
]
c-gps
DL : 0
以前用VB,C#等很轻松将GPS信息解码。但是最近要使用C语言,(网上有一个VC的按位解的)苦于C操作字符串的难度,请各位大侠放出一份C代码解GPS。 我先贴上我用C解的代码,是直接将VB和C#的思路转过来的。 现在可以读出经度或纬度-before using VB, C#, etc. is easy to decode the GPS information. However, the recent use of C language, (the Internet by a VC-Solutions) cited a string C operation difficult, Please Shanhaiguan released a GPS Solution C code. I affixed my first solution with C code directly to C# and VB of the ideas turn. Can now read latitude and longitude
Update
: 2025-02-19
Size
: 5kb
Publisher
:
gavin
[
Editor
]
vb.com
DL : 0
vb的一些小程序,有动态装入菜单,动态图片按纽,调用office.相信可以为初学着以帮助-vb some small procedures, dynamic load menu, Dynamic Photo button, Call office. believe can help to a novice
Update
: 2025-02-19
Size
: 3.07mb
Publisher
:
yanjia
[
Graph Drawing
]
vb+cad
DL : 0
vb编写的类似于CAD的应用程序源代码,非常有用!-vb prepared similar to CAD application source code, very useful!
Update
: 2025-02-19
Size
: 503kb
Publisher
:
x
[
Industry research
]
VB
DL : 0
VB精华文摘CHM版,很实用的东西。。。有需要的快下吧-VB digest the essence of CHM version, very practical things. . . There is a need to fast under the bar
Update
: 2025-02-19
Size
: 690kb
Publisher
:
高灵锋
[
Internet-Network
]
VB
DL : 0
VB界面换肤,有几十个文件!-VB interface skin, there are dozens of documents!
Update
: 2025-02-19
Size
: 308kb
Publisher
:
杨伊
[
SCM
]
VB
DL : 0
单片机开放式数控系统 使用vb编写,毕业设计作品,写的不是太好-Single-chip open CNC system
Update
: 2025-02-19
Size
: 311kb
Publisher
:
shajia
[
ActiveX/DCOM/ATL
]
VB-CAD
DL : 1
使用VB引用AutoCAD库进行二次开发。功能是通过调用图库,实现参数绘制窑炉3视图。目前还不太完善,以后能引用一种新的技术(网上有)就能更好的实现了。这个是我的毕业设计的源码。-AutoCAD using VB reference library redevelopment. By calling the library function is to realize the parameters of the furnace three view drawing. Is still not perfect, to be able to reference a new technology (available online) can be better achieved. This is the source of my graduation project.
Update
: 2025-02-19
Size
: 1.05mb
Publisher
:
zhaodanming
[
Windows Develop
]
vb
DL : 0
vb调用dll实例源码,实现vb调用c++写的dll功能(VB call DLL instance source code)
Update
: 2025-02-19
Size
: 924kb
Publisher
:
鐘点
«
1
2
3
4
5
6
7
8
9
10
...
50
»
CodeBus
is one of the largest source code repositories on the Internet!
Contact us :
1999-2046
CodeBus
All Rights Reserved.