很可能是宏病毒,用＂winword /a＂启动Word试试

子程序是指你程序里面调用的程序,来看一下你的程序,Command1_Click() 里面哪里是子程序或者函数,可以发现你调用了一个VB的内置函数MSG,你想用这个函数来输出提示信息,不错.但是,想法很好,函数却用错了,你看一下MSDn会发现根本没有MSG(),近似的有MSGBOX(),这个函数正是输出内容的函数.调用之:msgbox (＂注意,你的1号框里没有任何内空请加入.＂) 这样没有内容输入的时候,这个提示“注意,你的1号框里没有任何内空请加入.”的对话框旧出来了,学一个函数一定要搞清出他的来历,用法

同问.

x1int (3 * rnd + 1)x2int (3 * rnd + 1)x3int (3 * rnd + 1)应该是 x1=int (3 * rnd + 1)x2=iint (3 * rnd + 1)x3=int (3 * rnd + 1)

出现这种情况,一般有两种可能.1、从网上找的程序,没有把相应的过程或函数一起找来.2、对子过程(或函数)的定义不一致.例如:子过程test1做在某个工作表中,设定的是private属性.然后在模块中有一个全局程序test要调用其这个子过程,那么就会出现这种错误.更改方法:将这个子过程设置成全局的(public),并放在模块中,这样就可以解决了.

先不说你的代码是否在逻辑上 能实现 你的要求,但就你使用的 这里明显的一处错误是:cell 应该是 Cells 你的少个 S 所以在编译的时候 就应该提示这样……

VB中子程序或函数未定义是指Sub, Function, 或 Property 未定义等.Sub, Function, 或 Property 未定义(错误 35) 调用 Sub、Function 或 Property 的过程必须定义..

1. 最后的EndSub 改成End Sub,加上空格.解决子程序或函数未定义;2. ＂b*b-4*a*c<=0＂ 去掉双引号,如果想规定程序的计算顺序可以加括号,如:((b*b)-(4*.

说明那个宏有问题,子过程或函数没有定义在代码里,导致 VBA 出错.

在主函数前定义一下