求这道vbvb试题题目及答案的解题思路

来源：蜘蛛抓取(WebSpider) 时间：2023-12-20 02:01 标签： vb试题题目及答案

1. ADO (ActiveX Data Object)2. 对象（窗体，控件）的大小、颜色、方位等一系列外观或内部构造的特征3. SelStart4. 只读的5. Visible属性设置为False6. (x Mod 5) = 0 And (x Mod 10) = 07. 第2条语句执行 4 次，第3条语句执行 12 次8. 209. 个数、类型、位置10. 两者不表示同一变量，且这两个变量之间没有联系11.(1)新建工程(2)设计用户界面：确定窗体，在窗体中添加控件。(3)设置对象的属性：窗体和控件的属性在属性窗口设置。(4)编写有关的代码程序。(5)调试：若窗体或程序有错，则重复前三步，直到程序完全正确及窗体令人满意为止。(6)应用程序的集成和管理（存储项目）：把有关项目存储起来，以便以后使用。(7)运行应用程序(8)建立可执行文件：脱离VB，而直接在Windows环境下运行。(9)结束项目。12. 顺序文件、随机文件、二进制文件13. msgbox过程中参数不带括号，且没有返回值，msgbox函数有括号，且具有返回值14. 如果X为Ture,则在窗体上输出X的值,否则输出X+1的值;运行结果是输出 115. Exit Do16. 对于静态数组，一般要声明尽可能大的数目浪费内存空间，而动态数组在运行过程中可以改变大小，节省内存空间，但浪费执行时间。静态数组只能是常量。17. (0/1 + 1/2 + 2/3 + 3/4 + 4/5)18. Option Base 1Private Sub Command1_Click()Dim arr1, Max As Integerarr1 = Array(12, 435, 76, 24, 78, 54, 866, 43)Max = arr1(1)For i = 1 To 8If arr1(i) > Max Then Max = arr1(i)Next iPrint "最大值是: "; MaxEnd Sub程序题 1.Private Sub Combo1_KeyPress(KeyAscii As Integer)Dim I As LongIf KeyAscii = 13 ThenFor I = 0 To Me.Combo1.ListCountIf Combo1.Text = Me.Combo1.List(I) ThenLabel2.Caption = "输入项已在组合框中"Exit SubEnd IfNext ILabel2.Caption = "已成功添加输入项"Combo1.AddItem Combo1.TextEnd IfEnd Sub程序题2.Dim I As IntegerDim tmpNum As IntegerDim TOTAL As LongRandomizeFor I = 1 To 20tmpNum = Int(100 * Rnd) + 200If tmpNum Mod 5 = 0 ThenTOTAL = TOTAL + tmpNumPrint tmpNumEnd IfNextPrint "TOTAL:" & TOTAL
1）（填空与问答） 1．Vb提供了一种新的数据库访问技术，即 ，通过该技术，能方便地访问数据库中的数据。 >ADODB2．对象的属性是指 。 >外部可访问的对象的特性3．在文本框中通过 属性能获得当前插入点所在的位置。 >SelStart4．在代码窗口中对窗体的MaxButton属性进行了设置，但运行后没有效果，原因是这些属性 。 5．为了使一个控件在运行时不可见，应该对该控件的 。>Visible = False6．表示x既是5的倍数又是10 的倍数的逻辑关系表达式 。 > ( x mod 5 = 0 ) and ( x mod 10 = 0)6．Vb也提供了三种基本结构，三种基本结构是 。 >顺序，选择，循环7．下面程序段中，第2条语句执行 4 次，第3条语句执行12 次。 1：for i=1 to 12 step 3 2： for j=6 to 2 step -2 3： print i,j 4： next j 5： next i 8．数组声明语句Dim a(3,-2to2,5)中的数组a包含了元素的个数是 75。 9．形参是在定义过程时的一种形式上虚设的参数，只代表了该过程参数的 引用 、 、 、形参的名字并不重要，只表示在该过程中进行某种运算或处理。 10．在同一模块、不同过程声明的相同变量名，两者之间 没有关系。 11．简述建立一个完整应用程序的过程。 >1.需求分析>2.设计>3.代码编写>4.单元测试>5.用户测试12． Visual Basic提供了那三种对数据文件访问方式？ >1.Readonly>2.Appending>3.Write13．使用MsgBox函数和MsgBox过程的区别是什么？ >函数有返回值14． 说明下面程序段的运行过程和结果。 Dim x If x Then Print x Else Print x+1 >Print + 1>Result:115．如果语句：Do While …..Loop构成了死循环，如何解决？ 检查修正循环条件以及循环变量16．静态数组和动态数组的区别是什么？ 动态数组 的元素个数可以改变17. 设有如下程序： Private Sub Command1_Click() Dim sum As Double, x As Double sum = 0 n = 0 For i = 1 To 5 x = n / i n = n + 1 sum = sum + x Next End Sub 该程序通过For循环计算一个表达式的值，这个表达式是什么？ sum = 1/1 + 1/1 + 1/1 + 1/1 + 1/1 = 518. 设有程序： Option Base 1 Private Sub Command1_Click() Dim arr1, Max as Integer arr1 = Array(12, 435, 76, 24, 78, 54, 866, 43) = arr1(1) For i = 1 To 8 If arr1(i) > Max Then Max = arr1(i)Next i Print "最大值是: "; Max End Sub 以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。 二、编程题 1．在窗体上画一个名称为Combo1的组合框，画两个名称分别Label1和Label2及Caption　　 属性分别为“城市名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示“已成功添加输入项”如图所示；如果存在，则在Label2中给出提示“输入项已在组合框中”。 Private Sub Combo1_KeyPress(KeyAscii As Integer)If KeyAscii = vbKeyReturn ThenDim i As LongDim bFound As BooleanFor i = 0 To Me.Combo1.ListCountIf Combo1.Text = Me.Combo1.List(i) ThenbFound = TrueExit ForEnd IfNext iIf bFound ThenLabel2.Caption = "输入项已在组合框中"ElseLabel1.Caption = "已成功添加输入项"Combo1.AddItem Combo1.TextEnd IfEnd IfEnd Sub2. 生成20个200到300之间的随机整数，输出其中能被5整除的数并求出它们的和。请填空。Me.AutoRedraw = TrueMe.ClsRandomizeDim i As LongDim nNum As LongDim nTot As LongFor i = 1 To 20nNum = Rnd * 100 + 200If nNum Mod 5 = 0 ThenPrint nNumnTot = nTot + nNumEnd IfNext iPrint "Tot:"; nTot

