注册 登录
Office中国论坛/Access中国论坛 返回首页

ganlinlao的个人空间 http://www.office-cn.net/?230471 [收藏] [复制] [分享] [RSS]

日志

在FreeBasic中使用集合类(泛型)(第四节)

已有 570 次阅读2015-5-21 21:38 |个人分类:FreeBasic| Freebasic, Freebasic集合类

Map接口使用的例子:

mdMap 是默认的键值存储。正常情况下,你不应当使用内部类 mdMapEntry,除非在mdMap中使用方法 entrySet()来返回 mdMapEntries mdSet。
mdDictionary 和 mdHashtable 和mdMap 几乎是一样的。
mdProperties 是一个对map的扩展类,mdProperties的键和值的类型总是字符串。(此类还没有完全实现。)

#Include Once "md/util/mdMap.bi"

mdMapDeclare(String, String)
Dim As mdMap(String, String) map

Dim As String temp
temp = map.put("key1", "value1")
temp = map.put("key2", "value2")
temp = map.put("key3", "value3")

Dim As mdSet(String) set = map.keySet()

Dim As String element
ForEach(String, element In set)
    Print "key: " & element & " - value: " & map.get(element)
NextEach
Sleep

使用mdIterator的例子:
mdIterator 允许轻松地遍历列表类。此外,它定义一个 ForEach 宏,允许使用类似 Java 的语法。
mdArrayIterator 扩展了 mdIterator 类 ,同样也定义了ForEach 宏。使用它,可以遍历 FreeBASIC 任何类型的数组。
mdEnumeration 跟 mdIterator 几乎一样。大多数时候,您将使用 mdIterator,但在某些场合下,你可能会用到mdEnumerations。

使用mdIterator的例子:
#include once "md/util/mdlist.bi"
mdListDeclare(string)    '声明类型
dim list as mdList(string)   ‘声明list对象类型
list.add("0")
list.add("1")
list.add("2")
list.add("3")
list.add("4")
list.add("5")

dim as mdIterator(string) it=list.iterator()
'第一次迭代
while it.hasnext()
print it.next()
wend
'第二次迭代
dim element as string
foreach(string,element in list)
     print element
nexteach
sleep

mdArrayIterator使用的例子:
#include once "md/util/mdAarrayIterator.bi"
mdAarrayIteratorDclare(string)
dim array(0 to 9)
for i as integer=0 to 9
array(i)=str(i)
next
dim as mdAarrayIterator(string) it=array()
'首次迭代
while it.hasnext()
print it.next()
wend
'第二次迭代
dim element as string
foreach(string,element in array())
print element
nexteach
sleep

mdEnumeration使用的例子:
#include"md/util/mdEnumeration.bi"
mdEnumerationDeclare(string)
dim list as mdList(string)
list.add("0")
list.add("1")
list.add("2")
list.add("3")
list.add("4")
dim as mdenumeration(string) e=list
while e.hasMoreElements()
     print e.nextElement
 wend
 sleep

评论 (0 个评论)

facelist doodle 涂鸦板

您需要登录后才可以评论 登录 | 注册

关闭

站长推荐上一条 /5 下一条

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2020-4-6 23:19 , Processed in 0.050311 second(s), 18 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回顶部