单考单招vb复习资料总结.doc

《单考单招vb复习资料总结.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、1、求n的倍数能被n整除的数Xmodn=0每行n个显示方法一：IfImodn=0thenprint方法二：IfImodn=0thenprintx;elseprintx2、文本框换行VbCrlf3、取n位数各个位的数字（n整除位数，对10取余）个位：A=(x1)mod10A=xmod10十位：A=(x10)mod10百位：A=(x100)mod10千位：A=(x1000)mod10后两位：A=x1004、四舍五入取n位小数Int（x*10^n+0.5）/10^n如取2位小数：int(x*100+0.5)/1005、打印图形4、列表框添加内容l移动项目

2、IfList2.ListIndex>=0ThenList1.AddItemList2.Text'在左边列表中增加新项目(列表2的选定内容)List2.RemoveItemList2.ListIndex'删除右边列表中的所选项目（列表2的选定序号）EndIfl全部移动List1.Clear'列表1清空Fori=1To10List1.AddItema(i)'列表1添加项目NextList2.clear5、冒泡排序排列10个数（由小到大）循环次数Fori=2tonForj=ntoIsetp-1判断交换NextjNextI方法二：Fori=1ton-1Forj=1to

3、n-i判断交换NextjNextI6、选择排序排列10个数（由小到大）（1）从n个数中选出最小数的下标，出了循环，将最小数与第一个数交换位置；（2）除第一个数外，在剩下的n-1个数中再按方法（1）选出次小的数，与第二个数交换位置；（3）以此类推，最后构成递增序列。7、求某数是否是素数100以内的素数判断j是否是素数8、判断闰年在窗体上输出1900——2010年之间哪些年是闰年，每行5个。闰年判断条件：年份能被4整除但不能被100整除，或者年份能被400整除。PrivateSubForm_Click()DimyearAsInteger,nAsIntegern=0

4、Foryear=1900To2010IfyearMod4=0AndyearMod100<>0OryearMod400=0ThenPrintyear;n=n+1IfnMod5=0ThenPrintEndIfNextyearEndSub8、输出一个文本图形需要考虑4点：（1）图形有几行(一般由外循环控制)（2）每行首字符位置(一般由tab()函数控制)　　tab(n)函数：输出时表达式定位于第n列（3）每行由几个字符(一般由内循环控制)（4）用什么字符组成图形编程题图1图2图3图4图5图6图7图8图9123456789把以上九种图形都用编程来实现。9、列表框（图片

5、框或者文本框）排序、列表框交换内容模拟书卷出现12次10、+-号交错的数学运算方法一、利用（-1）^(i+1)调节正负号方法二、利用f*变化的部分，F=1循环一次f=-f调节正负号11、判断正整数X=inputbox(“提示内容”)Whilex<0orx<>int(x)Msgbox“提示内容”X=inputbox(“提示内容”)Wend12、判断文本框输入的数据是否合法，去除空格后进行比较，因为是手动输入所以不需要循环判断，如<500的正整数X=val(text1.text)IfTrime(str(x))=Trime(Text1.Text)andx<500an

6、dx=int(x)then13、一元二次方程的根14、控件数组：单选框数组，文本框数组（通过评委分手计算得分）15、特殊的数16、鸡兔问题，求方程的解，一般嵌套循环，个循环的初值为0或1，终止值为每种元素的最高值比如3x+5y=100Forx=0to33Fory=0to20If3*x+5*y=100thenprint“x=”;x,”y=”;yNextyNextx