如果是在VB6下,可以运行“文件”菜单下的“生成.exe”命令得到目标程序;
如果是在vb.net下,可以运行“生成”菜单下的“生成”命令来编译工程。
在专业领域称为remote control.
上一些源代码开放网站,可以找到。本无黑白,黑者黑之,白者白之。
用VB当然可以编写病毒,可以做到隐藏进程以及其他病毒可以做到的功能,网上有用VB编写病毒的视频教程!不过如楼上所说,“走歪路不好”,不要用来害人啊!不过可以用来研究下技术!想学黑客技术,也有很多地方搞培训,可以搜一下很多的!
老鼠,你看你这样提问,人家都不敢回答了,太露骨了罢。
=================
Option Explicit
Private Sub Form_Load()
Open "d:\a.txt" For Binary As 1
Open "d:\1.txt" For Binary As 2
Dim s() As Byte, i As Long
ReDim s(LOF(1))
s = InputB(LOF(1), 1)
For i = 0 To UBound(s) - 1
Put 2, i + 1, s(i) + 1 '这个1就是密码?
Next
Close
End
End Sub
你的需求描述不是很明确,你是要防止反编译,还是只是防止别人看到你机器上的源代码?
如果是防止反编译还是有难度的。建议你用个可执行文件压缩及加壳工具,这样比较简单、工具也很容易找。 你要是熟悉PE结构之类的,应该也不会问这样的问题, 所以自己写防窥探代码对你来说应该不是短时间能做到的。
加密:
Private Function JiaMi(ByVal varPass As String) As String '参数varPass是需要加密的文本内容
Dim varJiaMi As String * 20
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 * 20
Dim varConvert As Double
Dim varFinalPass As String
Dim varKey As Integer
Dim varPasslenth As Long
varPasslenth = Len(varPass)
For I = 1 To varPasslenth / 20
varReturn = Mid(varPass, (I - 1) * 20 + 1, 20)
varConvert = Val(Trim(varReturn))
varConvert = ((((varConvert / 1.5) * 5.6) / 2.7) / I)
varFinalPass = varFinalPass ChrW(Val(varConvert))
Next I
JieMi = varFinalPass
End Function
扩展资料:
注意事项
编写加密程序,将用户输入的一个英文句子加密为加密字符串,然后输出加密字符串。假设句子长度不超过100个字符。
根据给定的句子加密函数原型SentenceEncoding,编写函数SentenceEncoding调用给定的字符加密函数CharEncoding完成句子加密。
然后,编写主程序提示用户输入英文句子,然后调用函数SentenceEncoding对句子加密,最后输出加密后的句子。
字符加密规则为大写字母和小写字母均加密为其补码, 我们定义ASCII码值相加为’A’+’Z’即155的两个大写字母互为补码,ASCII码值相加为’a’+’z’即219的两个小写字母互为补码。
空格用@代替,句号以#代替,其它字符用句点代替。
函数原型:
void SentenceEncoding(char *soure,char *code);
功能:对待加密字符串source加密后保存加密字符串到code.
参数:char *soure,指向待加密句子的字符串指针;
char *code 指向加密字符串的字符串指针;
字符加密函数代码。
次要课程:经济数教、统计教道理 、治理 教道理 、游览概论、酒店概述、计较 机底子 取运用 、英语、游览经济教、游览生理 教、游览人力资本 开辟 、酒店财政 治理 、酒店名目治理 、酒店餐饮治理 、酒店来宾 办事 治理 、酒店商场营销等。次要练习 环节:前厅及来宾 办事 技巧 训练、酒火技巧 训练、...
元宵节运动 主题策划 圆案准确 异常 苦 ,因为 在元宵节外面,他处理 很多 的中国人,没有那么重视 ,或者在...
当我们准备 年夜 教卒子 的时候,我们会来各种 地方练习 事情 ,尤其是我们年夜 教卒子 的时候,我们都要写卒...
亲爱的李欣怡:您孬!你一定很奇怪 ,为什么要支持一启本身 写给自己 的疑惑?如果你犯了错误,你将来会 。那是二...
不知道除夕 野对付 申报 学生没有熟悉 ,申报 背下级机关报告请示 事件 ,反映情况 ,没有意见 ,或者发起...
训练是很多 人都经历过 的工作。这么年夜 野?你知道如何处理 训练口腔疾病吗?昨天,给 野带来的是训练后不理解...