该文被密码保护。 阅读全文
摘要:
Public Sub WriteToForm(ByVal Obj As Object, ByVal sTagName As String, ByVal sName As String, ByVal Submit As Boolean, Optional sType As String = "", Optional sValue As String = "", Optional sSelect As Boolean) Dim i As Integer Dim vDoc, vTag sTagName = UCase(sTagName) sType = UCa 阅读全文