vb试题库答案Word文件下载.docx

1、（2） 输入对话框（3） 10（4） 11（5） -20（6） 4 8（7） 12 86（8） 4（9） 5（10） 6（11） 3 5（12） 8 16（13） Len（text1text）（14） W=A And Waz（15） （16） js=js + 1（17） flg = false（18） ReDim Preserve Data（Idx）（19） Ub = Ubound（arry）（20） Exit Sub（21） Sum（22） Slen = Len（Char）（23） j = j * 10或j = 10 i（24） S（25） F = True（26） 验证口令（27） 请输入

2、口令（28） *（29） 3（30） -18（31） 6 27（32） -2 99（33） 1（34） 5（35） 9（36） 31（37） 63（38） val（txtinputtext）（39） Prime（i）（40） Exit For或Exit Function（41） iSqr（n）（42） Len（s）（43） Mid（s,i,1）（44） Else或 To F（45） k=k+p*Asc1（46） Convert =k（47） EeFF（48） InputBox（msg, msgtitle）（49） i - 1（50） a（j） a（j+1）（51） this is a book

3、（52） This Is A Book（53） 65（54） 4 9 13（55） 195（56） 18（57） 30（58） 1 2（59） 3 4（60） 4 3（61） 1 3 5 7 9（62） 4（63） 2（64） x mod 2=0（65） n1=n1+1（66） sum=0（67） k mod n=0（68） ReDim Preserve A（j）（69） Int（Sqr（sum）2（70） a=10 b=15（71） x=25 y=25（72） a=10 b=15（73） 这是第1次调用 s=25（74） 这是第2次调用 s=50（75） 这是第3次调用 s=75（76） S

4、um=14（77） Sum=10（78） C:Microsoft（79） VB6exe（80） 1 3 2（81） 1 12 2（82） CBA（83） ABC（84） 2（85） 3（86） 5（87） k=x mod 10（88） I = I + 1（89） ByVal n As Integer（90） n=n10（91） f=false（92） Sqr（p）或p-1或p/2（93） prime=True（94） Int（Rnd*20）+10（95） call ste（a）（96） a（i）=a（I+1）（97） a（10）=k或a（i）=k（98） True（99） i = i + 1（

5、100） x = x + 1（101） 1 2 3（102） 4 5（103） 7（104） C（105） CW（106） 8（107） 4 14 80（108） 22 10 80（109） 12（110） 3（111） 3（112） Gcd（27, 12）=3（113） Int（90*Rnd） + 10（114） Max = D（i）（115） D（i） D（i）（116） Text1 Text（117） Mid（s, n+1, Len（s）-n）（118） a（i） = s（119） p & Mid（s, I, 1）（120） CStr（i）（121） i（122） ReDim（123）

6、Int（Rnd*90）+10（124） m（125） n（126） 12345（127） AFT（128） AatF（129） 5（130） 45（131） 54（132） 13（133） 15（134） 17（135） 0 1 2 3 4（136） 4 5 6 7 8（137） 8（138） VLAUSI（139） VILAUS（140） VISUAL（141） true（142） p=p+1（143） x=x+1（144） I mod j=0（145） s=i（146） ByVal m As Integer,ByVal n As Integer（147） gcd=gcd（m,n）（148）

7、 gcd（n,p）=1（149） 31（150） 63（151） Picture1Picture=LoadPicture（C:PicFishingbmp）（152） VISUAL（153） 20051011（154） 27 3（155） 18 0（156） Lcm=27（157） 3（158） 7（159） 23（160） 10 4 6（161） 56 28 28（162） K=66（163） 4 5 6（164） 3 6 9（165） 2 5 8（166） 1 4 7（167） S（ & CStr（x） &, CStr（n） &）=（168） Dim i as Integer, p As S

8、ingle（169） p=p*i/（2*i）或p=p/2（170） mid（st,I,1）（171） Asc（s）-Asc（）+1或Asc（s）-64（172） Ubound（k）或10（173） i=d To c+1（174） c=c+1（175） k（i-1）k（i）（176） BCDEAF（177） BDECAF（178） BDECAF（179） 10 6（180） 5 16（181） 10 6（182） 4（183） 2 13（184） 16 6 10（185） 68 26 42（186） 68（187） 19（188） 15（189） 14（190） n1= i 100（191） n

9、 = n + 1（192） q = s mod 10（193） Lcase（Text1Text）（194） n=Asc（s）-Asc（“a”）+1（195） decode=decode & Mid（r2,n,1）（196） decode=decode & Mid（r1,27,1）（197） Flag=False（198） Flag（199） k/n1/4 And k/neps（26） （-1） n（217） t * x 2 / n（218） int（sqr（k）=sqr（k）（219） k=k+1（220） ReDim m（n2,n2）（221） m（i, j）=” “（222） FzFm（2

10、23） Exit Function（224） CStr（Fz） & CStr（Fm）（225） Mid（s,i,1）=Mid（s,n,1）（226） -1（227） 06（228） 18（229） 54（230） 10（231） 27（232） 9（233） 11（234） 2（235） 43（236） 7（237） 1（238） 16（239） 10（240） Sqr（2+t）（241） Abs（a-1）= 1E - 8（244） 1 / fac（k）（245） Int（90*Rnd）+10（246） k=1（247） Instr（248） Exit Function（249） Exit F

