ถ้าต้องการ refresh Database ด้วย VB หลังจาก update ข้อมูลเสร็จแล้วจะเขียนคำสั่งอย่างไรครับ

  Public Function upd(ByVal id As Integer, ByVal i As Integer) As Integer

        With conn
            If .State = ConnectionState.Open Then .Close()
            .Open()

        End With

        sql = "UPDATE nums2 SET week = '" & i & "' WHERE id='" & id & "' "
        cmd = New SqlCommand(sql, conn)
        Dim r As Integer = cmd.ExecuteNonQuery()
        conn.Close()

        Return 2
    End Function