易语言怎么取出树形框的现行选中项数量

易语言怎么取出树形框的现行选中项数量,第1张

版本 2

支持库 iext

子程序 _按钮1_被单击

局部变量 b, 整数型

局部变量 a, 整数型

计次循环首 (树型框1取项目数 (), b)

如果真 (树型框1取检查框状态 (b) = 1)

a = a + 1

如果真结束

计次循环尾 ()

编辑框1内容 = 到文本 (a)

你的按钮直接用上面的源码应该就是你要的功能了

Dim DQsessionnew As New notessession

Dim workspace As New NotesUIWorkspace

Dim DQdocument As Notesdocument

Dim DQdatabase As Notesdatabase

Dim Dqitem As NotesItem

Dim DQuid

Set DQdatabase = DQsessionnewCURRENTDATABASE

Set DQuid = workspaceCurrentDocument

Set DQdocument=DQuiddocument

Set DQitem = DQdocumentGetFirstItem("A")

Forall v In DQitemValues

Messagebox( v )

End Forall

A为复选域名

对于多选类型的“组合框/列表框”,其内部的单选框个数等于列表项个数:

即:

ComboBox1ListCount

ListBox1ListCount

对于用Frame对象集合的单选/多选框,可以用ControlsCount属性获得:

即:

Frame1ControlsCount

像楼上说的,加一个变量就可以了

<%

Set objert=ServerCreateObject("ADODBRecorDset")

sql="select from userstatus"

objertopen sql,Con,1,3

dim i

i = 1

do while not objerteof

%>

<TR>

<td><%=objert("id")%></td>

<td height="44"><input type="checkbox" name="check"<%if objert("status")=1 then%> checked="checked"<%end if%>/></td>

<td><%=objert("status")%></td>

</TR>

<%

if i mod 6 = 0 then responseWrite"<br/>" '遇到6的倍数个换行

i = i+1

objertmovenext

loop

%>

版本 2

支持库 iext

子程序 _超级列表框1_左键单击表项

编辑框1内容 = 超级列表框1取标题 (超级列表框1现行选中项, 0))

编辑框2内容 = 超级列表框1取标题 (超级列表框1现行选中项, 1)

编辑框3内容 = 超级列表框1取标题 (超级列表框1现行选中项, 2)

编辑框4内容 = 超级列表框1取标题 (超级列表框1现行选中项, 3)

编辑框5内容 = 超级列表框1取标题 (超级列表框1现行选中项, 4)

----------------------------------

编辑框1中是位置

编辑框2中是物品名称

编辑框3中是物品ID

编辑框4中是物品数量

编辑框5中是价格

如果只要位置和物品数量,只写下面二行就行

-----------------------

编辑框1内容 = 超级列表框1取标题 (超级列表框1现行选中项, 0))

编辑框2内容 = 超级列表框1取标题 (超级列表框1现行选中项, 3)

举个例子,比如如下是HTML的结构:

这里推荐使用jQuery库,比较方便。以下是代码:

大致思路就是:先利用name属性值获取checkbox对象,然后循环判断checked属性。(true表示被选中,false表示未选中)

具体解释一下:

首先用documentgetElementsByName()这个方法,通过input标签的name属性将input元素获取,并存进obj这个变量值中。然后建一个check_val的数组,通过for循环将input标签的value值存入数组中,这样就可以获取checkbox的选中的多个值。

以上就是关于易语言怎么取出树形框的现行选中项数量全部的内容,包括:易语言怎么取出树形框的现行选中项数量、怎样用lotusscript获得notes复选框所选的个数呢、EXCEL VBA 里面,怎么知道组合框里所加单选框的个数等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/10155996.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存