[ابو محمد محمد محمد]

كود :

Public Function GetPriceMore1() As Boolean
       con = New SqlConnection(cs)
       If con.State = 1 Then con.Close()
       con.Open()
       cmd = New SqlCommand("Select * from Product_Tbl Where ProductSale1 > 0", con)
       rdr = cmd.ExecuteReader
       rdr.Read()
       If rdr.HasRows Then
           FormX.Show()
       End If
       rdr.Close()
       con.Close()
   End Function