单项选择题
单项选择题 下面程序运行后,窗体(Form1)中输出的结果是( )Privatesubform_load()form1.autoredraw=truex=3:y=5Printx;yendsubA.TrueTrueB.35C.窗体无显示D.x=3y=5
单项选择题 以下程序:PublicSubSwap1(xAsInteger,ByValyAsInteger)DimtAsIntegert=x:x=y:y=tEndSubPublicSubSwap2(xAsInteger,yAsInteger)DimtAsIntegert=x:x=y:y=tEndSubPrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=10:b=20Swap1a,bPrint"A1=";a,"B1=";ba=10:b=20Swap2a,bPrint"A2=";a,"B2=";bEndSub当单击命令按钮后,窗体上输出的结果是( )
单项选择题 下面程序运行后,S的值是( )Privatesubform_click()forj=1to10x=j*2-1ifx/3=int(x/3)orx/5=int(x/5)thens=s+xnextjPrint"s=";sendsub
单项选择题 在窗体的单击事件中有如下程序:privatesubform_click()forj=1to15a=a+jnextjPrintaendsub程序运行后单击鼠标左键,输出的结果是( )
单项选择题 以下程序段,图形框运行后的效果为( )PrivateSubImage1_Click()Image1.Move(Form1.ScaleWidth-Image1.Width)/2,(Form1.ScaleHeight-Image1.Height)/2,Image1.Width/2,Image1.Height/2EndSubA.单击图形框,移动图形框起始点到窗体中心位置,图形大小不改变B.单击图形框,移动图形框起始点到窗体中心位置,图形宽度改变为原来1/4C.单击图形框,移动图形框起始点到窗体中心位置,图形宽度改变为原来1/2D.以上说法都不正确