首页 vb试题1

vb试题1

举报
开通vip

vb试题1—下列关于VB编程的说法中,不正确的是_D_______。A.事件是能被对象识别的动作B.方法指示对象的行为C.属性是描述对象特征的数据D.VB程序采用的运行机制是面向对象在VisualBasic中最基本的对象是__B_____,它是应用程序的基石,是其他控件的容器。A.文本框B.窗体C.标签D.命令按钮VB6.0的__A_____版本,可供专业编程人员开发功能强大的组内分布式应用程序。A.企业版B.学习版C.专业版D.初级版有说明语句:Dimx!,则x是__B______类型的变量。A.整型B.单精度...

vb试题1
—下列关于VB编程的说法中,不正确的是_D_______。A.事件是能被对象识别的动作B.方法指示对象的行为C.属性是描述对象特征的数据D.VB程序采用的运行机制是面向对象在VisualBasic中最基本的对象是__B_____,它是应用程序的基石,是其他控件的容器。A.文本框B.窗体C.标签D.命令按钮VB6.0的__A_____版本,可供专业编程人员开发功能强大的组内分布式应用程序。A.企业版B.学习版C.专业版D.初级版有 说明 关于失联党员情况说明岗位说明总经理岗位说明书会计岗位说明书行政主管岗位说明书 语句:Dimx!,则x是__B______类型的变量。A.整型B.单精度浮点型C.长整型D.双精度浮点型下面所列符号中,__C_______不是数据类型说明符。A.!B.%C.?D.#为了给x,y,z三个变量赋初值1,下面的赋值语句正确的是______C___。A.x=y=z=1B.xyz=1C.x=1:y=1:z=1D.x=1,y=1,z=1判断整型变量x是奇数的 关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf 达式是_D_______。A.xMod2!=0B.xMod2=0C.xMod3=0D.xMod2<>0用来确定一个控件在窗体上位置的属性是_D_______。A.Width和HeightB.Width或HeightC.Top或LeftD.Top和Left在默认情况下,InputBox()函数返回值的类型为___D_____。A.逻辑类型B.变体类型C.数值型D.字符串型在使用InputBox时,必须设置的参数是___B_____。A.无B.提示C.标题D.缺省以下Case语句中错误的是__A_____。A.CaseIs>10AndIs<5B.Case3,5,Is>10C.CaseIs>10D.Case0to10当字符型变量中第三个字符是"C"时,利用MsgBox过程显示"Yes",否则显示"No",正确的条件语句是___A_____。A.IfMid(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"B.IfLeft(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"C.IfRight(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"D.Ifstring(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"执行下列程序段输出的结果是_A_。X%=2DoWhilex<8Print"*";X=x+2LoopA.***B.****C.*D.**要使For语句fork=__To-5Step-2循环执行20次,循环变量的初值应是___B______。A.35B.33C.32D.31声明一个长度为10个字节的字符串变量mstr,应使用____D____。A.DimmstrAsString(10)B.Dimmstr(10)AsStringC.DimmstrAs10D.DimmstrAsString*10语句DimAbc(5)所定义的数组元素个数是__A______。A.6B.5C.4D.10下面叙述中,错误的是____A______。A.自定义类型只能在窗体模块的通用声明段进行声明B.在窗体模块中定义自定义类型时必须使用Private关键字C.自定义类型中的元素类型可以是系统提供的基本数据类型或已声明的自定义类型D.自定义类型必须在窗体模块或 标准 excel标准偏差excel标准偏差函数exl标准差函数国标检验抽样标准表免费下载红头文件格式标准下载 模块的通用声明段进行声明由Array函数建立的数组,其变量必须是__C_______类型。A.字符型B.整型C.变体型D.字符串类型子过程Sub...EndSub的形式参数可以是____D_______。A.常数、简单变量、数组变量B.常数、简单变量、数组变量和运算式C.简单变量、数组变量和运算式D.简单变量、数组变量编写如下事件过程:PrivateSubForm_Click()Dimx$,y$,Z$,i%x="祝你成功"y="1234"Fori=1To4Z=Z+Mid(x,i,1)+Right(y,1)NextiPrintZEndSub程序运行后,单击窗体,则窗体上显示的内容是___B________。A.祝你成功1234B.祝4你4成4功4C.祝1你1成1功1D.1234祝你成功设已定义函数过程f,它有三个整型数值参数,再设a,b和c为实型变量,则调用该函数过程使用的语句为___D_____。A.fa+b,b+c,c+aB.fC.f(a+b,b+c)D.f(a+b,b+c,c+a)有如下程序:PrivateSubForm_Click()a=1:b=2:c=3Callss(a,b,c)Printa;b;cEndSubPrivateSubss(ByValx,ByRefy,z)x=x+1:y=y+1:z=z+1EndSub程序运行后,单击窗体,则输出的结果是_D_______。A.224B.123C.133D.134在过程的定义中,使用关键字___A_____来修饰形式参数,可以使之按地址传递。A.ByRefB.ByValC.ReferenceD.Value以下描述中,正确的是___D_____。A.过程的定义和过程的调用均可以嵌套B.过程的定义可以嵌套,但过程的调用不能嵌套C.过程的定义和过程的调用均不能嵌套D.过程的定义不可以嵌套,但过程的调用可以嵌套在VisualBasic中,要使一个窗体不可见,但不从内存中释放,应使用的语句是___D______。A.UnLoandB.ShowC.LoadD.HideVisualBasic控件分为3类,它们分别是标准控件、ActiveX控件和可插入对象。其中只有___D_______是由系统提供的。A.ActiveX控件B.可插入对象C.以上都可以D.标准控件为了装入一个VisualBasic应用程序,下列说法中,正确的是__C______。A.分别装入 工程 路基工程安全技术交底工程项目施工成本控制工程量增项单年度零星工程技术标正投影法基本原理 文件和标准模块文件(.bas)B.只装入窗体文件(.frm)C.只装入工程文件(.vbp)D.分别装入工程文件、窗体文件和标准模块文件当组合框的_C_____属性值为2时,不允许用户在组合框中输入任何文本。A.TextB.ListC.StyleD.ListCount滚动条的默认属性是__C____。A.NameB.MinC.ValueD.Max在使用多组Option控件时,可以选用___C_____控件,对这些Option控件分组。A.CheckB.LineC.FrameD.Shape下列___D_____事件是菜单项可以触发的事件。A.MouseUpB.MouseDownC.KeyPressD.Click用户按下并且释放一个会产生ASCII码的键时,被触发的事件是____C___。A.KeyB.KeyUpC.KeyPressD.KeyDown下面所列中,鼠标单击事件名为___D_____。A.DblClickB.MouseUpC.MouseDownD.Click程序题(12)PrivateSubform_click()s=0i=1DoWhilei<=100IfiMod10<>0Thens=s+ii=i+1Elsei=i+1EndIfLoopPrintsEndSub运行后,输出的结果是__C_____A.4000B.4050C.4500D.5050程序题(14)建立并输出10*10的方阵,其中每个数都是随机数且范围是[1,9],把下面程序补充完整PrivateSubForm_click()Dima%(1to10,1to10),i%,j%RandomizeFori=1To10Forj=1To10a(i,j)=___A______PrintTab(j*5);a(i,j);NextjPrintNextiEndSubA.Int(Rnd*9)+1B.Int(Rnd*9)C.Int(Rnd)D.Rnd*9程序题(11)PrivateSubForm_click()Dims%,i%s=0i=100DoWhilei<=120If(i\3)*3=iThens=s+1i=i+1EndIfi=i+1LoopPrintsEndSub运行后,输出的结果是__D_____A.13B.9C.11D.7程序题(48)执行下列程序段后,输出结果为__C____x=1Fori=0To20Step10x=x+iMod4NextiPrintxA.5B.30C.3D.7程序题(46)执行后,s的值为10,请填空PrivateSubform_Click()s=0Fori=1__B____s=s+iNextiPrintsEndSubA.To3B.To4C.To5D.To2程序题(39)下列程序运行后文本框中显示的内容是___A__________。PrivateSubCommand1_Click()a=""Forn=1To100IfnMod37=0Thena=a&Trim(Str(n))EndIfNextText1.Text=aEndSubA.3774B.37C.74D.3774从字符串中任意位置截取字符的函数是____B_____。A.Left()B.Mid()C.Str()D.Right()从字符串变量Cstr中取左边4个字符,应使用__A______。A.Left(Cstr,4)B.Left(Cstr,1,4)C.Mid(Cstr,3,4)D.Mid(Cstr,4,3)结构化程序由三种基本结构组成,下面术语中是三种基本结构之一的是___B____。A.递归结构B.选择结构C.输入输出结构D.过程结构在VisualBasic中注释语句使用____B____符号来标志。A.@B.'C.*D.#VisualBasic程序 设计 领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计 语言中,响应对象的外部动作称为____D_____,而对象可以执行的动作或对象本身的行为则称为________。A.属性,方法B.过程,事件C.方法,事件D.事件,方法在VisualBasic中称对象的数据为_D_________。A.方法B.事件C.封装D.属性下面所列中,合法的变量名是_____A_____。A.x_yzB.integerC.X+YD.123abc下列所列符号中,____B_____是VB中的合法变量名。A.7ABB.AB7C.IFD.A[B]7下面所列中,__C________是合法的字符常数。A.ABCB.'ABC'C."ABC"D.ABC$判断题:语句A=C:C=B:B=A的作用是实现A、B的值互换。F判断题:语句Ifx>0Theny=7x-1是正确的。F判断题:若要清除列表框的所有项目内容,可以使用Clear方法。T判断题:若有数组说明语句:Dima()则a被定义为变体型数组。T判断题:VB中的数组声明时可根据需要声明为定长数组和动态数组。T判断题:不能用于列表框控件的方法是AddItemF判断题:VB中可以同时删除字符串前导和尾部空白的函数是trim()。T判断题:语句DimB(-1To5,4)AsInterger所定义的数组B的元素个数是25个。F判断题:若使命令按钮Command1重新生效,则使用的赋值语句为Command1.Enabled=falseF判断题:日期/时间型常量应使用井号(#)将其括起来。T一个名为pic2.gif的图形文件,要在运行期间把该文件装入一个图片框(Picturel),应执行的语句是__Picture1.Picture=LoadPicture("pic2.gif")picture1.picture=loadpicture("pic2.gif")___。VB6.0识别对象靠的是对象的__NAMENamename___属性。组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和__下拉式组合框___。如果菜单标题的某个字母前输入一个__&___符号,那么该字母就成了热键字母。如果建立菜单时在标题文本框中输入一个__-___,那么显示时将形成一行分隔符。在窗体上有一个命令按钮,其名称为Command1,然后编写如下程序:FunctionM(xAsInteger,yAsInteger)AsIntegerM=IIf(x>y,x,y)EndFunctionPrivateSubcommand1_Click()DimaAsInteger,bAsIntegera=100b=200PrintM(a,b)EndSub结果为:200_____。当用__APPENDappendAppend___方式打开文件时,如果对文件进行写操作,则写入的数据附加到原来文件的后面。在程序运行中,要想使用按钮变成看得见但不可操作,则应设置__ENABLEDEnabledenabled____的属性是False。MsgBox函数的返回值的类型为___数值型__。文本框的默认属性是_TexttextTEXT____。'-------------------------------------------------'【程序设计】'-------------------------------------------------'题目:(事件)双击窗体。'(响应)求s=1+1×2+1×2×3+…+1×2×3×…×10,'并将结果存到变量S中'-------------------------------------------------PrivateSubForm_dblClick()DimsAsLong'********Begin*******Dimi,jAsIntegerDimkAsLongk=1s=0Fori=1To10Forj=1Toik=k*jNexts=s+kk=1NextPrint(CStr(s))'*********End************TestFunc(s)EndSubPrivateSubTestFunc(iAsLong)DimOUTAsIntegerOUT=FreeFileOpenApp.Path&"\7.out"ForOutputAs#OUTPrint#OUT,iClose#OUTEndSub【窗体设计】------------------------------------------------题目:请按照题目要求设计指定的窗体。建立如(图1)所示界面:请按所给窗体的样子设计窗体,不要求控件的尺寸一样,运行时得到所给窗体即可。------------------------------------------------【控件】VB.TextBox_Text1标准答案:Name=Text1【控件】VB.TextBox_Text1标准答案:Text=字体和字形练习【控件】VB.CheckBox_Check4标准答案:Name=Check4【控件】VB.CheckBox_Check4标准答案:Caption=下划线【控件】VB.CheckBox_Check3标准答案:Name=Check3【控件】VB.CheckBox_Check3标准答案:Caption=删除线【控件】VB.CheckBox_Check2标准答案:Name=Check2【控件】VB.CheckBox_Check2标准答案:Caption=倾斜【控件】VB.CheckBox_Check1标准答案:Name=Check1【控件】VB.CheckBox_Check1标准答案:Caption=加粗【控件】VB.OptionButton_Option2标准答案:Name=Option2【控件】VB.OptionButton_Option2标准答案:Caption=黑体【控件】VB.OptionButton_Option1标准答案:Name=Option1【控件】VB.OptionButton_Option1标准答案:Caption=宋体下属选项中,属于VB的程序设计方法是__C_____。A.面向过程,事件驱动B.面向对象、顺序驱动C.面向对象,事件驱动D.面向过程,顺序驱动以下叙述错误的是___A_____。A.打开一个窗体文件时,系统自动装入与该窗体有关的工程文件B.事件可以由用户激发,也可由系统激发C.打开一个工程文件时,系统自动装入与该工程有关的窗体等文件D.保存VB应用程序时,应分别保存窗体文件和工程文件表达式10\8Mod9的值是___B______。A.2B.1C.9D.0要在窗体Form1内显示字符串"MyForm",可以使用的语句是___B_____。A.Form1.Caption="MyForm"B.Form1.Print"MyForm"C.Form.Caption="MyForm"D.Form.Print"MyForm"下面程序段的功能是求两个数中的大数,其中__B_______是不正确的。A.Max=IIf(x>y,x,y)B.Ify>=xThenMax=y:Max=xC.Ifx>yThenMax=xElseMax=yD.Max=x:Ify>=xThenMax=y执行语句"Fori=1to3:i=i+1:Nexti"后变量i的值是C__。A.6B.4C.5D.3关于Do...LoopUntil循环正确的描述是_C_。A.如果"条件表达式"的值为真,则一次循环也不执行B.如果"条件表达式"的值为真,则要继续执行循环体C.不论"条件表达式"是否为"真",至少要执行一次循环体D.如果"条件表达式"的值为假,则一次循环也不执行语句DimAbc(5)所定义的数组元素个数是___A_____。A.6B.5C.4D.10在使用动态数组前,需要对动态数组进行重新定义,使用____B_____语句。A.UnloadB.RedimC.LoadD.Dim下列叙述中,错误的说法是____D_______。A.使用Redim语句可以改变数组每维数的大小B.使用Redim语句可以对数组的元素初始化C.使用Redim语句可以改变数组的维数D.使用Redim语句可以改变数组的类型在代码中,定义了一个子过程:SubP(a,b)…EndSub下面调用该过程的格式正确的___D________。A.P()B.P10,20,30C.P10D.P10,20PrivateSubCommand1_Click()DimxAsString*1,yAsString,i%x="a"Fori=Asc(x)ToAsc(x)+4y=y&Chr(i)NextiPrintyEndSub程序运行后,单击命令按钮,则窗体上显示的内容是____D_______。A.aB.aaaaC.32D.abcde通用过程可以通过执行"工具"菜单中的___B_____命令来建立。A.通用过程B.添加过程C.添加窗体D.添加模块设有如下两个过程:PrivateSubForm1_Click()Dimx$,y%x=18:y=10CallPPP((x),y)Printx,yEndSubPrivateSubPPP(aAsSingle,bAsSingle)a=a+bPrinta,bb=a+bPrinta,bEndSub运行程序后,则输出结果是___A_____。A.281028381838B.281028381810C.281028382838D.281028382810在过程的定义中,使用关键字___A_____来修饰形式参数,可以使之按值传递。A.ByValB.ByRefC.ReferenceD.Value下列叙述中,正确的是___C_____。A.在调用过程时,所有局部变量被系统初始化为0或空字符串B.在窗体的Form_Load事件过程中定义的变量是全局变量C.在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名,但其作用域只限于该过程D.局部变量的作用域可以超出所定义的过程要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对__C________属性设置就有效。A.WidthB.MinButtonC.BorderStyleVisualBasic控件分为3类,它们分别是标准控件、ActiveX控件和可插入对象。其中只有__D________是由系统提供的。A.ActiveX控件B.可插入对象C.以上都可以D.标准控件下列操作中,不能打开代码窗口的操作是___A_____。A.单击窗体或控件B.双击窗体上的某个控件C.按F7键D.双击窗体文本框控件没有___A_______属性。A.CaptionB.VisibleC.EnabledD.BackColor用户在组合框中输入或选择的数据可以通过__C____属性获得。A.ListB.TextC.ListIndexD.ListCount下面关于列表框正确的是___B_____。A.列表框中的内容可以直接修改B.列表框控件实质是一维字符数组C.列表框的AddItem方法是把项目从列表框中删除D.列表框的Clear方法是删除列表框中由索引值指定的项目用户释放任意一个鼠标按钮时,被触发的是___A____事件。A.MouseUpB.MouseMoveC.DblClickD.MouseDown用户释放键盘上任意一个键时,被触发的事件是__C_____。A.KeyPressB.KeyDownC.KeyUpD.Key程序题(11)PrivateSubForm_click()Dims%,i%s=0i=100DoWhilei<=120If(i\3)*3=iThens=s+1i=i+1EndIfi=i+1LoopPrintsEndSub运行后,输出的结果是_D______A.13B.9C.11D.7程序题(69)在窗体上画一个名称为Command1的命令按钮,编写下列程序:PrivateSubCommand1_Click()DimaAsIntegerStaticbAsIntegera=a+bb=b+4Printa,bEndSub程序运行后,单击该命令按钮三次后,屏幕上显示的值是_____A___。A.812B.48C.04D.412程序题(41)PrivateSubCommand1_Click()Text1="abcdef"Text2="cde"i=InStr(Text1,Text2)k=i+Len(Text2)Printi,kEndSub窗体上显示的输出结果为__C______A.26B.28C.36D.38程序题(35)编写一个过程,求一个数的正整数次幂。请填空使程序完整PrivateFunctionff1&(ByValx%,ByValy%)Dimt&,i%t=1Fori=1Toyt=t*xNext_________A________EndFunctionPrivateSubForm_Click()Dima%,b%a=Val(inputbox("a=?"))b=Val(inputbox("b=?"))Printff1(a,b)EndSubA.ff1=tB.x=tC.t=ff1D.y=t表达式Fix(5.6)+Int(-5.6)的值是_A______。A.-1B.1C.以上都不对D.0表达式Format(val("111a"),"##.##")的值是___A____。A.111.B.11.10C.111.00D.11.1a关于VB源代码的编写,下列说法错误的是__D_____。A.VBÔ´´úÂëÖв»Çø·Ö×ÖĸµÄ´óСдB.同一行可以写多个语句C.可以适当添加注释有利于程序的维护和调试D.一个语句必须写在一行中,不可分成多行来书写以下叙述中错误的是_C_______。A.事件过程是响应特定事件的一段程序B.对象的方法是执行指定操作的过程C.对象事件的名称可以由编程者指定D.不同的对象可以具有相同名称的方法下面所列中,_______D___是不合法的单精度常数。A.100!B.100C.1E+2D.100.0D+2按变量名的定义规则,下面所列中,______C____是错误定义的变量名。A.StudentB.Mark_2C.IntegerD.Max下列所列中,__D______是合法的变量名。A.x%yB.orC.2xD.xy%VB6.0 集成环境的主窗口中不包含___B____。 A.标题栏B.状态栏C.工具栏D.菜单栏下面四个选项中,不是 VB6.0 工具箱的标准控件的是__C_____。 A.定时器B.滚动条C.多媒体D.框架VB6.0 集成开发环境可以_____D__。A.编辑、调试、运行程序,但不能生成可执行程序B.编辑、生成可执行程序、运行程序,但不能调试C.编辑、调试、生成可执行程序,但不能运行程序D.编辑、调试、运行程序,也能生成可执行程序表达式 10\8Mod  9 的值是__B_______。A.2B.1C.9D.0a+b 小于 10 且 a-b 大于 1 的逻辑表达式是____c_____。A.(a-b>1)To(a+b<10)B.a+b<10.And.a-b>1C.a+b <10And  a-b>1D.a+b<10Ora-b>1要在窗体 Form1 内显示字符串 "MyForm",可以使用的语句是______B__。 A.Form1.Caption="MyForm"B.Form1.Print"MyForm"C.Form.Caption="MyForm"D.Form.Print"MyForm"执行语句 receive=MsgBox("AAAA",,"BBBB","",5)后,所产生的信息框的标题是__b_____。A.AAAAB.BBBBC.空D.出错,不能产生信息框下面程序段的功能是求两个数中的大数,其中___B______是不正确的。A.Max=IIf(x>y, x, y)B.Ify>= xThenMax=y:  Max=xC.Ifx>yThenMax=xElseMax=yD.Max=x:Ify>=xThenMax=y如果在窗体上画一个命令按钮Command1,然后编写如下事件代码  Private SubCommand1_click()  X=2  For  i=1 to10  Step2          X=x+i       Next  i Printx  End Sub那么,程序运行后,单击命令按钮,其窗体上显示的结果是D__。 A.57B.38C.26D.27执行语句For  i=1to3:Printi:Nexti后变量i的值是______B___。A.3B.4C.2D.1设有数组说明语句:Dim c(-1To1,1To5),则下列表示数组 c 的元素选项中正确的是__D_______。A.c(1,0)B.c(i+j)C.c(i)(j)D.c(i,j)要分配存放12个元素的整形数组,错误的数组声明是__B______。A.Dima%(1To 12)B.Dima(3,4)C.Dima(11)AsintegerD.Dima%(2,3)下列叙述中,错误的说法是___D________。A.使用Redim语句可以改变数组每维数的大小B.使用Redim语句可以对数组的元素初始化C.使用Redim语句可以改变数组的维数D.使用Redim语句可以改变数组的类型在代码中,定义了一个子过程: SubP(a,b) …EndSub 下面调用该过程的格式正确的____D_______。 A.P()B.P  10,20,30C.P  10D.P  10,20编写如下事件过程: PrivateSubForm_Click()           Dim x$,y$,Z$,i%    x="祝你成功"       y="1234"         For i=1To4           Z=Z+Mid(x,i,1)+Right(y,1)       Next i       Print Z   EndSub    通用过程可以通过执行"工具"菜单中的_____B___命令来建立。 A.通用过程B.添加过程C.添加窗体D.添加模块有如下的程序:   Private SubCommand1_Click()       a=1:b=2:c=3        Call test(a,b+3,(c))       Print "main:";a;b;c   End Sub   Private Functiontest(p,m,n)       p=p+1:m=m+1:n=n+1       Print"Sub:";p;m;n   End Function 当运行程序后,单击命令按钮 Command1 ,显示的结果是____D____。 A.sub:264   main:1 64B.sub:264   main:2 64C.sub:264   main:1 23D.sub:246   main:2 23以下描述中,正确的是____D____。A.过程的定义和过程的调用均可以嵌套B.过程的定义可以嵌套,但过程的调用不能嵌套C.过程的定义和过程的调用均不能嵌套D.过程的定义不可以嵌套,但过程的调用可以嵌套在 VisualBasic 中,下列控件中, __D______控件可以包含其他控件。A.CheckBoxB.TextBoxC.Image  D.Frame 当组合框的____C__属性值为2时,不允许用户在组合框中输入任何文本。A.TextB.ListC.StyleD.ListCountTimer 控件可用于后台进程中,可在 Timer 事件内编程,要停止触发 Timer 事件,可通过以下___C____属性。A.Enabled=False且Interval=0B.Enabled=False或Visible=FalseC.Enabled=False或Interval=0D.Visible=False或Interval=0为菜单项中某字母添加热键的方法是在该字母前加__B____。A."-"B."&"C."@"D."#"用户释放键盘上任意一个键时,被触发的事件是___C____。A.KeyPressB.KeyDownC.KeyUpD.Key程序题(16)建立并输出10*10的上三角矩阵,其中每个数都是随机数且范围是[1,9],把下面程序补充完整PrivateSubForm_click()   Dima%(1to10,1to10),i%,j%   Randomize   For i=1To10      For j__c__        a(i,j) =Int(Rnd*9)+1       Print Tab(j*5);a(i,j);      Next j      Print   Next iEndSub A.=1To10-iB.=1To10C.=iTo10D.=1Toi程序题(69)在窗体上画一个名称为Command1的命令按钮,编写下列程序:    Private SubCommand1_Click()      Dim aAsInteger      Static bAsInteger      a=a+b      b=b+4      Print a,b    End Sub程序运行后,单击该命令按钮三次后,屏幕上显示的值是______A_。 A.8    12B.4   8C.0  4D.4  12程序题(49)执行下列程序段后,输出结果7,请填空  B     x =1  For i=0To20Step5    x =x+i____4  Next i  Print x A.8B.modC.\D./程序题(19)下面程序的功能是:根据给定数组,用选择排序法按从小到大递增的顺序排列并显示排序结果    APrivateSubForm_click()Dima(),iMin%,i%,j%,t%a=Array(8,6,9,3,14,7,23)n=UBound(a)Fori=0Ton-1    iMin =i    For j=i+1Ton      If___________ TheniMin=j    Next j    t =a(i)    a(i) =a(iMin)    a(iMin) =tNexti    For i=LBound(a)ToUBound(a)        Print a(i);     Next iEndSubA.a(j)<a(iMin)B.a(j)>a(iMin)C.a(i)>a(iMin)D.a(i)<a(iMin)确定字符串 str2 在字符串 str1 中起始位置的函数是____D_____。A.Mid()B.String()C.Left()D.Instr()在一行语句内写多条语句时,每个语句之间用___B_____符号分隔。A.;B.:C.,D.、在 VisualBasic 中称各种可在对象上操作的过程为_______D__。A.属性B.事件C.封装D.方法下列所列中,_____D___是合法的变量名。A.x%yB.orC.2xD.xy%按变量名的定义规则,下面所列中,___C_______是错误定义的变量名。A.StudentB.Mark_2C.IntegerD.Max判断;判断题:窗体最常用的事件只有Load(装入)事件。X判断题:表达式12+23Mod10\7的值为12。O判断题:若把图片框Picture1中的图形清除,可以使用的办法是使用语句 Picture1.Picture=LoadPicture(X )判断题:设A=3,B=4,C=5,D=6,计算表达式A>BANDC<=DOR2*A>C的值是False。 X判断题:VB中可以同时删除字符串前导和尾部空白的函数是trim(0)。判断题:用于去掉字符串左边空格的函数是 Rtrim(X)。判断题:能正确表达a≤1或a≥5的逻辑表达式是:a<=1ora>=5     0判断题:表示x是5或9的倍数的表达式是xmod5=0orxmod9=0。    0判断题:语句DimB(-1To5,4)AsInterger 所定义的数组B的元素个数是25个。  X判断题:不能用于列表框控件的方法是AddItem。  X填空一个名为pic2.gif的图形文件,要在运行期间把该文件装入一个图片框(Picturel),应执行的语句是__Picture1.Picture=LoadPicture("pic2.gif")_picture1.picture=loadpicture("pic2.gif")_。  在窗体上有一个命令按钮,其名称为Command1,然后编写如下程序:FunctionM(xAsInteger,yAsInteger)AsInteger  M =IIf(x>y,x,y)EndFunctionPrivateSubcommand1_Click()  Dim aAsInteger,bAsInteger  a =100  b =200  Print M(a,b)EndSub结果为:___200__。标签控件的默认属性是__CAPTION_CaptionCaption__。在程序运行中,要想使某个按钮变成看不见,则应设置Visible的属性是_FalseFALSEfalse____。 设a="北京",b="Shanghai",则表达式LEFT(a,2)+STRING(3,"-")+LEFT(b,8)构成的字符串是___北京---Shanghai__。为了使列表框中的项目分为多列显示,需要设置的属性是____COLUMNScolumnsColumns_。VB6.0识别对象靠的是对象的__NAMENameNameMsgBox函数的返回值的类型为___数值型__。___属性。  文本框的默认属性是__Texttext TEXT_  __。  程序设计;'-------------------------------------------------'【程序设计】'------------------------------------------------- '题目:编写函数fun其功能是:根据整型形参m,计算'      如下公式的值:y=1/2+1/4+1/6+...+1/2m'      例如:若m=9,则应输出:1.41448412698413 '-------------------------------------------------PrivateFunctionfun(mAsInteger)AsDouble       '**********Begin*********   '**********End************* EndFunction PrivateSubForm_Load()     Show    Print fun(9)    TestFunc EndSub PrivateSubTestFunc()               Dim iAsInteger        Dim sAsString        Dim lAsInteger        Dim dAsDouble        Dim a(10)AsString        Dim fInAsInteger        Dim fOutAsInteger        fIn =FreeFile        Open App.Path&"\in.dat"ForInputAs#fIn        fOut =FreeFile        Open App.Path&"\out.dat"ForOutputAs#fOut        For i=1To10            Line Input#fIn,a(i)            l =Val(a(i))        
本文档为【vb试题1】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
下载需要: 免费 已有0 人下载
最新资料
资料动态
专题动态
个人认证用户
Dunk35
暂无简介~
格式:doc
大小:250KB
软件:Word
页数:0
分类:互联网
上传时间:2020-07-09
浏览量:3