《土地资源与信息技术》由会员分享，可在线阅读，更多相关《土地资源与信息技术（9页珍藏版）》请在金锄头文库上搜索。
1、.2010年湖南农业大学硕士招生自命题科目试题科目名称及代码：土地资源与信息技术(832)适 用 专 业：土地资源利用与信息技术考生注意事项： 所有答案必须做在答题纸上，做在试题纸上一律无效； 按试题顺序答题，在答题纸上标明题目序号。一、简答题（共计50分，每小题10分）1. 从生态学角度看，土地具有哪些重要功能？2. 哪些热量指标影响土地的农业利用？3. 我国土地利用现状分类的八大类包括哪些？4. 简述土地适宜性评价和土地经济评价的区别。5. 土地退化主要包括哪些类型？二、论述题（共计40分，每小题20分）1. 试论述土地资源利用与社会经济发展的关系。2. 分别论述3S技术中各项技术在土地资
2、源调查中的作用。三、单选题（共计6分，每小题1分）1. 以下关于Visual Basic数据类型的说法，不恰当的是( c )A)Visual Basic 6.0提供的数据类型主要有字符串型和数值型，此外还有字节、货币、对象、日期、布尔和变体数据类型等B)目前Decimal数据类型只能在变体类型中使用C)用户不能定义自己的数据类型D)布尔型数据只能取两种值，用两个字节存储2. 在代码编辑器中，续行符是用来换行书写同一个语句的符号，用以表示续行符的是( a )A)一个空格加一个下划线_ B)一个下划线_C)一个造字符- D)一个空格加一个连字符3. 有如下事件过程：Private Sub Form
3、_KeyDown(KeyCode As Integer, Shift As Integer)If (Button And 3)=3 ThenPrint OKEnd IfEnd Sub程序运行后，为了在窗体上输出OK，应当按下的鼠标键是( c )A)左键 B)右键 C)同时按下左键和右键 D)按什么都不显示 4. 设有语句 x=InputBox(输入数值,0示例) 程序运行后，如果从键盘上输入数值（并按回车键，则下列叙述中正确的是( ? ) A)变量X的值是数值10 B)在InputBox对话框标题栏中显示的是示例 C)0是默认值 D)变量X值是字符串10 5. 在窗体上画一个名称为Comman
4、d1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X Print X,Y End Sub 程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为( b ) A)15 16 B)15 6 C)15 15 D)5 6 6. 在窗体上画一个名称为Command1命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码: Private x As Integer Private Sub Command
5、1_Click() Static y As Integer Dim z As Integer n = 10 z = n + z y = y + z x = x + z Label1.Caption = x Label2.Caption = y Label3.Caption = z End Sub 运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是( c ) A)10 10 10 B)30 30 30 C)30 30 10 D)10 30 30 四、判断题（共计6分，每小题1分。正确的划“”,错误的划“”。）1. 一个Visual Basic应用程序可以含有多个标准模块文件。（ v
6、）2. 对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定。（ v ） 3. Mid能从字符串VisualBasic中直接取出子字符串Basic的函数。（ x ） 4. counstA可以作为Visual Basic变量名。（v ） 5. Visual Basic程序不是结构化程序，不具备结构化程序的三种基本结构 。（v ）6. 对长度为N的线性表进行顺序查找，在最坏情况下所需要的比较次数为 N+1。（ v） 五、填空题（共计12分，每小题2分）1. 软件工程包括3个要素，分别为方法、工具和_ 2. 表达式3 2 Mod 36 2 5的值是_3. 下列语句的输出结果是_。Print
7、Format(Int(12345.6789*100+0.5)100，0000，0.00)4. Visual Basic提供的对数据文件的三种访问方式为随机访问方式、_和二进制访问方式。 5. 执行下面的程序段后，变量S的值为_。 S = 5 For i = 2.6 To 4.9 Step 0.6 S = S + 1 Next i 6. 单击窗体上的关闭按钮时，触发的事件是_end_六、程序阅读题（共计16分，每小题4分）1. 有如下的程序：Private Sub Command1_Click()Dim k As Integer, m As IntegerDim P As Integerk=4:
8、 m=1P=Pid(k, m): Print P;P=Pid(k, m): Print PEnd SubPrivate Function Pid(a As Integer, b As Integer)Static m As Integer, i As Integerm=5: i=2i=i + m + 1m=i + a + bPid=m 2End Function单击命令按钮后，输出结果为_2. 在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim m As Integer, n As Integer, p As Integerm=3: n
9、=5: p=0Call Y(m, n, p)Print Str(p)End SubSub Y(ByVal i As Integer, ByVal j As Integer, k As Integer)k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是_。3. 下列程序的执行结果为_Private Sub Command1_Click()Dim s1 As String, s2 As Strings1=abcdCall Transfer(s1, s2)Print s2End SubPrivate Sub Transfer (ByVal xstr As String,
10、 ystr As String)Dim tempstr As Stringi=Len(xstr)Do While i =1tempstr=tempstr + Mid(xstr, i, 1)i=i - 1Loopystr=te mpstrEnd Sub4. 在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序：Private Sub Command1_Click()Dim a(10)As IntegerDim x As Integer For i=1 To 10a(i)=8+iNextx=2Print a(f(x)+x)End SubFunction f(x As Integer)
11、x=x+3f=xEnd Function程序运行后，单击命令按钮，输出结果为_。七、程序填空题（共计20分，每空2分）1. 下面是用冒泡法将5个整数按升序排列，请将程序补充完整。Sub GASR()Dim mm=Array(10, 1, 5, 6, 7)For i=0 To 3For j=_1_If m(i) =m(j) Then_2_m(i) =m(j)m(j) =tEnd IfNext j_3_For i=0 To 4Print m(i)Next iEnd Sub2. 在窗体上画1个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load()Opend：te
12、mpdat.txtFor Output As#1Text1.Text= End Sub Private Sub Text1_KeyPress(KeyAscii As Integer)lf_4_=13 ThenIf UCase(Text1.Text)= _5_ThenClose 1End_6_Write#1，_7_Text1.Text=End IfEnd IfEnd Sub3. 在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim arr(1 To 100）As IntegerFor i=1 To 100arr(i)=Int(Rnd*1000)Next iMax=arr(1)Min=arr（1）For i=1 To 100If_8_ThenMax=arr(i)_9_If_10_ThenMin=arr(i)End IfNext iPrintMax=；Max，Min=；MinEnd Sub.
