计算机技术基础VB答案

《计算机技术基础VB答案》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、计算机技术基础VB(本科)一单选题1A2D3B4C5C6A7B8B9B10A11C12D13A14C15A16A17B18A19A20B二填空题1在窗体上绘制以角点为(2000,2000)和(4000,3500)的红色实心的矩形2True374HELLOWORLD5字符串6Menuitem.Enabled二False7168Gladto9ifnMod3=1AndnMod5=1While1032,548.5三写出下面程序的输出结果142000012024四编程题1PrivateSubCommand1_Click()Dimx!y!、z!x=lnputBox('1nputx,r

2、)y=lnputBox(pinputyp)z=lnputBox(,rinputz'r)Printxyz"Ifx>yThent=x:x=y:y=tIfx>zThent=x:x=z:z=tIfy>zThent=y:y=zrz=tPrint"排序后心x:ny"二zEndSubPrivateSubCommand1_Click()Dimx%7x1%7x2%?x3%Textl=Int(Rnd龙900+100)x二Vai(Textl)二xMod10x2二(xMod100)10x3=x100Text2=x1*100+x2*10+x3EndSubPi'ivateSubFonn_Clic

3、kODimaOJ%J%a=Airay(12:6；4:89:75,63；100：20,31)j=UBound(a)Fori=OTojPrinta(i)NextiPrintFori=6Toja(i-1)=a(i)Nextij=j・1ReDimPresenta(j)Fori=OTojPi'inta(i)NextiPrintEndSub