一、js访问activex
VB:
--------------------------------
Public Property Let TxtVisible(ByVal New_TxtVisible As Boolean)
Text1.Visible = New_TxtVisible
PropertyChanged 'BlnSystemUser'
End Property
Public Sub SetValue1()
Text1.Text = "test zhanpeng"
End Sub
Public Sub SetValue2(str)
Text1.Text = str
End Sub
----------------------------------
JS:
---------------------------------
document.getElementById("obj").TxtVisible = false;
document.getElementById("obj").SetValue1();
document.getElementById("obj").SetValue2(44);
---------------------------------
二、activex访问js.txt
VB:
------------------------
Private Sub Command2_Click()
UserControl.Parent.Script.test (3)
End Sub
--------------------------
js:
------------------------
function test(str){
alert(str);
}
------------------------
本文介绍了JavaScript如何访问和操作ActiveX对象的属性及方法,同时展示了如何通过ActiveX对象调用JavaScript函数的具体实现方式。

2012

被折叠的 条评论
为什么被折叠?



