If UKey.Start() Then
Dim Val As String = "123Lenovo"
If UKey.LenStrA(Val) > 50 Then
MessageBox.Show("用户名长度不能超过50个字节!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
If UKey.WriteStr(201,val,Vars("pw1"),Vars("pw2")) = True
MessageBox.Show("成功写入数据!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
End If
End If
写入代码显示写入成功。写入字段位置是从 201开始 50个字节
读取代码，读取不到任何数值 代码如下
If UKey.Start() Then
Dim val As String
val = UKey.ReadStr(201,250).Trim()
If val > "" Then
MessageBox.Show("授权用户: " & val ,"提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
End If
代码运行环境 （命令窗口）
200以下位置都可以存入，是不是UKEY坏了？
[此贴子已经被作者于2021/10/11 17:55:47编辑过]
加好友 
发短信
Post By：2021/10/11 17:38:00 [只看该作者]
