说明: Private Sub classapp_Click() qxstr = Executeqx(2) If qxstr = "false" Or qxstr = "readonly" Then ss = MsgBox("对不起,你没有管理本功能的权限,请与管理员联系!", vbInformation + vbOKOnly, " 警告") Exit Sub End If Formclass1.Show classmodi = False Formclass1.classload Formclass
<kogbmbmg> 上传 | 大小:2mb