Displaying Field Data But Hangs

Dim ADP As SqlDataAdapter = New SqlDataAdapter
Dim CONN As SqlConnection = New SqlConnection("Data Source=|DataDirectory|\dbTesting.sdf")
Dim COMM As SqlCommand = New SqlCommand("SELECT * FROM tbTesting")
Dim DS As New DataSet
CONN.Open()
Dim DR As SqlDataReader = COMM.ExecuteReader()
DR = COMM.ExecuteReader()
TextBox0.Text = DR("Test").ToString
This was my coding in order to display the value of a field named'Test'

Is my codings correct? If Yes or No, Why does my program HANG? As in...my system doesnt respond...But somehow Visual studio Functioning well...So I guess the problem is within my program once I executed the button that contains the above codings...
Any help would be appreciated...Thanks...

Oh Thanks for the reply...But I Still Getting ErrorA network-related or instance-specific error occurred while establishing a connection to SQL Server. The server was not found or was not accessible. Verify that the instance name is correct and that SQL Server is configured to allow remote connections. (provider: SQL Network Interfaces, error: 26 - Error Locating Server/Instance Specified)

By The Way...With The First Coding That I Post...I Manage To Got Some Response But This...Can Not Open Connection!

...It Seems Like VB Can't Open My Database
...So I Open My Server Explorer And I Saw My Database Marked 'x' Means 'Close' Right?...I Click On It And Refresh It Then Its State Became 'Open'...But When I Hit F5 For Testing...It Closes Itself... :-/ ???

Sorry...Took Me So Long To Reply...Got Tons Of Stuff To Finish...Anyway, I Think I Give Up Using This SQL Compact...I Use Now Microsoft Access OLE DB Instead...
Thanks For All The Reply...
...But Now I'm Facing A New Problem...
Indeed, As I Said,IAm Using Microsoft Access...
SoI SuccessfullyEstablished And Connect My Database...
...And Also I Got Successfully Recorded My Data Through Update Command...And The Display As My Indicator Indicates That The Value Is Change...
But The Problem Was...After I Hit "Ctrl+S" or "Save"...To Save My Entire Project...The Record Seems To Reset To The Valiue That I Initially Set Them When I Created The Database...My Indicator Also Displays The Value Which Means It Roll Backs To Its Former Value...Also When I Open The Database...The Value Still Teh Same...Why Do You Think It's Happening?

These Are My Declaration:

Public conn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\dbAccount.accdb")
Public Cmd As New OleDbCommand
Public DataSet As New DataSet()
Public DataReader As OleDbDataReader
Public DataAdapter As OleDbDataAdapter = New OleDbDataAdapter()

All Right My Bad...:-)
Found Out The Problem...I Guess...
...During The Testing Of The System...The VB Creates A Temporary Copy Of The Original Database...So Therefore...The Database That Takes The Changes Was The Temporary One...That's Why...There's No Change On The Actual Database...