急数据库中会插入数字组成的字符串，不能插入汉字，这是为什么啊？

急！数据库中能插入数字组成的字符串，不能插入汉字，这是为什么啊？？？？？？？？
要实现插入编号和类别名称,如输入(01,艺术),无法插入.现在能插入数字如(01,01).输入(01,艺术),单步执行到reader = cmd.ExecuteReader()时,报错:输入的列名"艺术"无效,这可怎么解决?请高人指点.谢谢.注:数据库中的两列字段类型均为"nchar(10)". 
代码为： 
Dim id As String = Me.TextBox1.Text 
Dim name As String = Me.TextBox2.Text 
Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=D:\bookfu\book\Database1.mdf;Integrated Security=True;User Instance=True") 
con.Open() 
dim cmd As New SqlCommand("select * from booktype where btypeno=" & Me.TextBox1.Text.Trim() & "and btypename=" & Me.TextBox2.Text.Trim(), con) 
Dim reader As SqlDataReader 
reader = cmd.ExecuteReader() 


------解决方案--------------------
nchar(10)换成nvarchar
------解决方案--------------------
btypeno='" & Me.TextBox1.Text.Trim() & "'
------解决方案--------------------
btypename=' & "Me.TextBox2.Text.Trim()&"'