一下程序的作用是生成一个10×10的矩阵．该矩阵主对角线上的数据为1，其余数据为0(程序运行结果如下图所示)。该程序不完整，请补充完改程序。 Private Sub Command1_Click()Dim a(10，10)As IntegerFor i=1 To 【11】 For j=1 To 10 If 【12】 Then 【13】 =1 Elsea(i，j)=0 End If Next jNext iFor i =1 To 10 For j=1 To 10Print a(i，j)； Next j PrintNext i End Sub

27、现代公司民主管理的形式包括（）

A、监事会

B、管理委员会

C、职工股份制

D、质量管理小组

E、职工代表大会