20101218《程序设计基础》模拟试题

《20101218《程序设计基础》模拟试题》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、《程序设计基础》和《VisualBasic程序设计＃》模拟试题2010-10一、选择题都是一些基本的概念例如：1、要使窗体在运行是不显示最大化按钮，只要对下列（A）属性设置。A.MaximizeBoxB.BorderStyleC.WidthD.MinimizeBox2、要增加组合框Combo控件中选项，应使用Items集合的（C）方法。A.SubB.RemoveC.AddD.Clear3、表达式16/4-2^5*8/4MOD52的值为（B）A.14B.4C.20D.124、要设置DataGrid控件的标题文本，应修改（B）属性。A.TextB.Captio

2、nTextC.CaptionD.Title5、下面程序段的运行后，n的值为（C）n=1forI=1to4n=n*InextA.6B.8C.24D.4二、操作题1、新建项目test01，将其保存在目录下，要求：1）程序执行结果如下图；2）此程序功能是：随机产生1个整数（整数的范围为0-100），并显示在第1个文本框中，单击“判断”按钮，能判断该整数是奇数还是偶数，并显示在第2个文本框中；3）第2个文本框设置为不可修改；4）单击“退出”按钮退出该程序。单击“判断”按钮界面参考答案：将第2个文本框的readonly属性设置为true.程序代码如下：PrivateS

3、ubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimx,yAsIntegerx=CInt(TextBox1.Text)IfxMod2=1ThenTextBox2.Text="奇数"ElseTextBox2.Text="偶数"EndIfEndSubPrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.Cli

4、ckMe.Close()EndSubPrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadDimbAsNewSystem.RandomMe.TextBox1.Text=b.Next(0,100)EndSub2、新建项目test02，将其保存在目录下，要求：1)程序执行结果如下图。2)单击“产生数组”按钮，随机产生10个整数，整数的范围为0-100，并显示在第一个文本框中；（用数组实现）3)单击“求最大值”按钮，计算出10个整数中的最

5、大数，并显示，运行结果如下图所示；4)将2个文本框改为不可修改状态。单击“产生数组”单击“求最大值”设两个文本框的readonly属性为true程序代码如下：DimArr(9)AsSingle'存放随机产生的数PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimiAsIntegerDimbAsNewSystem.RandomTextBox1.Text=""Fori=0To9'本循环显示元素数组的各元素值Arr(i)

6、=b.Next(0,100)TextBox1.Text=TextBox1.Text+CStr(Arr(i))+""NextiMe.TextBox2.Clear()EndSubPrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.ClickDimiAsIntegerDimmAsSinglem=Arr(0)Fori=1To9Ifm

7、ubPrivateSubButton3_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton3.ClickEndEndSub3、新建项目test03，将其保存在目录下，要求：1）程序执行结果如下图；2）此程序功能是：随机产生3个整数（整数的范围为0-500），并显示在前3个文本框中，单击“求最小”按钮，能求出其中最小的整数，并显示在第4个文本框中；3）显示最小值的文本框（第4个文本框）设置为不可修改；4）单击“退出”按钮退出该程序。单击“求最小”按钮界面PrivateS

8、ubButton1_Click(ByValsende