Question

这里新增了，并且一直在寻找一种从文本文件中读取的方法，该文件使用逗号作为分隔符。我想将文本分配给变量并在程序中使用它。例如，文本文件中的一行将是

45.325, Variable Description

我需要在代码中为变量名指定45.325。我找到了一个使用oFS.Readline的方法，但它读取整行，而我只需要它来读取（不包括）逗号。

感谢您的回复本

Answer 1

可以使用多种不同的选项，具体取决于您的具体操作。

如果您只想要逗号之前的第一个值，则可以使用旧的OPEN FOR INPUT方法。＆＃34; 输入 #ff，FirstValue＆＃34;从字面上将遇到的第一个值（直到达到逗号）加载到该变量中：

Public Sub SampleRead(TextFile As String)
  Dim ff As Integer, i As Long
  Dim FirstValue As Double
  Dim VariableName As String
  ff = FreeFile
  Open TextFile For Input As #ff
    Do Until EOF(ff)
      i = i + 1
      Input #ff, FirstValue
      Input #ff, VariableName
      Debug.Print "Variable Name: " & VariableName & " has a value of: " & FirstValue & " on line #" & i
    Loop
  Close #ff
End Sub

或者，您可以使用Split（）来解析您使用 .Readline 读取的文本文件的行（您可以使用＆＃34; 行输入< / strong>＆＃34;做同样的事情）以便将它们分解成特定的变量。

VBA从分隔文本中读取

1 个答案: