VB程序设计的常用算法填空题概要_第1页
VB程序设计的常用算法填空题概要_第2页
VB程序设计的常用算法填空题概要_第3页
VB程序设计的常用算法填空题概要_第4页
VB程序设计的常用算法填空题概要_第5页
已阅读5页，还剩5页未读， 继续免费阅读

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、VB程序设计的常用算法例:用随机函数产生100个0, 99范围内的随机整数，统计个位上的数字分 别为1,2, 3, 4, 5, 6, 7, 8, 9, 0的数的个数并打印出来。将程序编写在一个GetTJput过程中，代码如下：Public Sub GetTJput(Dim a(1 To 100 As In tegerDim x(1 To 10 As In tegerDim i As In teger, p As In teger产生100个0, 99范围内的随机整数，每行10个打印出来If a(i a(j The ntemp = a(ia(i = a(ja(j = tempNext jNext

2、 I2冒泡法排序(升序程序段如下If Thentemp=a(j:a(j=a(j+1:a(j+1=tempEnd ifNext jNext i3.合并法排序(将两个有序数组A、B合并成另一个有序的数组 C ,升序基本思想:1先在A、B数组中各取第一个元素进行比较,将小的元素放入C数组；2取小的元素所在数组的下一个元素与另一数组中上次比较后较大的元素比较 重复上述比较过程，直到某个数组被先排完；3将另一个数组剩余元素抄入 C数组，合并排序完成。程序段如下：当A和B数组均未比较完If A(ia B(ib The nC(ic = A(ia:ElseC(ic = B(ib:ib = ib + 1End

3、IfLoopDo While ia = UBound(A A 数组中的剩余元素抄入 C数组ia = ia + 1:ic = ic + 1LoopDo While ib a(p And p = 10 ThenSR = & SRElseEnd Ifm= m rLoopEnd Function1.统计文本单词的个数F面程序段是字符串strI中包含的单词数Nw = 0: Wt = FalsenL = Len (RTrim(strlFor i = 1 To nL取第i个字符Select Case strTCase ,;,!Wt = FalseCase ElseIf Not Wt The nWt = TrueEnd IfEnd SelectNext iPrint 单词数为:,Nw八、穷举法1元和0.5元的零钞,例:将一张面值为100元的人民币等值换成100张5元、 要求每种零钞不少于1张，问有哪几种组合?Dim i%, j%, k%Print 5 元 1 元 0.5 元For i = 1 To 20For j = 1 To 100 - iIf 5

人人文库> 全部分类> 行业资料 > 信息产业

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论