【发布时间】:2015-05-25 01:14:29
【问题描述】:
我只是用这段代码在文本文件中逐行分隔
Sub Event2()
Dim Lines = File.ReadAllLines(Place + "Text.txt")
Dim Srl As String = Lines.ElementAtOrDefault(1)
Dim Str1() As String
Str1 = Srl.Split("^")
Title.Text = Str1(0)
LoadIMage(pb1, Str1(1))
LoadIMage(pb2, Str1(2))
LoadIMage(pb3, Str1(3))
TxtDesc.Text = Str1(4)
End Sub
但当该行为空时出错,我尝试添加此代码,但失败
If Srl.IsNullOrEmpty Then
当该行为空时忽略此子的代码是什么?
【问题讨论】:
-
如果你想使用
Str1(4),你应该检查Str1.Length = 5。