大佬们，求赐教。问题是求π。
正确做出来应该像第二张图，而且求出来的π是1.多

π是1点多？难道不是3.14...么
然后，R是什么？K是什么？M是什么？看代码R应该是圆的半径，K和M我就不知道你想用来表示什么了，能给个程序界面么……
嘛，反正你的思路也有问题，懒得想明白你这个思路了，直接说正确思路吧
首先，圆的半径R你有必要输入么？在代码里指定一个大小（比如80）不就得了？嘛，输入也可以吧，总之指定了R之后，以R为半径画圆，以R*2为边长画正方形（这个正方形你没画）
然后，循环n次（代码中指定了n=10000），每次随机产生一个正方形内部的点(x,y)（那句For你写错位置了，应该写在x=...前面），画出该点（你没画），计算该点到圆心的距离的平方，如果该点位于圆内部，则令计数加1（这里就是你代码里的另一个问题了，你到底想用M表示“点到圆心的距离”还是“圆内部的点的计数”？你应该把其中一个M改成K）
循环完后，用圆内部的点计数除以总的点数n（不是K），再乘以4，就得到π的值了，然后再把它显示出来（不建议用Print，可以用标签或者文本框，比如用文本框就这样写：Text3.Text=Pi）

　　注意：用【概率法】计算π值，是用的【古典概率理论】（要正确理解均匀地把绣花针扔在正方形内），并不是在 VB 程序中用【Rnd】值来取【随机数】。