网站首页 > 文章中心 > 其它

vb.net序列化作用_hadoop序列化与反序列化的作用

作者:小编 更新时间:2023-09-13 11:59:25 浏览量:360人看过

为什么vb/c#.net里面winform,窗体不能序列化?

因为他没有从serialable继承.

任何东西都可以序列化,没什么保护或者技术困难的问题.

VB.NET 自定义一个文件类型,比如 "XX.abc" 里面存储文本,且只能自己可以打开,如何实现?

Function ByteToBin(m As Byte) As String ' 将字节型数据转换成八位二进制字符串

Dim c$

c$ = ""

Do While m 0

c$ = r c$

Loop

ByteToBin = c$

End Function

Function Reverse(m As String) As String ' 将八位二进制字符串颠倒顺序

Dim i%, x$

x = ""

x = Mid(m, i, 1) x

Next i

Reverse = x

Function BinToByte(m As String) As Byte ' 将八位二进制串转换成十进制

Dim x As String * 1, y%, z%

z = 0

x = Mid(m, i, 1)

z = z ◆ y

BinToByte = z

Private Sub Command1_Click()

Dim x As Byte, i%, fname$

fname = InputBox("请输入要加密的文件名!注意加上路径名:")

If Dir(fname) = "" Then

MsgBox "文件不存在!"

Exit Sub

End If

Open fname For Binary As #1 ' 以二进制访问模式打开待加密文件

For i = 1 To LOF(1) ' LOF函数是求文件长度的内部函数

Get #1, i, x ' 取出第i个字节

x = BinToByte(Reverse(ByteToBin(x))) ' 这里调用了三个自定义函数

Put #1, i, x ' 将加密后的这个字节写回到文件原位置

Close

MsgBox "完成!"

End Sub

退出:Unload Me

网上帮你找的,如果不符合你的要求,你可以再去网上在搜搜,有很多代码的.

用VB.NET编程有什么好处?

以上就是土嘎嘎小编为大家整理的vb.net序列化作用相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!

版权声明:倡导尊重与保护知识产权。未经许可,任何人不得复制、转载、或以其他方式使用本站《原创》内容,违者将追究其法律责任。本站文章内容,部分图片来源于网络,如有侵权,请联系我们修改或者删除处理。

编辑推荐

热门文章