- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 注册表设置 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14067)
-- 发布时间：2011/11/7 9:47:00
-- 注册表设置
当通过“字体设置”按钮打开字体设置对话框设置字体样式，按“确定”按钮时，将新选择的字体和“D:\\5数据备份\\改EUDC改.TTE”内容写进注册表“HKEY_USERS\\S-
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试1.zip |
[此贴子已经被作者于2011-11-7 10:19:30编辑过]
-- 发布时间：2011/11/7 10:24:00
--
HKEY_USERS\\S-1-5-21.......后面的键值在每台计算机都不一样,请问如何设置?
用"HKEY_CURRENT_USER\\EUDC\\936" 就可以了.
下面方法基本解决了问题:
Dim dlg As new windows.forms.fontdialog
dlg.Font = Tables("表A").Font
If dlg.showdialog = DialogResult.Ok Then
Tables("表A").Font = dlg.Font
Registry.SetValue("HKEY_CURRENT_USER\\EUDC\\936",(dlg.Font).Name,"C:\\改EUDC改.TTE")
End If
[此贴子已经被作者于2011-11-7 18:56:50编辑过]