大基VB模拟题

大基VB模拟题

ID:47441808

大小:113.50 KB

页数:7页

时间:2020-01-11

大基VB模拟题_第1页
大基VB模拟题_第2页
大基VB模拟题_第3页
大基VB模拟题_第4页
大基VB模拟题_第5页
资源描述:

《大基VB模拟题》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、PPID492016~2017第一学期期末大基VB模拟试卷试卷预览单选题1.(2分)在VB.NET集成环境创建VB.NET应用程序时,除了工具箱窗口、设计窗口、属性窗口外,必不可少的窗口是_________。1.窗体布局窗口2.立即窗口3.代码窗口√4.监视窗口2.(2分)在Label1.Text="VB.NET程序设计"语句中,Label1、Text和"VB.NET程序设计"分别属于_____。1.对象、值、属性2.对象、方法、属性3.对象、属性、值√4.属性、对象、值3.(2分)当输入焦点离开文本框的时,

2、发生的事件是______。1.GotFocus2.Active3.LostFocus√4.DblClick4.(2分)若要使命令按钮不可操作,则应对其_______属性进行设置。1.Enabled√2.Visible3.Style4.Disable5.(2分)以下正确的变量名是______。1.4Answer2._name√3.Integer4.SHUJU6.(2分)表示“X是能被3整除的数”的逻辑表达式是______。1.xmod3=0√2.xmod3<>03.x3=04.x3<>07.(2分)已知a=

3、2,b=2,复合赋值语句: a*=b+10执行后,a的值是__________。1.122.24√3.24.148.(2分)下面正确的赋值语句是______。1.xy=30√2.sin(x)=r*r3.2y=x+304.30=x*y9.(2分)以下哪个语句可以使程序结束当前循环,而进入下一次循环______。1.Close2.Exit3.Continue√4.End10.(2分)Dims%DoWhiles<=3    s=s+1Loop执行加法操作的次数为______。1.02.33.4√4.5程序填空题1.

4、(12分)在文本框中分别输入身高和体重,回车后,根据计算公式将相应的提示信息显示在标签中。      计算公式为:T=W/H2 即:体重指数=体重/身高的平方 若T>25显示"偏胖,注意节食!";25<=T<18则显示"正常,继续保持!";T<=18显示"偏瘦,增加营养!"。    PrivateSubTextBox2_KeyPress(……)HandlesTextBox2.KeyPress       Dimtzzs,sg,tzAs_______(1)______             DimstrAsS

5、tring       IfAsc(______(2)______)=13Then           sg=Val(TextBox1.Text)           tz=Val(TextBox2.Text)           tzzs=tz/sg/sg            SelectCasetzzs               Case_______(3)______>25                    str="偏胖,注意节食!"               Case_______(4)_

6、______                   str="正常,继续保持!"               CaseElse                   str="偏瘦,增加营养!"           EndSelect           Label1.Text=str                     EndIf   EndSub答案:Single@doublee.KeyCharIs18To252.(12分)程序的功能是移动滚动条滑块时,在标签中显示1到滚动条当前值之间所有的完全数。完全数

7、是指这样的数:该数恰好等于它的因子之和(自身因子除外)。如6的除自身之外的因子有1、2、3,而6=1+2+3,故6为完全数。在Load事件中,设置滚动条的部分属性值。    PrivateSubForm1_Load(……)HandlesMyBase.Load   HScrollBar1.Maximum=1000   HScrollBar1._____(1)_____=1   HScrollBar1.smallchange=1'单击两端箭头时Value的增、减量为1  EndSub  PrivateSubHSc

8、rollBar1_Scroll(……)HandlesHScrollBar1.Scroll    Dimm%,n%,g%,s%    Label1.Text="1~"&HScrollBar1.Value&"间的完全数有:"&vbCrLf       Form=HScrollBar1.MinimumToHScrollBar1._____(2)_____           s=0           F

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。