数据表DataRowAdded
e.DataRow("业务部_业务跟单") = DataTables("用户表").Find("用户名称='" & usna & "'")
新增行弹出提示:从类型“DataRow”到类型“String”的转换无效。
e.DataRow("业务部_申请日期") = Date.Today 又是可以的