在命令窗口执行:
for each dr As DataRow in DataTables("xxx").DataRows
dr("姓名") = dr("姓名").Replace(" ","")
next