锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net保存到注册表 vbnet imports

IT技术内容

VB如何将程序的数据保存？VB6.0
写入：
Open "D:\123.txt" For Output As #1 '打开XXX路径的XXX文件（双引号里表示文件位置和文件名）
Print #1, Text1.Text '写入Text1的Text内容
Close #1 '关闭
读?。?
Open "D:\123.txt" For Input As #1 '打开打开XXX路径的XXX文件（双引号里表示文件位置和文件名）
Do While Not EOF(1)
Line Input #1, s
Text1.Text = s
Loop 'Do...Loop表示循环读取文件的内容，并让Text1.Text=内容
Close #1 '关闭
VB.net中读写文件主要使用System.IO命名空间 。
① 使用 File.ReadAllText 读取
Dim s As String = System.IO.File.ReadAllText("C:\a.txt")
② 使用 StreamReader 读取，注意编码格式和写入的编码保持一致 。
Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)
Dim s As String = sr.ReadToEnd()
sr.Close()
如何实现VB.NET退出程序保存设置Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
SaveSetting("appname", "Startup", "text1", TextBox1.Text)
SaveSetting("appname", "Startup", "text2", TextBox2.Text)
【vb.net保存到注册表 vbnet imports】End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim text1 As Double
Dim text2 As Double
text1 = GetSetting("appname", "startup", "text1", 8)
text2 = GetSetting("appname", "Startup", "text2", 6)
TextBox1.Text = text1
TextBox2.Text = text2
End Sub
VB.NET 本地保存数据VB可以用任何格式保存文件数据不仅仅是注册表\XML\INI
甚至于未知vb.net保存到注册表的格式 。我教vb.net保存到注册表你命令vb.net保存到注册表：
open "C:\setup.safe" for output as #1
print #1,"object"
close #1
其中setup.safe就是一个文件vb.net保存到注册表，后缀为.safe，当然可以改成.dat包括其他任何后缀.
object就是你要写入setup.safe的内容.
VB.NET存取注册表项的几个函数1、首先引用命名空间vb.net保存到注册表：using Microsoft.Win32;
2、几个基本主键vb.net保存到注册表：
Registry.ClassesRoot;对应于HKEY_CLASSES_ROOT主键
Registry.CurrentUser;对应于HKEY_CURRENT_USER主键
Registry.LocalMachine;对应于 HKEY_LOCAL_MACHINE主键
Registry.User;对应于 HKEY_USER主键
Registry.CurrentConfig;对应于HEKY_CURRENT_CONFIG主键
Registry.DynDa; 对应于HKEY_DYN_DATA主键
Registry.PerformanceData; 对应于HKEY_PERFORMANCE_DATA主键
3、返回或创建一个注册表键
Dim Key1 As Microsoft.Win32.RegistryKey
Key1 = My.Computer.Registry.CurrentUser'返回当前用户键
Dim Key2 As Microsoft.Win32.RegistryKey
Key2 = Key1.OpenSubKey("northsnow")'返回当前用户键下vb.net保存到注册表的northsnow键
If Key2 Is Nothing Then
Key2 = Key1.CreateSubKey("northsnow")'如果键不存在就创建它
End If
vb2013 net combobox 要把ComboBox中的内容保存到文本文件、INI文件、注册表 。问怎么存 ， 怎么取 。要代码Private Sub Form_Load()
'运行程序时
'自动将EXE文件所在目录下的一个INI文件中的数据调入ComboBox
Dim Stri As String
Open App.Path"\ComboData.INI" For Input As #1
Do Until EOF (1)
Input #1,Stri
Combo1.AddItem Stri
Loop
Close #1
End Sub
Private Sub Form_Unload(Cancel As Integer)
'关闭程序时
'自动将ComboBox中的数据保存至EXE文件所在目录下的一个INI文件
Open App.Path"\ComboData.INI" For Output As #1
For i = 0 to Combo.Listcount - 1
Print #1, Combo.List (i)
Next
Close #1
End Sub
Private Sub Command1_Click()

推荐阅读


上一篇：关于postgresql初始化数据库的信息

下一篇：游戏崩溃无法切换到桌面，游戏崩溃无法切换到桌面怎么解决