解决查找问题的算法流程图如图VB-学网-中国IT综合门户网站-提供健康,养生,留学,移民,创业,汽车等信息
> 信息中心 >
解决查找问题的算法流程图如图VB
来源：互联网 发表时间： 15:11:48 责任编辑：李志喜字体：
为了帮助网友解决“解决查找问题的算法流程图如图VB”相关的问题，学网通过互联网对“解决查找问题的算法流程图如图VB”相关的解决方案进行了整理,用户详细问题包括:
Private Sub Command1_Click()Dim key As String , i As IntegerDim j As Integer , found As Booleani = 1: j = 200 : found = False (1) Do While i &= j And Not found m = Int((i + j) / 2) If cno(m) = key Then found = TrueElseIf ...
found As Booleani = 1; Else Text2;= j And Not found m = Int((i + j) &#47.Text = &quot: j = 200 : found = False (1) Do While i &ltPrivate Sub Command1_Click()Dim key As S找不到& 2) If cno(m) = key Then found = TrueElseIf (2) Then i = m + 1 Else j = m - 1 End IfLoopIf Not found Then Text2, i As IntegerDim j As Integer
，具体解决方案如下：解决方案1：Key = Val(InputBox(&quot。&quot。显然：（2）应该是, i As IntegerDim j As I===================================================================代码中最后第二行那个“End If”：')而对分查找,另外数组的名称前面是cno,后面是cnum，应该是教科书上的问题，你没有告诉我题目是如何说的，你提问题要把代码分行写;对分查找&quot，可以升序也可以降序，否则没法工作？如果数组是升序的：cno(m) &找不到&quot，应该象如下所示，key没有赋值：cno(m) & 2) If cno(m) = key Then found = True ElseIf (2) Then i = m + 1 Else j = m C 1 End IfLoop If Not found Then Text2，好好学习吧, found As Booleani = 1.Text = cno(m) End IfEnd Sub程序中划线处(1)应填入程序中划线处(2)应填入&#39，这只是程序的一部分;===================================================================Private Sub Command1_Click()Dim key As String ，排序等;= j And Not found m = Int((i + j) /算法。 这个问题，所以（1）处应该是通过键盘输入要查找的数值: found = False(1)Do While i & Else Text2，因为其它部分必须处理数组的建立：（2）应该是.Text = &请输入要找的数值; key显然，是我帮你2上去了; key如果数组是降序的,我改为cno了，需要数组是有序的: j = 200 ，这样人家很难看清楚这个是&quot
相关文章：
最新添加资讯
24小时热门资讯
Copyright © 2004- All Rights Reserved. 学网 版权所有
京ICP备号-1 京公网安备02号您所在位置： &
&nbsp&&nbsp&nbsp&&nbsp
VB程序设计习题及参考答案(42页).doc42页
本文档一共被下载：
次 ,您可全文免费在线阅读后下载本文档。
文档加载中...广告还剩秒
需要金币：120 &&
VB程序设计习题及参考答案(42页).doc
你可能关注的文档：
··········
一、判断题 2
二、选择题 2
三、程序设计题 5
一、选择题 5
二、程序阅读题（写出下列程序的运行结果） 6
三、程序填空题 7
四、程序设计题 8
一、选择题 8
二、程序阅读题（写出下列程序的运行结果） 9
三、程序填空题 10
四、程序设计题 11
一、选择题 11
二、程序阅读题（写出下列程序的运行结果） 12
三、程序填空题 12
四、程序设计题 14
一、选择题 14
二、程序填空题 16
三、程序设计题 17
一、选择题 18
二、程序填空题 19
三、程序设计题 19
一、判断题 20
二、单选题 20
三、填空题 22
四、程序填空 22
五、程序设计题 23
一、选择题： 24
二、填空题 25
三、程序阅读题 25
三、编程题： 26
一、选择题 26
习题参考答案 30
一、判断题
1．Visual Basic是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言。√
2．面向对象的程序设计是一种以对象为基础，由事件驱动对象的编程技术。√
3．事件是由Visual Basic预先定义的对象能够识别的动作。√
4．新建工程时系统会自动将窗体标题设置为Form1。√
5．控件的属性值不可以在程序运行时动态地修改。×
6．决定对象是否可见的属性为Visible属性，决定对象可用性的属性是Enabled属性。√
7．保存Visual Basic文件时，若一个工程包含多个窗体或模块，则系统先保存工程文件，再分别保存窗体或模块文件。√
8．单击“启动”菜单项将窗体装入内存时，一定触发窗体的Load事件。√
9．“事件过
正在加载中，请稍后...题号：3282552题型：操作题难度：较难引用次数：40更新时间：15/08/19
现要求编写VB程序（界面如图1所示），实现下列功能：计算一个大写字母在26个字母中的位次。程序运行时，在文本框Text1中输入一个大写英文字母，单击“计算”按钮Command1，在标签Label1上输出其在26个字母中的位次。（1）在进行应用程序界面设计时，需要添加“计算”按钮，可使用如图2所示的“控件工具箱”中的_______________（填写相应编号），并在如图3所示的“属性窗口”中，将__________属性值设置为“计算”。（4分）&&（2）该程序的源代码如下，请根据题意将代码中①处补充完整，使程序能正常运行。（2分）Private Sub Command1_Click()Dim ch As String, pos As Integer&&&&&&①&&&&&= Text1.Textpos =" Asc(ch)" – 64Label2.Caption = "第" + Str(pos) + "个字母"End Sub
【知识点】
相关试题推荐
一个四位正整数，它的低二位和高二位差的绝对值为10，例如：1323，|23-13|=10。试求所有满足上述条件的四位正整数的和。请用VB代码设计该算法（注：流程图不给分）
现要求编写VB程序（界面如图1所示），实现下列功能：计算一个大写字母在26个字母中的位次。程序运行时，在文本框Text1中输入一个大写英文字母，单击“计算”按钮Command1，在标签Label1上输出其在26个字母中的位次。（1）在进行应用程序界面设计时，需要添加“计算”按钮，可使用如图2所示的“控件工具箱”中的_______________（填写相应编号），并在如图3所示的“属性窗口”中，将__________属性值设置为“计算”。（4分）&&（2）该程序的源代码如下，请根据题意将代码中①处补充完整，使程序能正常运行。（2分）Private Sub Command1_Click()Dim ch As String, pos As Integer&&&&&&①&&&&&= Text1.Textpos =" Asc(ch)" – 64Label2.Caption = "第" + Str(pos) + "个字母"End Sub
如下程度段：X=5Y=-20If& Not x&0 Then x=y-3& Else y=x+3该程序段运行后，y的值为：
暂时无评论暂时无评论
2015年春节，全国观众在喜迎春节看春晚的同时，通过“微信”及时参与到春晚活动中，与春晚直播现场互动，这说明“微信”主要是一种：（&）A．信息的存储方式B．信息的表达技术C．信息的编码标准D．信息的转换技术
热门知识点}