本程序的功能是利用随机数函数模拟投币,方法是:每次随机产生一个整数0或1,相当于一次投币,1代表正面,0代表反面。在窗体上有3个文本框,名称分别是Textl、Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图1所示。程序运行后,在文本框Textl中输入总次数,然后单击“开始”按钮,按照输人的次数模拟投币,分别统计出现正面、反面的次数,并显示结果。以下是实现上述功能的程序,请填空;PrivateSubCommandlClick()Randomizen=CInt(Textl.Text)n1=0n2=0Fori=1To________r=Int(Rnd*2)Ifr=________Thennl==n1+1Elsen2=n2+1EndIfNextText2.Text=n1Text3.Text=n2EndSub
有如下程序: Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum=0 alt=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)13 Then Sum=Sum+alt(I) End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为______。
在考生文件夹下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;有3个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“输入”、“计算显示”和“保存”,程序运行时的窗体界面如图25—5所示。在给定程序中有一个函数过程isPrimeNum。其功能是判断参数是否为素数,如果是素数,则返回True,否则返回False。请将程序中有问号的地方替换为相应的代码.使得在运行时,单击“输入”按钮,弹出“输入”对话框以便输入整数,单击“计算显示”按钮,则找出小于输入参数的最大素数,并显示在Text1中;单击“保存”按钮,则把Textl中的计算结果存人考生文件夹下的out5.txt文件中。注意:去掉程序中的注释符“'”,把程序中的“?”改为正确的内容,使其实现下述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。考生不得修改isPrimeNum函数过程和控件的属性,必须把计算结果通过“存盘”按钮存入out5.txt文件中,否则无成绩。
有如下程序: Private Sub command1_Click() a=1:b=1 Print"a=";a;",b=";b Call mult((a),b) Print "a=";a;",b=";b 语句 End Sub Sub mult(x,y) K=2 * k y=3 * k Print "x=";x;",y=";y End Sub 运行后,标有“语句”的Print语句的输出结果是【 】。
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图1-56所示。在给出的窗体文件中已经添加了全部控件,但程序不完整。要求:去掉程序中的注释符,把程序中的?改为正确的内容。注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。(2)考生文件夹下的工程文件sjt4.vbp中有两个名称分别为Listl、List2的列表框控件,两个名称分别为Commandl、Command2,标题分别为“>>”、“<>”按钮,将Listl中的表项添加到List2中,同时将Listl清空;单击“<
(1)在名称为Forml、标题为“调用系统对话框”的窗体上有一个文本框和四个命令按钮及一个通用对话框,通过CommonDialog实现对系统一些对话框的调用。请将“打开”按钮的功能补充完整,并限制打开的类型为文本文件和数据文件(*.txt和*.dat),默认打开文件类型为.txt文件。打开in.txt文件如图37—3所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3vbp。(2)在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm,该程序是不完整的。在窗体上有一个名为Pic1的图片框,有一个名为Commandl、标题为“输入半径”或“输入边长”的命令按钮,有两个单选按钮,名称分别是Optionl和Option2、标题分别是“圆形”和“正方形”。要求程序运行后,若选中“圆形”,则按钮名称为“输入半径”,若选中“正方形”,则按钮名称为“输入边长”,再单击命令按钮“输入半径”或“输入边长”,在弹出的输入对话框中输人相应的参数值,则在图片框上画出相应的图形,如图37—4所示。注意:请在有“?”的地方填入正确内容,然后删除“?”及所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
在考生文件夹中有工程文件sj5.vbp及其窗体文件sj5.frm,该程序是不完整的,请将程序补充完整。在名称为Forml的窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“计算”和“保存”;两个单选按钮,名称分别为Optionl和Option2,标题分别为“50~150的素数”和“200~350的素数”;一个文本框,名称为Text1,程序运行界面如图8—5所示。如果选中一个单选按钮并单击“计算”按钮,则计算出该单选按钮标题所指明的所有素数之和,并在文本框中显示出来。如果单击“保存”按钮,则把计算结果存入out5.txt文件中,该文件必须放在考生文件夹中。(在考生文件夹中有标准模块mode.bas,其中的isPrimeNum函数可以判断整数x是否为素数,如果是素数,则函数返回True,否则返回False,而writeData过程可以把结果存人指定的文件,考生可以将该模块文件添加到自己的工程中。)注意:存盘时不得改变文件名和文件夹。必须把其中一种素数之和存入考生文件夹下的out5.txt文件中,否则没有成绩。保存程序时必须存放在考生文件夹下,窗体文件名为sj5.frm,工程文件名为sj5.vbp。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和 Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充完整。 Private Sub Command1_click() 【 】Form1 Form 2.【 】 End Sub
请根据以下各小题的要求设计VsualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上用名称为Shapel的形状控件画一个长、宽均为1200的正方形。请设置适当的属性满足以下要求:①窗体的标题为“正方形”,窗体最小化按钮不可用:②正方形的边框为虚线(线型不限)。运行后的窗体如图1-7l所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sit1.frm。(2)在名称为Forml、标题为“标签”的窗体上,画一个名称为Labell并可自动调整大小的标签,其标题为“计算机等级考试”,字体大小为三号字;再画两个命令按钮,标题分别是“宋体”和“黑体”,名称分别为Commandl、Command2。如图1-72所示。要求:编写两个命令按钮的Click事件过程。程序运行后,如果单击“宋体”命令按钮,则标签内容显示为宋体字体;如果单击“黑体”按钮,则标签内容显示为黑体字体。注意:程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
(1)在名称为Form1的窗体中绘制一个名称为Labell的标签,其标题为空,BorderStyle属性为1;再添加一个名称为Timer1的计时器。请设置适当的控件属性,并编写适当的事件过程,使得运行时,标签中的数字每隔1秒钟加2。程序运行效果如图1-1所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sj1.vbp,窗体文件名为sj1.frm。(2)在窗体上设置一个文本框,名称为Text1,再添加一个命令按钮,名称为Commandl,标题为“当前时间/日期切换“;每次单击按钮时,Text1就显示出当前时间,再单击一次,Text1就显示当前日期。请编写相应的程序代码来完成这个功能。程序运行时的窗体界面如图1-2所示。注意:要求考生在编写完程序后,把工程文件与窗体文件保存到考生文件夹下,文件名分别为sj2.vbp与sj2.frm。
Visual Basle一共有设计、运行和中断三种模式,要使用调试工具应该______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num=1 Do Until num>6 Print num; num=num+2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是______。
在考生文件夹中有一个工程文件execise4.vbp及其窗体文件execise4.frm。在名为Form1窗体中有一个文本框,名为Text1;请在窗体上绘制两个框架,名称分别为Frame1和Frame2,标题分别为“性别”和“身份”;在Frame1中绘制两个单选按钮Opt1和Opt2,标题分别为“男”和“女”;在Frame2中绘制两个单选按钮Opt3和Opt4,标题分别为“学生”和“老师”;再绘制一个命令按钮,名为Cmd1,标题为“确定”。如下图所示。请编写适当的事件过程,使得在运行时,在Frame1、Frame2中各选一个单选按钮,然后单击“确定”按钮,就可以按照下表把结果显示在文本框中。最后原名保存修改后的文件。注意:(1)不得修改窗体文件中已经存在的程序和Text1的属性,在结束程序运行之前,必须进行能够产生上表中一个结果的操作,(2)必须用窗体右上角的关闭按钮结束程序,否则无成绩。
数据库系统的主要特点为数据集成性、数据的岛 _________ 和低冗余性、数据独立性和数据统一管理和控制。
没有数组定义语句:Dim a(5)As Integer,Listl为列表框控件。下列给数组元素赋值的语句错误的是( )。
在名为Form1的窗体上建立一个名为Pic1的图片框,两个名称分别为Cmd1和Cmd2的命令按钮,标题分别为Print和Clear,如下图所示。编写适当的事件过程,要求程序运行后,每单击一次Print按钮,不使用任何变量,直接在图片框中显示“计算机等级考试”;如果单击Clear按钮,则清除图片框中的内容。注意:文件必须存放在考生文件夹中,窗体文件名为execise3.frm,工程文件名为execise3.vbp。
在名为Form1的窗体上建立一个名为Lab1的标签:两个名称分别为Cmd1和Cmd2,标题分别为“显示广和“显示2”的命令按钮。编写适当的事件过程,使程序运行后、若单击“显示广命令按钮,则在标签卜显示字符串Cmd;如果单击“显示2”命令按钮,则在标签上显示字符串Cmd2。如下图所示。注意:不要使用任何变量,直接显示字符串;文件必须存放在考生文件夹中,窗体文件名为execise62.frm,工程文件名为execise62.vbp。
在名为Form1的窗体上绘制两个图片框,名称分别为Pic1和Pie2,高度均为1900,宽度均为1700,通过属性窗口把图片文件pic1.bmp放入Pic1中,把图片文件pic2.jpg放入Pic2中;再绘制一个命令按钮,名为Cmd1,标题为ChangePicture,如下图所示。编写适当的事件过程,使得在运行时,如果单击命令按钮,则交换两个图片框中的图片。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise5.vbp,窗体文件名为execise5.frm。
设有下面的循环。 i=0 While i<=1 i=i + 3 Print i Wend 则运行后的输出结果是
执行下面的程序段后,S的值为【 】。 s=5 For i=6 To 9 Step 0.6 S=S+1 Next i
