> Do While dr.Read = True

この場合の Read メソッドは Boolean 型を返すメソッドですよね。

なので、「Do While dr.Read()」と「Do While dr.Read = True」は同義のはずです。
記述的には、むしろ前者の方が望ましいかと。