在前次987轉成玖佰捌拾柒一問中承蒙解答。
但
Set rs = conn.Execute("select * , space(80) as newfield from riverent where stn = '" & Combo1.List(i) & "' order by stn, no_for_manage")
rs.MoveFirst
Do Until rs.EOF
Debug.Print rs("newfield")
rs("newfield") = "一二三 " 'ConvertC(rs"tunit"))
'Debug.Print ConvertC(rs("tunit")), rs("tunit")
rs.MoveNext
Loop
卻rs("newfield") = "一二三 "發生問題，該如何解決呢？