11、unction（250） Rec（n,m,k+1）（251） 9000 * Rnd + 1000（252） Str（x）（253） Mid（s, 3, 1） + Mid（s, 2, 1） + Left（s, 1）（254） z=66（255） 21 38 54（256） 1 to 9（257） n+1（258） b, a（259） -i（260） +i（261） 2 3（262） 1 to 7 step 2（263） fact*Y（264） 死循环（265） ctrl+break（266） 72（267） 12（268） 8（269） fanma（270） I=1（271） n=n+4-26（

12、272） fact = fact * k（273） temp = 1 / fact（n）（274） Call compare（data, temp, flag）（275） UBound（arry）（276） 2（277） chr（n）（278） 4 13（279） 6 31（280） 8（281） 5*x+3*y+z/3=100（282） 1 4 9 16 25 36（283） 7（284） 2次（285） 8 13（286） -p * x（287） Abs（item） = eps（288） fx（x, result）（289） True（290） I = I + 1（291） x = x +

13、 1（292） x/2或Sqr（x）（293） False（294） True（295） Fun1（x）（296） 23（297） 47（298） k mod 10或Right（CStr（k）, 1）（299） Len（st）（300） print “*”;（301） 9（302） 5（303） 36（304） 18（305） a（I, j）=1（306） Print （307） int（Rnd * 900 + 100）或100+Int（900*Rnd）（308） n1 = n1 + 1（309） m=20 n=10（310） X=10 Y=15（311） m=20 n=10（312） X=2

14、0 Y=10（313） num 1（314） num 10（315） s（316） n=1（317） m * n * x / x n（318） Picture1Print（319） a（1, 1）（320） a（i, j）（321） s=25（322） s=50（323） s=75（324） I=Fun1（i）（325） Fun1=Fun1+j（326） 窗体或控件（327） 控件或窗体（328） Select Case x（329） Case Else或Case Is 100（330） 198（331） 2（332） 2（333） 65（334） 4 9 13（335） 195（336） t

15、his is a book（337） This Is A Book（338） Mid（source, 1, 1） 1（339） 2（340） Mid（source, i, 1） = （341） flag=1（342） I mod 13=1 And I mod 23=2 And I mod 33=3（343） Until flag=0或While flag=1（344） fact = fact * k（345） temp = 1 / fact（n）（346） j = j + 1（347） Call Insert（a）（348） a（） As Integer （349） a（J） = a（J 1）

16、（350） Getp = Getp + 1（351） m Mod 10（352） 2n（353） fact=1（354）abs（x1-x2）=1e-6或 abs（x1-x2）=0000001（355） sum = 0（356） k mod n=0（357） ReDim Preserve a（j）（358） Sqr（sum）= Fix（Sqr（sum）（359） 98（360） Comp（Sum, Flg）（361） Str（n）（362） J*10（363） False（364） Exit Sub（365） Val（Text1Text）（366） Str（num）或num（367） P=P-2

17、（368） X & Str（P）（369） Command1（370） Command2（371） fact（i）（372） 5（373） 9（374） i Mod k =0（375） Exit For（376） 2 4 6（377） Chr（n）（378） T = t + k（379） 7（380） 1（381） （N mod 10）*10+N10（382） Int（100 + Rnd * 900）（383） s1 = s1 + 1（384） Dim n As Integer, term As Single, t As Single（385） term = term + t（386） t =

18、 2 To 4（387） p + t（388） k = k + 1（389） 23 47（390） 47（391）1 4 9 16 25（392） 3（393） 7（394） 2（395） i Mod 3=0（396） d = d + 1（397） str（d）（398） 1 To 9（399） n = a * 100 + b * 10 + c（400）next b（401） 7（402） dir1.path = drive1.drive（403） 1 to m（404） mid（b, j, 1）（405） abs（x-x1）n（426） c（437） n=9（438） n=3 （439） 6

19、（440） k（441） a（k, j）（442） 6（443） 4（444） a（1, 1）（445） MaxA（j+1）（461） 11是素数（462） 12不是素数（463） x Mod i = 0 （464） 6（465） 9（466） m=Len（s）（467） m=m-1（468） Text2.Text=是回文（469） i=1（470） n=n+4-26（471） i=i+1（472） 0（473） y = y / x（i）（474） 1 To i（475） sqr（Sum）=Int（Sqr（Sum） And Sqr（c）=Int（Sqr（c）（476） 6 4（477） 3 21（478） 32（479） 1 2 3（480） 6（481） 1（482） 等/级/考/试/（483） i+1（484） A（i）A（j）（485） A（I）=A（J）（486） fact=1（487） fact（488） 10 （489） 11（490） 16（491） St As String（492） Mid（St, i, 1）（493） Num（498） x = 1 / fac（k）（499） 4*fun1（n）（500） （-1）（i-1）/（2*i-1）（501） 21（502） 13 21（503） 15 16（5