Question

VB问题求解。 读取文本文件，检测每一行中是否有// 如果没有 这一行的字符显示在Text里 如果

VB问题求解。
读取文本文件，检测每一行中是否有//
如果没有 这一行的字符显示在Text里
如果有 //之前的内容显示在Text里
像代码中的注释一样，请问如何实现？

Answer 1

你试一试下面的办法，希望对你有所帮助：

Private Sub Command1_Click()
    Dim A As String
    Dim C As Integer
    A = "在文本文件中读一行，看其中是否包含像//这样的字符。"
    C = InStr(A, "//")
    If C > 0 Then A = Left(A, C - 1) '如果包含，则把//及后面的内容全部删掉
    Text1.Text = A '把处理过已经符合要求的内容显示出来
End Sub