Question

【VB】怎么把数据储存到生成的exe文件中？比如登陆口令

Answer 1

生成exe文件后，这个exe文件是无法修改的，你想“把数据储存到生成的exe文件中”可能是办不到的，因为这牵扯到修改exe文件。
只能存储在外部文件中。

追问

这样啊。。。谢谢。。。

Answer 2

工程--添加模块--添加完模块~~在模块中添加代码如下：
public const StrP as string ="123456"
然后再窗体中
Private Sub Form_Load()
If InputBox("请输入口令") = StrP Then
MsgBox "正确"
End If
End Sub

追问

我没说清楚。。。我的意思是通过exe文件生成了数据然后储存到exe文件里。。。也就可以通过exe文件来修改口令。。。

Answer 3

如果要写到EXE文件中，那得找文件中的空位置。要防止把有用的数据覆盖了。以前我做过这样的程序，是完全可以实现的。当时是把程序的注册码信息写到程序中。

追问

怎么做呢？感谢~

追答

通过分析EXE文件，找到文件中为0的一段足够长的位置，把要保存的数据写到文件中。
不过写入时如果文件是运行的得复制一分拷贝，写入成功后再停止运行EXE文件。然后用写入数据的文件替换。

追问

写入到什么东西里面呢。。。？如果存到变量里下次再打开文件还是会丢失上一次的数据啊。。。

Answer 4

放在变量里
或者放在其他没用的窗体里

追问

放在变量里下一次打开就没有上次的数据了啊。。。

追答

写入文本下次打开获取
open "保存路径" for output as #1
write #1,"写入值"
close #1
open "保存路径" for input as #1
input #1,变量名
close #1
这样就行了

追问

就是不想用外部文件嘛。。。