VB题目,编辑程序基础问题

来源:百度知道 编辑:UC知道 时间:2024/06/07 07:21:05
帮个忙啊
把下面的题目用VB代码写出来

1、用直接插入排序及交换定位排序将下列数按降序排列并显示。
89 5 78 822 56 412 45 1 220
2、做一个线性表,将上述数字加入到线性表中。
做一个删除节点功能,将线性的第三个节点删除。
3、做一个堆栈,将上述数字全部入栈
做一个出栈功能,已入栈的内容全部出栈。并显示出栈序列。

4、
**********
* *
* *
**********

*********
* * *
* * *
*********

*********
* *
* *
* *
*
5、用递归求出X=1+1/2!+1/3!+1/4!+....(要求精确到小数点后6位为止)(!表示:比如前面的"1/3!"就是"1/3+1/2+1/1"以此类推)
6、一个渔夫打鱼,每次都只打池塘中的鱼的总数的1/4加10条,到了第10次打完后,发现此时池塘中只有10条鱼,问,池塘中原来有几条鱼。
7、已知离子火箭能持续加速,每秒的加速度为0.05m/s,设,离子火箭发射于2008-1-1 0:0:0,发射初速度为11.3km/s,经过一年后,该火箭速度为多少,已距离发射点多少千米?
要全代码写出来,不用跟我说中文原理

PS:第4题的第一个是一个"口"字,第二个是一个倒着的"日"字,第三个是空心倒三角(空格没了)

先来回答第一个,很简单,你在Timer的事件里加入
Private Sub Timer1_Timer()
if K=1 then
'你的代码
endif
end Sub
第2个,绝对不能放在Timer的事件里
Private Sub Button1_Click()
Do While k=1
'执行代码
doevents
loop
end Sub
第3个使用过程或子函数,区别就是过程没有返回值
第4个可以自己维护一个动态数组
第5个比较麻烦,要涉及到动态创建控件的知识,还有一种变通的方法,就一个WebBrowser,用几个标签改变它的显示,MFC的文档视图框架做这个太简单了,可惜VB用不上

补充3详细的答案
Sub 过程子过程是在响应事件时执行的代码块。将模块中的代码分成子过程后,在应用程序中查找和修改代码变得更容易了。
子过程的语法是:[Private|Public][Static]Sub procedurename (arguments)statementsEnd Sub每次调用过程都会执行 Sub 和 End Sub 之间的 statements。可以将子过程放入标准模块、类模块和窗体模块中。按照缺省规定,所有模块中的子过程为 Public(公用的),这意味着在应用程序中可随处调用它们。过程的 arguments 类似于变量声明,它声明了从调用过程传递进来的值。在 Visual Basic 中应区分通用过程和事件过程这两类子过程。通用过程通用过程告诉应用程序如何完成一项指定的任务。一旦确定了通用过程,就必须专由应用程序来调用。反之,直到为响应用户引发的事件或系统引发的事件而调用事件过程时,事件过程通常总是处于空闲状态。为什么要建立通用过程呢?理由之一就是,几个不同的事件过程也许要执行同样的动作。将公共语句放入一分离开的过程(通用过程)并由事件过程来调用它,诚为编程上策。这样一来就不必重复代码,也容易维护应用程序。例如,VCR 示例应用程序使用了一个通用过程,几个不同滚动按钮的 Click 事件都调用这个通用过程。图