急急急！！！，获取鼠标点击的字符串，在线等

Question

function selparent(a){
 alert("aaa");
    alert(a.innerHTML);
var b=a.innerText;
document.getElementById("text100").value=b;
}
<div id="div02" onclick="selparent(this);">1231</div>
<input type="text" name="text100" id="text100">

Answer 1

<table id=DEMO><tr><td width=500 height=20>ABDSFNJNGHJHGHJKJKLJHJKHJKHJKLLKJKLJKLKJLKJ</td></table>
<input type=text id=txtBox><script language=vbscript>
Dim i ,tmp,str
tmp=demo.innerText
For i = 1 To Len(tmp)
str=str & "<span>" & Mid(tmp,i,1) & "</span>"
Next
demo.rows(0).cells(0).innerHtml=str
Sub DEMO_onClick()
dim obj
    Set obj=window.event.srcElement
txtBox.value=txtBox.value & obj.innertext

End Sub
</script>