直接看代码: JS代码如下: <script type="text/javascript" language="javascript"> function checkAll() { for (var i = 0; i < document.getElementById("cblStatuteEnumTypeId").getElementsByTagName("input").length; i++) { do
相应的代码: Private Sub some_Click() '定义变量 Dim txtSQL As String Dim MsgText As String Dim Online_mrc As ADODB.Recordset Dim mrc1 As ADODB.Recordset Dim txtStr As String Dim MsgTxt As String Dim mm As String '没有选中行时,提示用户 If myflexgrid.RowSel - 1 = 0 Then M