title: String or binary data would be truncated. The statement has been terminated
body: <p>I always got an error when adding a new data. the error says </p>
  
  <blockquote>
    <p>String or binary data would be truncated. The statement has been terminated</p>
  </blockquote>
  
  <p>As I've looked back on my backend or code. It looks like there's a conflict adding a <code>TWO LABEL DATA</code> in one column because I would like to join the (Year)-(StudentNumber)</p>
  
  <p>Here's the code of my INSERT INTO Statement</p>
  
  <pre><code>  INSERT INTO
       [Student_Information] (StudentID, LastName, FirstName, MiddleName, Gender, 
                              ContactNumber, Citizenship, Religion, Birthday, Address) 
    VALUES 
       ( '" &amp; lbl_cyear.Text - studid.Text &amp; "','" + txt_lname.Text + "', '" + txt_fname.Text + "', '" + txt_mname.Text + "', '" + DDGender.Text + "', '" &amp; txt_cnumber.Text &amp; "', '" &amp; txt_citizenship.Text &amp; "' , '" + txt_religion.Text + "' , '" &amp; txt_bday.Text &amp; "', '" &amp; txt_address.Text &amp; "' )"
  </code></pre>
  
  <p>and here's the code how I generate the Year and the Student Number</p>
  
  <pre><code>Sub SNYear()
      Dim test As Date
  
      test = Convert.ToDateTime(Today)
      lbl_cyear.Text = test.Year
  End Sub
  Sub SNGenerate()
      'displaying Studentid
      Dim SN As Integer ' Student Number
      Dim SID As String 'Student ID Num as String
  
      Dim rdr As SqlDataReader
  
      cmd1.Connection = cn
      cmd1.Connection.Open()
      cmd1.CommandText = "Select Max (StudentID) as expr1 from [Student_Information]"
      rdr = cmd1.ExecuteReader
  
      If rdr.HasRows = True Then
          rdr.Read()
      End If
  
      If rdr.Item(0).ToString = Nothing Then
          SN = rdr.Item(0) + 1
          SID = Format(SN, "0000")
      ElseIf rdr.Item(0).ToString = 0 Then
          SN = rdr.Item(0) + 1
          SID = Format(SN, "0000")
  
      Else
          SN = rdr.Item(0) + 1
          SID = Format(SN, "0000")
      End If
  
  
      studid.Text = SID
  
      cmd1.Connection.Close()
  
  End Sub
  </code></pre>
  
  <p>Can someone help me with the code? How to join 2 data in different label text and save it to one column in my table.</p>