x=0Fori=1To5Forj=iTo5x=x+1NextjNextiPrintx答案是15求过程...
x = 0For i = 1 To 5For j = i To 5x = x + 1Next jNext iPrint x答案是15 求过程
展开选择擅长的领域继续答题？
{@each tagList as item}
${item.tagName}
{@/each}
手机回答更方便，互动更有趣，下载APP
提交成功是否继续回答问题？
手机回答更方便，互动更有趣，下载APP
本回答由提问者推荐已赞过已踩过你对这个回答的评价是？评论
收起单从作为一套科学的工具和行之有效的方法论方面，六西格玛可以这样来理解，六西格玛是一个高度有效的企业流程设计、改善和优化的技术，并提供了一系列同等地适用于设计、生产和服务的新产品开发工具。六西格玛方法体系分为DMAIC和DFSS两种。DMAI...
点击进入详情页本回答由冠卓咨询提供
展开全部先循环j后循环ix=1+2+3+4+5+2+3+4+5+3+4+5+4+5+5x=1+2+3+4+5 +2+3+4+5 +3+4+5 +4+5+ 5
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
下载百度知道APP，抢鲜体验使用百度知道APP，立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。扫描二维码下载
×个人、企业类侵权投诉
违法有害信息,请在下方选择后提交
类别色情低俗
涉嫌违法犯罪
时政信息不实
垃圾广告
低质灌水
我们会通过消息、邮箱等方式尽快将举报结果通知您。说明
做任务开宝箱累计完成0
个任务
10任务
50任务
100任务
200任务
任务列表加载中...

提交成功是否继续回答问题？
手机回答更方便，互动更有趣，下载APP
PLC培训可以去程控自动化PLC培训请认准程控自动化!专业化,标准化,系统化培训,帮助您60天变成PLC专家! 程控自动化,是一家承接电气自动化程序设计,电气与非标机械设计,设备改造,PLC培训的自动化公司。PLC培训实行一对一的随到随学培...
点击进入详情页本回答由闵行程控工程师培训提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
下载百度知道APP，抢鲜体验使用百度知道APP，立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。扫描二维码下载
×个人、企业类侵权投诉
违法有害信息,请在下方选择后提交
类别色情低俗
涉嫌违法犯罪
时政信息不实
垃圾广告
低质灌水
我们会通过消息、邮箱等方式尽快将举报结果通知您。说明
做任务开宝箱累计完成0
个任务
10任务
50任务
100任务
200任务
任务列表加载中...

我要回帖

更多关于 vb试题题目及答案 的文章

 

随机推荐