こんにちは、複数の MySQLdatareader で if ステートメントを作成したいと思います。うまくいくかどうかはわかりません。誰かが私のコードを修正するのを手伝ってください。これは私のサンプルコードです。
Sub Emailusernameexist()
Dim sCommand1 As MySqlCommand = New MySqlCommand("SELECT * FROM account WHERE Email = '" & TextBox5.Text & "'", conn)
Dim sCommand2 As MySqlCommand = New MySqlCommand("SELECT * FROM account WHERE Username = '" & TextBox4.Text & "'", conn)
RD1 = sCommand1.ExecuteReader
RD2 = sCommand2.ExecuteReader
Try
If RD1.HasRows Then
While RD1.Read
Dim cname As String
cname = RD1.GetString("Completename")
MsgBox("Sorry, your email have been registered by " + cname + "? Please login !", vbInformation)
End While
ElseIf RD2.HasRows Then
While RD2.Read
Dim cname As String
cname = RD2.GetString("Completename")
MsgBox("Maaf, username was owned by " + cname + " !", vbInformation)
End While
End If
Catch ex As Exception
End Try
conn.close()
End Sub