MS NoLock und Referenzen nach TEst bei SWE

app/DD_Clipboard_Searcher/frmGhostUser.vb

@@ -1,7 +1,7 @@
 Public Class frmGhostUser
     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
         If TextBox1.Text <> String.Empty Then
-            Dim osql = $"SELECT COALESCE(MAX(GUID),0) FROM TBDD_USER WHERE USERNAME = '{TextBox1.Text}'"
+            Dim osql = $"SELECT COALESCE(MAX(GUID),0) FROM TBDD_USER WITH (NOLOCK) WHERE USERNAME = '{TextBox1.Text}'"
             Dim oUSERID = MyDB_DDECM.GetScalarValue(osql)
             If oUSERID = 0 Then
                 MsgBox("Username unbekannt!", MsgBoxStyle.Information)