首页 > 58必威网站

如何使用VB读取txt文件中特定关键字中的数据并赋值

来源:
时间:2024-08-17 13:19:28
热度:

如何使用VB读取txt文件中特定关键字中的数据并赋值【专家解说】:Private Sub Command1_Click()
Dim TempFile As Long
Dim Loa

【专家解说】:Private Sub Command1_Click() Dim TempFile As Long Dim LoadBytes() As Byte Dim all As String Dim arr() As String Dim rel1 As String Dim rel2 As String Dim rel3 As String TempFile = FreeFile Open "c:\\temp.txt" For Binary As #TempFile ReDim LoadBytes(1 To LOF(TempFile)) As Byte Get #TempFile, , LoadBytes Close TempFile all = StrConv(LoadBytes, vbUnicode) arr = Split(all, "testkeyword1") rel1 = arr(0) arr = Split(arr(1), "testkeyword2") rel2 = arr(0) rel3 = arr(1) MsgBox rel1 MsgBox rel2 MsgBox rel3 End Sub
  1. MTS视频文件转换制作及会声会影使用问题
    2024-08-17
  2. 山西电煤5000--6000卡 价格多少?带基金增值税 出省票 要阳泉 介休 孝义 宁武 晋城 长治 最好附带大概数据
    2024-08-17
  3. 红色警戒2正版的光盘安装文件有多大?
    2024-08-17
  4. 太阳能发电过程中会产生碳足迹(CO2)吗,怎样可测得这些数据呢?
    2024-08-17
  5. 电站招人有文件规定吗
    2024-08-17
  6. 模拟联合国立场文件关于环境保护方面的 国家是墨西哥 怎么写啊
    2024-08-17
  7. 天然气锅炉对比煤炭锅炉的优势包括具体的数据资料(急)
    2024-08-17
  8. (1)写出沼气(CH_4)燃烧的反应方程式________. (2)根据图表数据,可否回答下列问题?若能,写出答案;若不能,写明原因: A.用液化气烧水煮饭为什么比
    2024-08-17
  9. 请问新电力公司首次资质申请需要什么文件?分别是几本???
    2024-08-17
  10. 新能源汽车的特点数据及节能情况.
    2024-08-17
  11. 固定资产投资项目节能登记表中的“年需要实物量”的数据来源
    2024-08-17
  12. 国产LNG气源看数据,热值,气化率,甲烷含量,乙烷含量怎么看优劣
    2024-08-17
  13. 天然气,煤气,液化气的比重,也就是一方有多重 有详细的数据吗?包括在什么样的条件下
    2024-08-17
  14. 泰安市太阳能数据哪能查到,例如今年每月的平均太阳能辐射强度
    2024-08-17
  15. 在“节能减排,做环保小卫士”活动中,小明对两种照明灯的使用情况进行了调查,得出如表所示的数据
    2024-08-17
Baidu
map