如果一个数大于等于4，它的平方根肯定不会超过它自己，且一个数的平方根最多不会超过它的一半，例如求8的平方根，8的一半是4，4^2=16>8，如果这个数越大越是如此。小王利用这一规律使用对分查找思想计算某数的算数平方根，编写了一个VB程序，功能如下：单击“产生”按钮Command1，产生一个大于等于0且小于100的随机整数，并显示在文本框Text1中；单击“计算”按钮Command2，在文本框Text1中显示随机整数的平方根，且结果只保留整数部分，小数部分舍去。程序运行界面如图所示：