VB程序设计教程答案

某商场有一个价目表，该表有两项内容，即商品名和商品价格。原来的表中有4种商品的价格，即： 电冰箱 2340 电视机 5300 洗衣机 3320 自行车 890

编写程序，把上面的价目表存入一个数组，然后把新的商品名及其价格插入数组中。

阅读全文

用随机数函数Rnd生成一个8行8列的数组（各元素值在100以内），然后找出某个指定行内值最大的元素所在的列号。要求，查找指定行内值最大的元素所在列号的操作通过一个过程来实现。 解：求某一指定行中值最大的元素所在列号的过程如下： Function Max...

阅读全文

在主教材第9章中介绍了用梯形法求定积分的方法（例9.10)，请编写矩形法求定积分的程序。矩形法与梯形法的区别是：梯形法以一个小梯形（曲顶矩形）的面积近似代替小区间内曲顶梯形的实际面积，而矩形法则是以一个矩形来代替。例如，sinx曲线在(a,b)区间...

阅读全文

VB编程：编写过程，用下面的公式计算π的近似值：π/4=1-1/3+1/5-1/7+……+（-1） (n-1) *(1/(2*n-1)) 在事件过程中调用该过程，并输出当n=100,  n=500,  1000,  5000时π的近似值。

解：计算π的近似值的过程如下：

...

阅读全文

VB编程：编写一个过程，用来计算并输出 S=1+1/2+1/3+……+1/100 的值。 解：这个题目可以通过循环来解决，这里给出用Do循环和For循环编写的两个过程 Function sumD(n As Integer) As Single s = 1 i = 1 Do i = i + 1 s = s + 1 / i Loop Until i >= n sumD = s End Function

阅读全文

VB编程：编写八进制数与十进制数相互转换的过程： （1）过程ReadOctal,读入八进制数，然后转换为等值的十进制数。 （2）过程WriteOctal,将十进制正整数以等值的八进制形式输出。 解：Visual Basic 中的八进制数有两种类型，即整型（Integer）和长...

阅读全文