vb6中未定义用户定义类型，而我没有'；I don’我不能做任何新的型号
vb6中未定义用户定义类型，而我没有'；I don’我不能做任何新的型号,vb6,Vb6,函数mot（ch作为字符串，c作为字符，i作为整数）作为整数 作为整数的Dim j 将a变暗为整数 将k变为整数 j=仪表（通道1，c） 如果j=-1，则 mot=j ElseIf j=i那么 mot=0 其他的 对于k=j到Len（ch）-1 如果Mid（ch，k，1）=c，则 a=a+1 如果结束 下一个 mot=a 如果结束 结束功能 高亮度：第一行（功能mot…） 错误：未定义用户定义的类型您是舒尔公司的，还是VB6公司的？我不记得VB6中的数据类型“CHAR”。试试字符串类型。你是舒尔
函数mot（ch作为字符串，c作为字符，i作为整数）作为整数
作为整数的Dim j
将a变暗为整数
将k变为整数
j=仪表（通道1，c）
如果j=-1，则
mot=j
ElseIf j=i那么
mot=0
其他的
对于k=j到Len（ch）-1
如果Mid（ch，k，1）=c，则
a=a+1
如果结束
下一个
mot=a
如果结束
结束功能错误：未定义用户定义的类型您是舒尔公司的，还是VB6公司的？我不记得VB6中的数据类型“CHAR”。试试字符串类型。你是舒尔公司的吗，你说的是VB6？我不记得VB6中的数据类型“CHAR”。试试字符串类型