在工程中的标准模块中定义了如下数据类型： Type fruitorange As Integerapple As Integer End Type 在窗体上有—命令按钮Command1，要求当单击命令按钮时在C:\根目录下的顺序文件myfrtac.txt 中写入一条记录，下列能够完成改操作的事件过程是______ 。

A．Private Sub Command1_Click() Dim myfrt As fruit myfr orange = 5 myfr apple = 10 Open “c:\myfrt txt” For Output As #1 Print #1, myfr orange; myfr apple Close #1 End Sub

B．Private Sub Command1_Click() Dim myfrt As fruit myfr orange= 5 myfr apple= 10 Open “c:\myfrta txt”For Input As #1 Print #1, myfrt, orange; myfr apple Close #1 End Sub

C．Private Sub Command1_Click() Dim myfrt As fruit myfr orange= 5 myfr apple = 10 Open “c:\myfrta txt” For As #1 Print #1, myfr orange; myfr apple Close #1 End Sub

D．Private Sub Command1_Click() Dim myfrt As fruit myfr orange = 5 myfr apple= 10 Open “c:\myfrta.txt” For Output As #1 Print myfr orange; myfr apple Close #1 End Sub

不同国家或同一国家在不同时期的法律渊源会有不同的表现，呈现多样性，其成因是( )。

A．与国家将立法权配置给不同地位的机关行使有关

B．与司法独立与否的状态有关

C．与国家历史传统有关

D．与国家结构形式有关