Microsoft SQL Server SELECT 문

Question

데이터베이스 테이블에서 ReceiptNO 열을 검색하고 참조 용으로 TextBox 또는 Label에 저장하는 데 도움이 필요합니다.

는 CODE :

당신은 값을 읽어 SqlDataReader를 사용하고 루프를 시작해야

Dim da2 As New SqlDataAdapter 
da2.SelectCommand = New SqlCommand("SELECT RecepitNO FROM Receipt WHERE (PaidFor=@PaidFor AND RegNO=@RegNO)") 
da2.SelectCommand.Parameters.Add("@paidFor", SqlDbType.VarChar).Value = cbMonth.Text 
da2.SelectCommand.Parameters.Add("@RegNO", SqlDbType.Int).Value = lblRegNO.Text 

cn.Open() 
da2.Update(ds.Tables("Receipt")) 
'da2.SelectCommand.ExecuteNonQuery() 
da2.SelectCommand.ExecuteReader() 
cn.Close() 

Answer 1

이 예제는 텍스트 필드

cn.Open() 
Dim reader = da2.SelectCommand.ExecuteReader() 
while reader.Read() 
    textBox1.Text = reader("ReceiptNO").ToString() 
End While 

을 ReceiptNO입니다 가정 작동합니다
을 반환 또는 0 또는 하나의 레코드 만 반환하고 ReceiptNO 필드에만 관심이 있다면 ExecuteScalar

를 사용할 수 있습니다.

Dim cmd = New SqlCommand("SELECT RecepitNO FROM Receipt WHERE (PaidFor=@PaidFor AND RegNO=@RegNO)") 
cmd.Connection = cn 
cmd.Parameters.Add("@paidFor", SqlDbType.VarChar).Value = cbMonth.Text 
cmd.Parameters.Add("@RegNO", SqlDbType.Int).Value = lblRegNO.Text 
cn.Open() 
Dim result = cmd.ExecuteScalar() 
if result IsNot Nothing Then 
    textBox1.Text = result.ToString() 
End If 

Here the MSDN docs on ExecuteScalar