某经济合同，乙方收受甲方定金3万元，合同规定违约金4万元，后乙方违约，未完全履行合同，此时( )。

A．乙方应返还定金3万元给甲方

B．乙方应按6万元返还定金给甲方，且另行支付4万元违约金

C．乙方向甲方支付4万元违约金，并返还定金

D．乙方按6万元返还定金给甲方，不再交付违约金

在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：　　Private Sub Command1_Click（）　　Dim a$, b$，c$, k%　　a="ABCD”　　b=”123456”　　c=""　　k=1　　Do While k＜= Len（a）Or k＜=Len（b）　　If k＜=Len（a）Then　　c=c＆Mid（a, k, 1）　　End If　　If k＜=Len（b）Then　　c=c＆Mid（b, k, 1）　　End If　　k=k＋1　　Loop　　Print c　　End Sub　　运行程序，单击命令按钮，输出结果是

A．123456ABCD

B．ABCD123456

C．D6C5B4A321

D．AlB2C3D456