【问题标题】:Comparing timer and text file比较计时器和文本文件
【发布时间】:2019-11-11 01:59:48
【问题描述】:

我对 VB 很陌生(不是我的专长)我正在搜索并尝试为我的 exe 的日志文本文件找到一个比较命令。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load


    Dim Findstring = IO.File.ReadAllText("C:\Users\JBP-Admin\Desktop\Pugad\Mobile Support\catch.txt")
    Dim Lookfor As String = showdat.Text

    If Findstring.Contains(Lookfor) Then
        MsgBox("Found: " & Lookfor)


    End If



End Sub

Public Sub Timer1_Tick(sender As Object, e As EventArgs) Handles DateAndTime.Tick
    DateAndTime.Start()
    ' Me.Text = DateAndTime.Now.ToString("MM/dd/yyyy hh:mm:ss tt")
    showdat.Text = Format(Now, "MM/dd/yyyy hh:mm:ss tt")
End Sub

Private Sub Label1_Click(sender As Object, e As EventArgs) Handles showdat.Click

【问题讨论】:

  • Form.Load 的文本框中不会有任何内容。在 Form.Load 完成之前,填充文本框的 Timer.Tick 不会打勾。
  • 嗨,玛丽,没关系,因为我想检查 catch.txt 内部是否有一个“==”到现在。我可以在 catch.txt 中比较我的“现在”时间吗?
  • 双等号 (==) 是 C# 中的比较运算符。在 vb.net 中,比较和赋值运算符是相同的。只需一个等号 (=),其含义由上下文决定。
  • 是的,您可以在文件中搜索当前日期时间,但是转储文件的内容并在表单加载中搜索空字符串是愚蠢的。
  • 实际上我不会转储文件,因为我在这里真正想要的是如果 catch.txt 现在可以找到 >= time 那么它将关闭一个 exe 文件然后重新打开它。你能帮我解决这个问题吗?

标签: vb.net text time comparison


【解决方案1】:

您应该将代码从 Form1_Load 移动到 Timer Tick 事件处理程序,并将 DateAndTime.Start 移动到 Form1_Load

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    DateAndTime.Start()

End Sub

Public Sub Timer1_Tick(sender As Object, e As EventArgs) Handles DateAndTime.Tick
    Dim Findstring = IO.File.ReadAllText("C:\Users\JBP-Admin\Desktop\Pugad\Mobile Support\catch.txt")
    Dim Lookfor As String = Format(Now, "MM/dd/yyyy hh:mm:ss tt")

    showdat.Text = Lookfor

    If Findstring.Contains(Lookfor) Then
        MsgBox("Found: " & Lookfor)
    End If

End Sub

【讨论】:

  • 谢谢!但现在我想检查'catch.txt'是否等于现在的最新时间。那可能吗?然后它会显示新的 TIME IS FOUND 然后它会尝试再次检查是否会有新的更新时间。抱歉英语不好
  • 这就是这段代码的作用,每次计时器计时,它都会用当前时间更新Lookfor字符串并检查catch.txt文件是否包含该字符串。
  • 哇!生病试试..那么如果有更新它会再次提示?我会试试看的!
  • 我尝试添加一个proc来杀死一个进程,一旦它找到所需的时间是正确的吗?
  • 是的,您当然可以这样做。希望这个答案能让你更接近你的目标。您可以使用答案左侧的复选标记将此问题标记为已回答,并发布有关您遇到的任何其他问题的新问题。
猜你喜欢
  • 2012-10-23
  • 2023-03-28
  • 2019-11-20
  • 2019-11-07
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多