何老师的济亨网

VB程序题：编一子过程MaxLength(s,MaxWord),在已知的字符串s中，找出最长的单词MaxWord。假定字符串s内只含有字母和空格，空格分隔不同的单词。程序运行界面如图F.5所示。提示：(1).........

VB程序题：编一个子过程DeleStr(s1,s2),将字符串s1中出现的s2子字符删去，结果存放在s1中。例如：s1="12345678AAABBDFG12345"S2="234"结果:s1="156.........

VB程序题：如果一个整数的所有因子（包括1，但不包括本身）之和与该数相等，则称这个数为完数。例如6＝1+2+3，所以6是一个完数。编写一个函数IsWs(m)判断m是否为完数，函数的返回值是逻辑型。主调程序在列表框显示1000.........

VB程序题：验证哥德巴赫猜想：任意一个大于2的偶数都可以表示成两个素数之和。编程将6～100之间的全部偶数表示为两个素数之和，在列表框显示结果，最后Label1显示有多少对素数之和，效果如图F.3所示。F.3图.........

VB程序题：编一函数过程IsH(n),对于已知正整数n，判断该数是否是回文数，函数的返回值类型为布尔型。主调程序每输入一个数，调用IsH函数过程，然后在图形框显示输入的数，对于回文数显示一个“★”，如下图所示。.........

VB程序题：编一个函数的过程MySin(x)，求MySin(x)=x/1-x^3/3!+x^5/5!-x^7/7!+…+(-1)^(n-1)*x^(2*n-1)/(2n-1)!当第n项的值小于5^(-5)时.........

VB程序题：参见教材例6.2，编一求两数m,n最大公约数的函数过程f(m,n)；主调程序在两个文本框接受输入数据，在图形框显示结果。如下图所示 VB源码龚沛曾解题，在窗体上画一个按钮，两个文本框，.........

VB程序题：编一子过程ProcMin(a()),amin),求一维数组a中的最小值amin VB源码龚沛曾主调程序随机产生10个-300~-400之间的数，显示所产生的数组中的各元素；调用ProcMin子.........

VB程序题：自定义类型数组的应用。要求：1.自定义一个职工数据类型，包含职工号、姓名、工资三项内容。在通用声明段声明一个职工类型的数组，可存放5个职工。2.窗体中设计3个标签、3个文本框、2个命令按钮和1个图形框.........

VB程序题：提供在窗体上显示的以汉字开头的字体名称，并显示该名称所对应得字体样式，程序运行效果如图E.10所示。VB源代码wb98.com提示：1.界面设计：窗体有两个Label和两个列表Lis.........

VB程序题：窗体上建立一个简单组合框，在组合框的文本框输入数字字符，按回车键后加入到组合框的列表框内，如图E.8（下图)所示；单击“交换”按钮，将列表框中最小值项目和第0个项目交换；最大值与最后项目交换，如图E.9所示。（w.........

VB程序题：设计一个选课的运行界面如图E.6所示。它包含2个列表框，左边为已开设的课程名称，通过Form1_Load事件加入，并按拼音字母排序；当单击某课程名称后，将该课程加入到右边列表框，并在左边列表框中删除该课程。当右边.........

VB程序题：输入整数n，显示出具有n行的杨辉三角形。图E.5显示n=8的效果。VB源码龚沛曾 提示：1.定义一个二维数组。2.对下三角各元素进行设置。3.利用TABA函数确定每列的宽度.........

VB程序题：参照教材例5.3，在通用声明段声明两个数组，利用随机函数形成如下两个数组：龚沛曾 要求：1.以下三角形式迷魂汤A数组，上三角形式显示B数组。2.求A数组主对角线元素之和和B数组副对角线.........

VB程序题：随机产生10个2位数，按从大到小递减的顺序排列，并显示排序结果。VB源代码龚沛曾 解题，窗体点击代码如下：PrivateSubForm_Click()  &n.........

VB程序题：随机产生20个学生的成绩，统计各分段人数。即0-59、60-69、70-79、80-89、90-100,并显示结果。产生的数据在Picture1显示，统计结果在Picture2显示。龚沛曾 解题.........

VB程序题：已知6个学生的成绩，通过对数组赋初值的方法，利用String函数，以每5分为一个“◆”显示，并显示学生的成绩，如下图所示。龚沛曾 解题，代码如下：PrivateSubForm_Click.........

VB程序题：随机产生30－100(包括30、100)的10个正整数，求最大值，最小值，平均值，并显示整个数组的值和结果，如下图所示。  解题，代码如下：PrivateSubForm_C.........

VB程序题：用计算机安排考试日程。期末某专业在周一~周六的6天时间内要考x,y,z三门课程，考试顺序为先考x，然后考y，最后考z，规定一天只能考一门，且z课程只能安排在周五或周六考。编写程序安排考试日程（即x,y,z）,要求.........

VB程序题：一个富翁试图与陌生人做一笔换钱生意，换钱规则为：陌生人每天给富翁10万元钱，直到满一个月（30天）；而富翁第一天给陌生人1分钱，第二天2分，第三天4分，……，富翁每天给陌生人的钱是前一天的两倍，直到满一个月。分别.........

VB程序题：参阅教材例4.20用迭代法求x=a立方根 求立方根的迭代公式为： 解题，窗体画1个按钮，代码如下：PrivateSubCommand1_Clic.........

VB程序题：编一程序，显示出所有的水仙花数。所谓水仙花数，是指一个3位数，其各位数字立方和等于该数字本身。例如，153是水仙花数，因为153=13+53+33。提示：解该题的方法有两种：1.利用三重循.........

VB程序题：sn=a+aa+aaa+aaaa+……+aa…aaa(n个a),其中a是一个由随机数产生的1~9（包括1,9）中的一个正整数，n是一个由随机数产生的5~10（包括5,10）中的一个数。例如，当a=2,n=5.........

VB程序题：计算π的近似值，π的计算公式为：注意：1.分别显示当n=10,100,100时的结果，由此可见，此计算公式收敛程序？2.同时要防止相乘时结果溢出的问题，将变量类型改为长整型或实数类型。.........

VB程序题：计算S=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+……当第i项的值<10-4时结束VB源码龚沛曾提示：找出规律，第i项的.........

VB程序题：用单循环实现如下图所示的界面。AAAAAAAAAAAAVB源码龚沛曾解题，代码如下：PrivateSubForm_Click() Fori=1To10Step.........

VB程序题：利用单循环结构显示如下图所示的界面。VB源代码龚沛曾提示：循环体内的显示用String函数来实现，找出循环控制变量与String函数内字符个数的关系：即String(2*i-1,Trim(S.........

VB程序题：编一模拟袖珍计算器的完整程序，界面如下图所示。要求：输入两个操作数和一个操作符，根据操作符决定所做的运算。VB源码龚沛曾提示：1.为了程序运行正确，对存入操作符的文本框Text3,应该使用T.........

VB程序题：输入一元二次方程ax2+bx+c=0的系数a,b,c,计算并输出一元二次方程的两个根x1,x2。界面如下图所示。VB源码龚沛曾提示：求根时要对a,b,c三个系数分别考虑多种情况的处理.........

VB程序题：利用计算机解决古代数学瓿“鸡兔同笼问题”。即已知在同一笼子里有总数为m只鸡和兔，鸡和兔的总脚数为n只，求鸡和兔各有多少只？VB源码龚沛曾提示：鸡、兔的通过输入的m，n，列出方程可解，但不要求.........