惯性聚合 高效追踪和阅读你感兴趣的博客、新闻、科技资讯
阅读原文 在惯性聚合中打开

推荐订阅源

V
V2EX
P
Proofpoint News Feed
D
DataBreaches.Net
C
Check Point Blog
L
LangChain Blog
量子位
美团技术团队
Vercel News
Vercel News
人人都是产品经理
人人都是产品经理
N
Netflix TechBlog - Medium
V
Visual Studio Blog
Microsoft Security Blog
Microsoft Security Blog
博客园 - 【当耐特】
MongoDB | Blog
MongoDB | Blog
Cyber Security Advisories - MS-ISAC
Cyber Security Advisories - MS-ISAC
freeCodeCamp Programming Tutorials: Python, JavaScript, Git & More
Last Week in AI
Last Week in AI
The GitHub Blog
The GitHub Blog
奇客Solidot–传递最新科技情报
奇客Solidot–传递最新科技情报
U
Unit 42
腾讯CDC
M
MIT News - Artificial intelligence
Microsoft Azure Blog
Microsoft Azure Blog
Blog — PlanetScale
Blog — PlanetScale

博客园 - 奇远

网络记事本 用google检索email 读注册表 - 奇远 - 博客园 Crystal Report 部署 按钮控件数组 读写xml - 奇远 - 博客园 vb.net发邮件 - 奇远 - 博客园 VB.NET程序只能启动一次 - 奇远 - 博客园 dataset遍历表中的数据 - 奇远 - 博客园 vb.net自定义纸张大小 - 奇远 - 博客园 怎样使用水晶报表的推模式? SQL查询语句精华使用简要 vb.net事务处理 各种连接字符串设置 CREATE PROCEDURE 将数字串转换为中文金额字符串 中文转换成拼音函数 运行时动态添加和删除控件 VB类Class设计
VB读写注册表
奇远 · 2005-10-12 · via 博客园 - 奇远

'Visual Basic 提供了一个标准的注册表位置以存储创建于 Visual Basic 的应用程序的程序信息:
'HKEY_CURRENT_USER\Software\VB and VBA Program Settings\appname\section\key
   
'Visual Basic 也提供了四个语句或函数来处理存储在应用程序注册位置的程序设置值。
'函数或语句             描述

'GetSetting 函数        检索注册表设置值。
'SaveSetting 语句       保存或创建注册表设置值。
'GetAllSettings 函数    返回一个包含多项注册表设置值的数组。
'DeleteSetting 语句     删除注册表设置值。
'-----------------------------------------
'本例中使用了除GetAllSettings 函数之外的几个函数或语句
'-----------------------------------------
'如果仅检索一项注册表设置值,通过以下的语法使用 GetSetting 函数:
'GetSetting(appname, section, key[, default])

'各参数的意义: appname,     section, key,       Value
'             应用程序名称,表的名称,表项的名称,表项的值

'注:这些名称是我们自己定义的,而不是系统默认值
'本例中注册表的结构如下所示:
'应用程序名称: Demo
'表的名称:     Rfile
'---------------表项名----------表项的值---
'表项1:        FirstFile       0
'表项2:        File0           第一个历史文件的路径
'表项2:        File1           第二个历史文件的路径
'表项2:        File2           第三个历史文件的路径
'表项2:        File3           第四个历史文件的路径
'-----------------------------------------
'按以下语法使用 SaveSetting 语句:
'SaveSetting appname, section, Key, Value

'通过以下语法使用 DeleteSetting 语句:
'DeleteSetting(appname, section, key)
'-----------------------------------------