有如下程序： Private Sub Command1_Click()　　 a$="A WCIRKER IS HERE" 　　x=Len(a$) 　　For i=1 To x-1 　　　b$=Mid$(a$,i,3) 　　　If b$="WOR"Then S=S+1 　　Next 　　Print S End Sub 单击命令按钮，程序运行结果为

A．模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强
B．模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱
C．模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱
D．模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强

A．快速排序
B．冒泡排序
C．直接插入排序
D．堆排序