1,451
社区成员
发帖
与我相关
我的任务
分享ScriptControl控件提示“语句未结束”错误，实时错误1025，求教各路朋友？
Private Sub Form_Load()
Dim codestr As String
codestr = "Dim myNod As Node" & vbCrLf & "Set myNod = TreeView1.Nodes.Add(, , " & "tuopu"_ & ", " & "网络拓扑图" & ")"
ScriptControl1.ExecuteStatement codestr
End Sub
Dim codestr As String
codestr = "Dim myNod As Node" & vbCrLf & "Set myNod = TreeView1.Nodes.Add(, , " & "tuopu"_ & ", " & "网络拓扑图" & ")"
ScriptControl1.ExecuteStatement codestr
End Sub
...全文
请发表友善的回复…
发表回复
Tiger_Zhao 2008-01-10
- 打赏
- 举报
请先将你要执行的Script单独写出来，务必用UBB格式（编辑工具条的“插入源代码\VBScript”）
zhanbeen 2008-01-10
- 打赏
- 举报
那位大大帮帮忙
zhanbeen 2008-01-09
- 打赏
- 举报
dd
