计数有什么问题

Question

我想重定向管理员，如果没有表中的记录到另一个表单，但我在我的代码中做错了，但我找不到。你可以帮我吗？

Private Sub frmlogin_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    Dim cmd As SqlCeCommand 
    Dim namecount As String 
    Dim con1 As SqlCeConnection 
    con1 = New SqlCeConnection("Persist Security Info=False;Data Source=.\database.sdf;Password=***********;File Mode=shared read") 
    con1.Open() 
    namecount = "SELECT COUNT(Name) WHERE namecount FROM Users" 
    cmd = New SqlCeCommand("SELECT COUNT(Name) WHERE namecount FROM Users", con1) 

    Dim reader1 As SqlCeDataReader = cmd.ExecuteReader() 
    While (reader1.Read()) 
     If reader1(namecount) > 0 Then 
      'Redirect to Admin Form 
      Me.Hide() 
      frmadmin.Show() 
     Else 
      Me.Show() 
     End If 
    End While 
End Sub 

Answer 1

你想用一个别名：

SELECT COUNT(Name) AS namecount FROM Users 

，而不是

SELECT COUNT(Name) WHERE namecount FROM Users 

而且：代替

reader1("namecount") 

：

reader1(namecount) 

Answer 2

应该

SELECT COUNT(Name) AS namecount FROM Users 

不

SELECT COUNT(Name) WHERE namecount FROM Users