Visual Basic

Asanka Akash Sovis wrote:

So if a window is kept in front of this gpu overlay will it be visible?

Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
"If you just follow the bacon Eddy, wherever it leads you, then you won't have to think about politics." -- Some Bell.

MyProfile_File = "C\MyProfile\MyProfile.txt"

      Dim MyProfile_StreamReader As New StreamReader(MyProfile_File)
      Dim MyProfile_Content As String

      MyProfile_Content = MyProfile_StreamReader.ReadToEnd
      MyProfile_StreamReader.Close()

      Dim MyProfile_StreamWriter As New StreamWriter(MyProfile_File, True)
      Dim a As String()

      a = Split(MyProfile_Content, vbCrLf)

      Dim sFix As String

      For i As Integer = 0 To a.Length - 1
          sFix = a(i)
          If a(i).IndexOf("ID = ") >= 0 Then
              sFix = sFix.Replace(a(i).IndexOf("ID = ") + 1, "1122334")
          End If
          MyProfile_StreamWriter.WriteLine(sFix)
      Next
      MyProfile_StreamWriter.Close()

Gerry Schmitz wrote:

So yes, you need a CRC or MD5 calculation to help determine if a file is corrupted or not.

• The first number + the results for the other three numbers;
• The first number - the results for the other three numbers;
• The first number * the results for the other three numbers;
• The first number / the results for the other three numbers;

Public Shared Function AllResults(ByVal ParamArray numbers() As Integer) As IEnumerable(Of Integer)
    If numbers Is Nothing OrElse numbers.Length = 0 Then Return Enumerable.Empty(Of Integer)
    Return AllResultsIterator(numbers, numbers.Length)
End Function

Private Shared Iterator Function AllResultsIterator(ByVal numbers As IEnumerable(Of Integer), ByVal length As Integer) As IEnumerable(Of Integer)
    Dim n0 As Integer = numbers.First()
    If length = 1 Then
        Yield n0
        Return
    End If
    
    For Each result As Integer In AllResultsIterator(numbers.Skip(1), length - 1)
        Yield n0 + result
        Yield n0 - result
        Yield n0 * result
        If result <> 0 Then Yield n0 \ result
    Next
End Function