Question

VB编程中，怎样将字符串保存在一个文件里，然后用相应的代码去引用字符串，这样方便不同语言之间的翻译？

在VB6.0中该怎样操作？以前看过一个老师讲的，现在忘了...

Answer 1

看了半天，明白你的意思了，你是要把英文语言文件和中文语言文件放到资源文件里，然后调用对吧。
通常将资源分为两类：1.字符串资源，包括菜单和文本中使用的字符串，如"Hello
World"等；2.二进制资源，如位图（.BMP），图标(.ICO)，光标(.CUR)，声音(.WAV)和动画(.AVI)等。对于不同的资源，要用不同的调入函数。
启动VB6.0企业版，新建一个标准 Exe 工程，即工程1，有一个缺省窗体，form1。如果采用应用程序向导建立工程,那么在向导中会提示是否建立资源文件，这也是建立资源文件的一个方法。
在[外接程序]菜单下，点击[外接程序管理器],弹出外接程序管理器窗口，窗口左边的列表中列出了所有的外接程序，鼠标双击"VB6资源编辑器"。然后按[确定]按钮返回主窗口。
此时系统弹出资源编辑器窗口，同时在主窗口的工具条上添加了快捷按钮。而在弹出的资源编辑器窗口顶部，也有一些快捷按钮中，其中靠右边有五个按钮，分别对应添加字符串，光标，图标，
位图，自定义资源等命令。
添加字符串。鼠标点击添加字符串快捷按钮，弹出编辑字符串窗口，系统自动给出字符串资源的标识号，用户可在此依次输入、编辑、修改、删除对应不同菜单，按钮，消息提示的字符串。对不同类型的字符串，用户最好设定特定的标识号规则。在本例中，建立的字符串资源如下：
标识号 中文名称 标识号 中文名称
101 文件[F]
依次建立光标、图标，位图等其他资源
'将字符串调入控件属性
text1 = LoadResString(101)

类似这样的吧。

Answer 2

Private Sub Form_Load()
If Dir("d:\路径.txt") = "" Then
Open "d:\路径.txt" For Output As #1
Print #1, Text1.Text
Close #1
End If
Open "d:\路径.txt" For Input As #1
Line Input #1, b
Text1.Text = b
Close #1
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer) '回车键保存修改内容
If KeyAscii = 13 Then
Open "d:\路径.txt" For Output As #1
Print #1, Text1.Text
Close #1
MsgBox "路径修改OK！", , "提示"
End If
End Sub

追问

这个是文件读写我知道，但是那个老师讲的好像一开始就是把字符串这些一类的存在一个文件里，然后直接引用代号就行，据说是便于汉化（“英化”），没有打开关闭文件这一操作~

Answer 3

'保存在一个文件里
Open App.Path & "\字符串.txt" For Output As #1
Print #1, 字符串
Close #1

'引用字符串
Open App.Path & "\字符串.txt" For Binary As #1
字符串= Input(LOF(1), 1)
Close #1

追问

这个是文件读写我知道，但是那个老师讲的好一开始就是把字符串这些一类的存在一个文件里，然后直接引用代号就行，据说是便于汉化（“英化”）~