soli guys, my code is correct. I have make a mistake... =P

cmd.connection = cnn

cmd.commandtext = "select count(*) from member"

label.text = CInt(cmd.ExecuteScalar)

Anywhere, thanks u guys all =)