1.VB编写屏幕锁问题
2.求: VB远程(屏幕)控制 源代码 或文档
3.VB 加密与解密的程序代码

VB编写屏幕锁问题

       思路：1.把程序加入自启动，锁定s锁启动就检查有无记录锁屏的屏幕屏文件，若没有则自己退出，源码机构和主力指标源码若有则锁屏

        2.如果需要锁屏则创建一个文件用来记录解锁次数

        3.程序启动后锁屏，锁定s锁如果输入密码正确或者次数为解屏，屏幕屏dssm推荐源码如果不正确解锁次数加1，源码几何拼图源码并且继续锁屏。锁定s锁

        我之前写了一个用U盘解锁的屏幕屏程序，就是源码这样实现的。至于锁屏无非是锁定s锁屏蔽快捷键和任务管理器这类的，如何实现可以自己去摸索。屏幕屏

求: VB远程(屏幕)控制 源代码 或文档

       可在此下载

       /down/soft/.shtml

       远程控制VB代码

        运行平台 Win9x WinNT Win WinME WinXP

        授权形式 免费

        软件评级 ★★★

        更表日期 -7-6 ::

        软件大小 KB

        下载次数 本周： 总计：

        制作公司 不详

        下载地址

        软件简介 vb远程控制代码，源码用了winsock来控制，锁定s锁定点喝酒源码实现了一些控制，屏幕屏供大家学习

        黑客软件点评

VB 加密与解密的程序代码

       Private Function JiaMi(ByVal varPass As String) As String '参数varPass是需要加密的文本内容

       Dim varJiaMi As String *

       Dim varTmp As Double

       Dim strJiaMi As String

       Dim I

       For I = 1 To Len(varPass)

       varTmp = AscW(Mid$(varPass,源码摇奖器源码 I, 1))

       varJiaMi = Str$(((((varTmp * 1.5) / 5.6) * 2.7) * I))

       strJiaMi = strJiaMi & varJiaMi

       Next I

       JiaMi = strJiaMi

       End Function

       è§£å¯†å‡½æ•°ï¼š

       Private Function JieMi(ByVal varPass As String) As String '参数varPass是需要解密的密文内容

       Dim varReturn As String *

       Dim varConvert As Double

       Dim varFinalPass As String

       Dim varKey As Integer

       Dim varPasslenth As Long

       varPasslenth = Len(varPass)

       For I = 1 To varPasslenth /

       varReturn = Mid(varPass, (I - 1) * + 1, )

       varConvert = Val(Trim(varReturn))

       varConvert = ((((varConvert / 1.5) * 5.6) / 2.7) / I)

       varFinalPass = varFinalPass & ChrW(Val(varConvert))

       Next I

       JieMi = varFinalPass

       End Function

       æ³¨æ„äº‹é¡¹

       ç¼–写加密程序，将用户输入的一个英文句子加密为加密字符串，然后输出加密字符串。假设句子长度不超过个字符。

       æ ¹æ®ç»™å®šçš„句子加密函数原型SentenceEncoding，编写函数SentenceEncoding调用给定的字符加密函数CharEncoding完成句子加密。

       ç„¶åŽï¼Œç¼–写主程序提示用户输入英文句子，然后调用函数SentenceEncoding对句子加密，最后输出加密后的句子。

       å­—符加密规则为大写字母和小写字母均加密为其补码, 我们定义ASCII码值相加为’A’+’Z’即的两个大写字母互为补码，ASCII码值相加为’a’+’z’即的两个小写字母互为补码。

       ç©ºæ ¼ç”¨@代替,句号以#代替,其它字符用句点代替。

       å‡½æ•°åŽŸåž‹ï¼š

       void SentenceEncoding(char *soure,char *code);

       åŠŸèƒ½ï¼šå¯¹å¾…加密字符串source加密后保存加密字符串到code.

       å‚数：char *soure，指向待加密句子的字符串指针；

       char *code 指向加密字符串的字符串指针；

       å­—符加密函数代码。