还剩18页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
《VB程序设计》综合复习资料
一、填空题(第一章VisualBasic程序设计概述)
1、VisualBasic是一种面向_对象_的可视化程序设计语言,采取了__事件驱动__的编程机制
2、在VB中工程文件的扩展名是_Vbp,窗体文件的扩展名是frm_,标准模块文件的扩展名是_bas_
3、执行“工程”菜单下的部件命令,可选择并添加ActiveX控件
4、VisualBasic
6.0用于开发_WINDOWS环境下的应用程序第二章简单的VB程序设计
1、设置是否可以用Tab键来选取命令按钮,应该用_Tabstop___属性
2、一个控件在窗体的位置由__Left___和_top___属性决定,其大小由__height_和_width_属性决定
3、利用对象的属性setfocus可获得焦点,对于一个对象,只有其visible属性和_enabled__属性为true,才能接受焦点
4、设置控件背景颜色的属性名称是_backcolor__
5、所有控件都具有的共同属性是__name__属性
6、一般情况下,控件有两个属性项的缺省值是相同的,这两个属性项是_name和caption
7、VB中的每个对象(控件)都有一组特征,这组特征称为_属性_,我们通过修改它可以控制对象的外观和操作
8、通常情况下,VB中一个工程主要包括如下四个文件窗体文件、工程文件、类模块文件和_标准模块文件_文件,后者的扩展名为.Bas,通常由Basic语言编写,是一个可共用的子程序
9、VB有三种工作模式,分别是设计(Design)模式、_运行模式__和中断(Break)模式第三章
1、一般可以使用____Const______关键字声明常量
2、_Variant_类型也称变体类型,是一种通用的、可变的数据类型,它可表示或存储任何一种数据类型
3、变量的声明分为两种方法_隐式声明__和__显示声明__、
4、在VB中,用_optionbase_语句设定数组的下界,用ubound_和_lbound语句分别返回数组的上、下界
5、在代码模块中加入OptionExplicit的目的是_强制变量声明
6、functionaaa1asdateoptionala2asbooleanassingle,写出optional命令的作用表示a2是一个可选参数__
7、在VB中,我们用一个简单的_End__语句就能实现退出程序
8、生成消息框的命令是_Msgbox_,生成输入框的命令是Inputbox__
9、通用对话框(commondialog)属activex控件,它可以显示多个标准对话框,包括打开/另存为、字体、打印等对话框,若要显示所有文件,则应设置其属性filter=_*.*__,若要使它显示为打印对话框,则应使用什么方法_、showprint__
10、从字符串中任意位置截取字符的函数是_Mid__
11、语句Forj=3To20Step3使循环体执行了___6___次
12、对于正在使用的动态数组Arraya,要增加一个单元,但不能破坏数组内的数据,则应使用语句__redimpreservearrayauboundarraya+1__
13、在VisualBasic中声明静态变量的关键字是___static___
14、表达式10Mod6\4的值为___0___
15、表达式chrAsca+5的值为___f______
16、VB中使用注释有2种方法,即__rem_和__’______
17、VB中的数据以四种形式存储常量、_变量、数组和记录
18、为了在VB中存储一个4行5列的二维矩阵,需要定义一个整型的数组,请把数组定义语句补充完整DimJuzhen_1to41to5_asInteger
19、控件数组由一组相同类型的控件组成,这些控件共用一个相同的控件名,但是每个控件都有一个唯一的下标来区分,我们使用属性_Index__来设置下标
20、在过程调用中,实现调用过程的实参和被调用过程的形参之间的数据传递有两种方式按值传递和_按地址__
21、为了保证程序中必须对变量的强制性定义,需要在代码模块的声明部分加入_OptionExplicit__语句
22、分析For……Next循环结构的实例Fori=5To30Step2中,循环体一共执行了_13_____次
23、表达式MidUniversityOfPetroleum84的值为_ityo__
24、常量分为普通常量和_符号_常量
25、要将大写字母转换为小写字母,可使用_LCase__函数
26、不管焦点在哪个控件上,按___ESC__键相当于按了取消按钮
27、执行“工程”菜单下的_部件__命令,可选择并添加ActiveX控件
28、断点_是程序中VB停止执行的地方
29、逻辑常量为True或__False___
30、使用了_OptionExplicit__的声明后,当程序中使用未经声明的变量时,程序运行时会报错
31、要将小写字母转换为大写字母,可使用UCase__函数
32、自字符串N1位开始向右取N2个字符,要使用_Mid__函数
33、日期常量表示时,用符号___#___将日期型数据括起来
34、局部变量只能在_过程_中声明和使用
35、模块级变量的声明关键字是Dim或__private___
36、函数Absx的功能是_求x的绝对值____
37、表达式3/6*5的值是_
2.5___第四章
1、向列表框控件添加新项目的方法是__AddItem__
2、在VB中,最主要的两种对象是_窗体___和__控件___
3、当窗体启动时可通过StartUpPostion__属性控制窗体位于所有者的中心位置
4、若要将窗体Form1隐藏起来,则可通过执行代码__form
1.hide__来实现
5、要使装入到列表框中的数据项能自动按字母顺序排序,应设置该控件的___sorted______属性为___ture___
6、窗体上放置了若干个文本框和命令按钮,当窗体装入后,要将焦点自动定位到文本框Text1上,则在设计时需要将__text1__控件的_tabindex__属性设置为__0____
7、在标签控件中通过编程使文字换行用的代码是__chr10___
8、设置计时器控件只能触发___timer____事件
9、设置计时器对象触发事件的时间间隔用__interval___属性
10、滚动条控件主要支持两个事件,它们是__scroll和change__事件
11、要使鼠标停留在按钮上显示特殊的鼠标形状,应设置的属性值是_mousepointer_
12、设某列表框共有10项,按题目要求补齐程序,完成相应的功能
(1)按下命令按钮Command1时将列表框第8项的内容显示在窗体上PrivateSubCommand1_ClickList.__selected__7=TruePrintList
1._text_EndSub
(2)单击列表框某一项时立即将该项打印在窗体上PrivateSubList1_ClickPrint___list
1.text___EndSub
(3)按下命令按钮Command1时在窗体上删除第
1、
3、
5、
7、9项PrivateSubCommand1_ClickForI=1To5List
1.__removeitem2*i-1__________NextIEndSub
(4)在列表框的每一项之后插入一个新的项PrivateSubCommand1_ClickForI=1to10X=InputBox“请输入插入的第”I“项内容”List
1.AddItem__x2*i-1__________NextIEndSub
13、设在界面上放置了一个滚动条Hscroll1和一个标签控件Label1,要使每次单击滚动条两端箭头时,或单击滚动条滑块与两端箭头之间的空白区域时,标签内容能够反映滚动条的值,补齐以下代码PrivateSubHscroll
1.___change____Label
1.Caption=Hscroll
1.___value__EndSub要使拖动滚动条滑块时标签内容能够反映滚动条的值,补齐以下代码PrivateSubHscroll
1.__scrol___Label
1.Caption=Hscroll
1.__value____EndSub
14、列表框(ListBox)用于列出可供选择的项目的列表,用户可以选择一个或多个项目它具有几个非常重要的数组属性,其中__List__属性存放了列表框中所有项目的值
15、菜单项一般由标题、访问键、快捷键和复选标志等构成,通过对相应的属性进行设置可以改变这些项目的状态,其中与复选标志相对应的属性是__Checked_
16、keydown与keypress事件各有其参数,若需获得用户按下a还是A需用__keypress___事件
17、控件组合框组合了文本框和列表框的功能,是VB中一种功能非常强大的选择类控件
18、若需要将窗体Form2以模态窗口的形式显示出来,可通过执行代码_Form
2.Show1__来实现
19、菜单中的分隔条是一种菜单控件,不响应__Click(或鼠标单击)_事件,不能被选中第五章
1、文件按存取方式及其组成结构可分为_顺序__文件、随机__文件和、二进制____文件
2、为了使文件列表框List1和目录列表框Dir1之间能产生同步效果,必须在_dir1的chang__事件过程中加入语句_list
1.path=dir
1.path__
3、文件系统控件的作用是向用户显示系统中的文件,方便用户选择,它是一组控件的组合,包括驱动器列表框、__目录列表框__和文件列表框第六章图形操作
1、使用__print__方法可在窗体中进行文本的输出,用_circle__方法可画圆,用_line___方法可画直线
2、用___loadpicture___函数可加载图形
3、为了使一个Picture控件能自动根据装入的图片调整大小,应设置该控件的_autosize___属性为True第七章面向对象的编程
1、类是具有相同性质的对象的__集合_______
2、语句DIMTEMPASObject的作用是____定义了一个对象类型的变量TEMP_第三章VB基本语言
四、读程序题
1、分析以下程序,写出运行结果PrivateSubForm_Clickscore=IntRnd*10+80SelectCasescoreCaseIs60A$=FCase60To69A$=DCase70To79A$=CCase80To89A$=BCaseElseA$=AEndSelectPrintA$EndSub结果如下B
2、读下面的程序,分析其功能,写出运行结果在窗体上有一个命令按钮,名称为Command1然后编写如下程序PrivateSubCommand1_ClickForI=1To4ForJ=0ToIPrintChr$65+I;NextJPrintNextIEndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是什么?结果如下BBCCCDDDDEEEEE
3、阅读下面的程序,分析并写出其功能SubinsertaAsSingleByValxAsSingleDimmasintegernasintegern=1DoWhilen20Andxann=n+1LoopForm=20-1TonStep–1am+1=amNextman=xEndSub功能如下在20个由小到大排列的数据中插入一个数,插入数据后的数据仍按由小到大的顺序排列
4、分析以下程序,写出运行结果SubsubPbAsIntegerFori=1To4bi=2*iNextiEndSubPrivateSubCommandl_ClickDima1To4AsIntegera1=5a2=6a3=7a4=8subPaFori=1To4PrintaiNextiEndSub运行上面的程序,单击命令按钮,输出结果是什么?输出结果为
24685、分析以下程序,写出运行结果SubseleDimnasIntegeri=21:n=3DoWhileini=i-nLoopPrintiEndSub输出结果为
36、分析以下程序,写出运行结果SubselectPrintDimaasIntegerDimbasIntegerDimcasIntegera=2:b=5:c=2Ifa=banda=corbcThenPrintaa=a+2ElsePrintbEndIfPrinta;b;cEndSub输出结果为
24527、分析以下程序,写出运行结果SubswapDimxasIntegerDimyasIntegerDimzasIntegerx=1:y=2:z=0Printx;y;zx=x+yx=x*zPrintxyzEndSub输出结果为
1200208、分析以下程序,写出运行结果SubselectPrintDimaasIntegerDimbasIntegerDimcasIntegera=3:b=3:c=2Ifa=bandacThenPrintaPrintabcEndSub输出结果为3332第四章常用控件与窗体
1、对窗体编写如下代码OptionBase1PrivateSubForm_KeyPressKeyAsciiAsIntegera=Array2371268748498m1=a1m2=1IfKeyAscii=13ThenFori=2To5IfaimlThenm1=ajm2=iEndIfNextiEndIfPrintm1Printm2EndSub程序运行后,按回车键,输出结果是什么?输出结果为
49852、阅读下面的程序,写出执行结果PrivateSubForm_loadForm
1.showd=0Fora=1To2Forb=1ToaForc=bTo5d=d+1NextcNextbNextaPrintdEndSub结果如下14PrivateSubForm_ClickDima10AsInteger
五、编程题
1、输入一年号,判断它是否是闰年界面如下图所示,包括两个标签、一个文本框和一个命令按钮提示如果此年号能被400整除或者不能被400除尽,也不能被100除尽,但能被4整除,则它是闰年;否则,不是闰年
1、参考代码如下PrivateSubCommand1_ClickDimyearxAsIntegeryear=ValText
1.TextIfyearMod400=0ThenLabel
2.Caption=是闰年Else下面是嵌套块If语句IfyearMod4=0AndyearMod1000ThenLabel
2.Caption=是闰年ElseLabel
2.Caption=不是闰年EndIfEndIfEndSub
2、输入两个正整数m、n,求m和n的最大公约数要求建立如下图所示的窗体,其中主要的控件包括两个标签(Lable
1、Lable2)、两个文本框(Text
1、Text2)和一个按钮(Command1)
2、程序参考代码如下PrivateSubCommand1_ClickDimmnrAsIntegerm=ValText
1.Textn=ValText
2.TextIfm0Orn0Then‘若判断为非法数据,Then子句输出相应信息Label
2.Caption=输入数据有错!Else‘若判断为合法数据,Else子句用辗转相除法求余数r=mModnDoWhiler0m=nn=rr=mModnLoop‘循环结束后n中存放的就是最大公约数,输出n值Label
2.Caption=最大公约数为nEndIfEndSub
3、输入某学生成绩(百分制),若是100≥成绩≥90输出优秀;若是90>成绩≥80输出良好;若是80>成绩≥70输出中等;若是70>成绩≥60输出及格;若是60>成绩≥0,输出不及格;若是其他数则输出error信息
3、参考代码如下PrivateSubCommand1_ClickDimxAsSinglex=ValText
1.TextIfx100Orx0ThenText
2.Text=errorElseIfx60ThenText
2.Text=不及格ElseIfx70ThenText
2.Text=及格ElseIfx80ThenText
2.Text=中等ElseIfx90ThenText
2.Text=良好ElseText
2.Text=优秀EndIfEndSub
4、在窗体中显示从9号字型到16号字型
4、参考代码如下PrivateSubForm_LoadDimiAsIntegerShow使输出可见Form
1.Font=新宋体Fori=9To16Step1Form
1.FontSize=iPrinti;号字型NextiEndSub
5、在有序序列中插入一个数,使插入后的数列仍然有序(设按由小到大排列)
5、参考代码如下PrivateSubCommand1_ClickDima1To11AsSingle定义静态数组a含11个元素DimijAsIntegerDimnumAsSingle给数组元素赋初值,即原始队列a1=3:a2=5:a3=7:a4=8:a5=9a6=13:a7=16:a8=19:a9=33a10=38输出原始队列Fori=1To10Label
2.Caption=Label
2.CaptionaiNextinum=ValText
1.Text把输入的数插入队列中Fori=10To1Step-1IfnumaiThenai+1=ai元素后移一个位置elseai+1=numExitFor退出循环EndIfNexti输出新队列Fori=1To11Label
3.Caption=Label
3.CaptionaiNextiEndSub
6、编程实现二维数组转置
6、参考代码如下OptionBase1PrivateSubForm_LoadConstN=4常量N决定二维数组大小DimaNNAsIntegerDimijTempAsIntegerShow数组初始化Fori=1ToNFor循环i从1变化到NForj=1ToNaij=i*10+jNextjNexti输出原始数组Print转置前的数组Fori=1ToNFor循环i从1变化到NForj=1ToNPrintaij;NextjPrintNexti数组转置Fori=1ToNFor循环i从1变化到NForj=1Toi交换Temp=aijaij=ajiaji=TempNextjNexti输出转置后的数组Print转置后的数组Fori=1ToNFor循环i从1变化到NForj=1ToNPrintaij;NextjPrintNextiEndSub
7、随机输入10个100以内的整型数,计算其和及平均值
7、参考代码如下iAsIntegerDimsumAsIntegeraveAsIntegersum=0Fori=1To10ai=IntRnd*101sum=sum+aiNextiave=sum/10PrintsumaveEndSub
8、找出所有的水仙花数水仙花数是个三位数,它的各位数字的立方和等于这个三位数本身例如371=33+73+13,则371是水仙花数
8、参考代码如下PrivateSubForm_LoadDimijkFlowerAsIntegerShowFori=1To9Forj=0To9Fork=0To9Flower=i*100+j*10+kIfFlower=i^3+j^3+k^3ThenPrintFlower;是水仙花数NextkNextjNextiEndSub
9、从键盘输入一个大于2的正整数,判断该数是否是素数
9、程序参考代码如下PrivateSubCommand1_ClickDimmiyAsIntegerm=ValText
1.TextIfm=2ThenLabel
2.Caption=输入数据有错Elsek=Sqrm+1Fori=2Toky=mModiIfy=0ThenExitForNextiIfy=0ThenLabel
2.Caption=m不是素数ElseLabel
2.Caption=m是素数EndIfEndIfEndSub
10、求二维数组中的最小值及其所在行号、列号
10、程序参考代码如下OptionBase1PrivateSubForm_LoadConstN=5常数N确定数组的大小DimaNNAsIntegerDimijrowlineminAsIntegerShowFori=1ToNFor循环i从1变化到NForj=1ToNFor循环j从1变化到Naij=Int100*Rnd+1产生N*N个1~100间的随机数NextjNexti输出二维数组Print数组内容是Fori=1ToNForj=1ToNPrintaij;NextjPrint输完一行元素后输出一个换行Nexti设定初始值min=a11:row=1:line=1寻找最小数Fori=1ToNForj=1ToNIfaijminThenmin=aijrow=iline=jEndIfNextjNexti输出结果Print最小值是;minPrint在第;row;行第;line;列EndSub
11、求一元二次方程ax2+bx+c=0的根(包括实根和复根)
11、参考代码如下PrivateSubCommand1_ClickDimabcdeltrealpartimagpartAsSinglea=ValText
1.Text:b=ValText
2.Text:c=ValText
3.Text:delt=b*b-4*a*cIfa=0ThenLabel
2.Caption=是一元一次方程:Ifb0thenText
4.Text=x1=-c/bElseIfc=0thenText
4.Text=有无穷根ElseText
4.Text=无根EndifEndifElse下面嵌套块If语句Ifdelt=0ThenLabel
2.Caption=有两个相等的实根:Text
4.Text=x1=-b/2/aText
5.Text=x2=-b/2/bElseIfdelt0ThenLabel
2.Caption=有两个不等的实根:Text
4.Text=x1=-b+Sqrdelt/2*aText
5.Text=x2=-b-Sqrdelt/2*aElseLabel
2.Caption=有两个共轭复根:realpart=-b/2*aimagpart=Sqr-delt/2*aText
4.Text=x1=realpart+imagpartiText
5.Text=x2=realpart-imagpartiEndIf此行EndIf部分与内层的块If语句对应EndIf此行EndIf部分与外层的块If语句对应EndSub
12、输入一个正整数n,计算出n!并输出
12、参考代码如下PrivateSubCommand1_ClickDimnitAsLongn=ValText
1.Texti=1:t=1Ifn0ThenLabel
2.Caption=errorElseIfn=0ThenLabel
2.Caption=0!=1ElseDoWhilei=nt=t*ii=i+1LoopLabel
2.Caption=n!=tEndIfEndSub
13、Faibonacci数列为0,1,1,2,3,5,8,13…,计算并输出第20项以及前20项的和
13、参考代码如下PrivateSubForm_LoadDimPrevLastNewOnesumAsLongDimiAsIntegerPrev=0:Last=1:sum=Prev+LastFori=3To20NewOne=Prev+Lastsum=sum+NewOnePrev=LastLast=NewOneNextiLabel
1.Caption=第20项为NewOneLabel
2.Caption=前20项的和为sumEndSub第四章常用控件与窗体
五、编程题
1、在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1,要求每一秒在文本框中显示一次当前的时间,请编程实现
1、参考代码如下PrivateSubForm_LoadTimer
1.Interval=1000EndSubPrivateSubTimer1_TimerTxttime.text=TimeEndSub
2、在Text1中输入任一英文字母,在Text2中显示该英文字母及其ASCII码值要求在文本框Text2中显示出所有输入的英文字母及其ASCII码值,如下图所示
2、参考代码如下PrivateSubCommand1_ClickDimCharAsString*1Char=TrimText
1.TextText
2.Text=Text
2.TextSpc5Char_Spc10StrAscCharchr13chr10Text
1.SetFocusText
1.SelStart=0Text
1.SelLength=LenText
1.TextEndSub
3、编写一个程序,能够实现任意个整数的排序
4、编程实现以下功能用户首先分别在两个文本框中输入两个数,然后在具有“加、减、乘、除”等四个菜单项的“计算”菜单中单击某一项,即可在标签中显示出相应的结果或者错误提示
5、编程实现任意两个数的“加、减、乘、除”
6、编写一个程序,能够求任意个正整数的最大值和最小值
7、编程求任意两个正整数的最大公约数
六、程序分析填空题
六、程序分析填空题
1、建立一个如图所示的简单编辑器用户在文本框(text1)中输入正文后,选中某些文本时可进行“剪切”、“复制”和“粘贴”操作假设在窗体声明部分定义了一个变量str1,用于保存复制和剪切的内容,请把剪切按钮btnCut的Click事件补充完整程序运行界面PrivateSubbtnCut_Click‘请补充Str1=text
1.selTexttext
1.selText=“”EndSub
2、计算1+2+3+……+100的和并输出请把下面用DoWhile……Loop循环结构实现这一功能的代码补充完整PrivateSubForm_LoadDimsumcountasInteger‘请补充Sum=0Count=0Dowhilecount=100‘请补充Count=count+1Sum=sum+countLoopText
1.Text=sumEndSub
3、列表框控件(ListBox)支持多项选择,这项功能在对用户的兴趣爱好进行调查的时候显得非常好用,在下图所示的界面中列表框List1用于列出爱好选项,供用户进行多项选择请把下列代码补充完整,能够取得用户的所选爱好选项PrivateSubCommand1_ClickDimiAsIntegerDimsAsStrings=txtname.Text爱好Fori=0ToList
1.ListCount-1‘请补充IfList
1.SelectediThenS=sList
1.ListiEndIfNextLabel
3.Caption=sEndSub
4、要求利用计时器Timer1,在窗体Form1上每隔1秒钟打印一个1到10的随机整数,请把下列代码补充完整PrivateSubForm_LoadShow‘请补充Timer
1.Interval=1000EndSubPrivateSubTimer1_Timer‘请补充Form
1.PrintIntRnd*10+1EndSub第五章文件
四、编程题
1、实现二进制方式文件的复制
1、参考代码如下PrivateSubCommand1_ClickDimif1AsIntegerif2AsIntegerDimsf1AsStringsf2AsStringDimbufferAsByte‘使用动态数组sf1=InputBox请输入源文件名源文件sf2=InputBox请输入目标文件名目标文件Ifsf1=Orsf2=ThenExitSubif1=FreeFileOpensf1ForBinaryAsif1打开源文件if2=FreeFileOpensf2ForBinaryAsif2创建目标文件ReDimbuffer1ToLOFif1分配内存Get#if1buffer读源文件Put#if2buffer写目标文件Close关闭所有打开的文件MsgBox完成复制EndSub
2、如下图所示,实现一个简单的文件管理器
2、参考代码如下PrivateSubcmdCopy_ClickDimdestFileAsStringIffSource.FileName=ThenExitSub先选定文件destFile=InputBox输入目标文件名IfdestFileThen不为空FileCopyfSource.FileNamedestFile复制文件EndIfEndSubPrivateSubcmdExit_ClickEndEndSubPrivateSubcmdKill_ClickDimresIffSource.FileName=ThenExitSub首先选定文件res=MsgBox确定要删除文件fSource.FileName了吗?vbOKCancelIfres=vbOKThen确认操作KillfSource.FileName删除文件EndIfEndSubPrivateSubcmdName_ClickDimdestFileAsStringIffSource.FileName=ThenExitSub首先选定文件destFile=InputBox输入新文件名IfdestFileThenNamefSource.FileNameAsdestFile命名(移动)文件EndIfEndSubPrivateSubdirSource_ChangefSource.Path=dirSource.Path与文件列表关联EndSubPrivateSubdrvSource_ChangedirSource.Path=drvSource.Drive与文件夹关联EndSub第六章图形操作
四、编程题
1、如下图显示当前目录下的图片文件列表,并能够预览选定的图片
1、参考代码如下PrivateSubdrvList_ChangedirList.Path=drvList.Drive设置当前驱动器EndSubPrivateSubdirList_ChangefileList.Path=dirList.Path设置当前目录EndSubPrivateSubfileList_ClickDimsAsStrings为所选文件的全称IfRightfileList.Path1=\Thens=fileList.PathfileList.FileNameElses=fileList.Path\fileList.FileNameEndIfLabel
4.Caption=sIfRights1\ThenImage
1.Picture=LoadPictures显示图片EndSubPrivateSubForm_LoadfileList.Pattern=txtFile.Text初始化文件列表框EndSubPrivateSubtxtFile_LostFocusfileList.Pattern=txtFile.Text改变筛选条件EndSub第九章VisualBasic与数据库
二、编程题
1、请编程实现每两秒在标签中显示一次当前的时间
2、找出被
3、
5、7整除,余数为1的最小的2个正整数
3、有一个m×n的实型矩阵Amn,找出其中最大的那个元素所在的行和列
4、找出能同时被5和7整除的最小的10个正整数
5、编写一个程序,能够输出100~1000之间所有的素数
6、从键盘上任意输入100个整数,统计负数的个数,并计算正数的和
7、有一种数,正序读与反序读都相同,这种数叫回文数,如
88、
858、2332等求出4位数以内(0~9999)的所有回文数
8、输出“九九乘法表”Text1Text2Command1。