信用卡额度怎么降低了:vb如何逐字读取文本并将文本内容赋值给指定变量？急急急～～～！

来源：百度文库编辑：高校问答时间：2024/04/27 13:37:08

那位大虾知道这个问题请速回，谢谢
就是如何读取文本数据并赋值变量？

给你编了一个小程序，可以根据自己的需求再调整
程序逐行读取C:\ABC.Txt的内容，赋值到ReadStr数组

Private Sub Form_Load()
On Error GoTo Err
Dim Tmp As String, I As Long, ReadStr() As String, Index As Long
Open "C:\ABC.Txt" For Input As #1
Do While Not EOF(1)
Line Input #1, Tmp
ReDim Preserve ReadStr(Index)
ReadStr(Index) = Tmp
Index = Index + 1
Loop
Close #1
For I = 0 To Index
Debug.Print ReadStr(I)
Next
Exit Sub

Err:
Close #1
End Sub

文本数据的格式是怎样的?是普通的txt文件吗?赋值变量

vb如何逐字读取文本并将文本内容赋值给指定变量？急急急～～～！如何把VB文本控件里选中的文本赋值给windows下的光标所在处？怎么一行一行读取文本内容, 如何将内容提交到文本 VB中如何将ListBox的内容保存到文本中 VB逐行读入文本内容如何把在VB中输入的文本导入到文本文挡中并保存 VB中如何将文本复制入Clipboard？如何将文本内容转换成超连接请问如何将PPT中的文本内容转成DOC格式？