Microsoft Word - 新1.doc

Size: px

Start display at page:

Download "Microsoft Word - 新1.doc"

士刑
7 years ago
Views:

1 第 2 章 Visual FoxPro 6.0 编程基础实验 1 常量的使用一实验目的初步掌握 6 种类型常量的正确书写格式二实验内容按以下内容进行操作, 并写出操作结果 1. 数值型常量和货币型常量 (1)?100?100.00?100.01? ?$100?$100.00?$100.01?$ 字符型常量?"Visual FoxPro 6.0 中文版程序设计教程 "?[ 欢迎使用 " 教务管理数据库 "]?"123"?'"123"' 3. 日期型常量和日期时间型常量 (1)?{^ } SET CENTURY ON SET MARK TO "." SET DATE TO YMD?{^ }

作结果 1. 数值型常量和货币型常量 (1)?100?100.00?100.01?100.23456?$100?$100.00?$100.01?$100.23456 2.

2 8 Visual FoxPro 程序设计实验指导与习题解析查看两条?{^ } 命令的显示结果有何不同, 为什么? 接着输入 :?{^ } SET MARK TO?{^ ,9}?{^ ,9:30 p}?{^ ,21:30} 接着输入 : SET CENTURY OFF SET DATE TO AMERICAN?{^ ,9} 4. 逻辑型常量?,.t.,.Y.,.y.?,.f.,.N.,.n.?.False. 三实验结果 1.(1) Visual FoxPro 6.0 中文版程序设计教程欢迎使用 " 教务管理数据库 " 123 "123" 3.(1) 08/08/

${^2009-12-31,21:30} 接着输入 : SET CENTURY OFF SET DATE TO AMERICAN?{^2009-12-31,9} 4. 逻辑型常量?,.t.,.Y.,.y.?,.f.,.N.,.n.$

3 第一部分实验指导 /12/31 09:00:00 AM 2009/12/31 09:30:00 PM 2009/12/31 09:30:00 PM 12/31/09 09:00:00 AM 提示语法错误实验 2 变量的使用一实验目的 (1) 初步掌握变量的赋值和显示命令掌握数组的定义和赋值二实验内容 1. 简单内存变量的赋值和使用 (1) x=10 STORE 20 TO y, z?x,y,z?x+y+z x="10" STORE "20" TO y, z?x,y,z?x+y+z (3) x="visual FoxPro 6.0" STORE " 中文版程序设计教程 " TO y?x??y?x+y 接着输入 :?" 换行显示 "??" 同行显示 "?" 看看有没有换行 "??" 显示三角形试试 "

4 10 Visual FoxPro 程序设计实验指导与习题解析 2. 数组的赋值和使用 DIMENSION X(4)?X(1),X(3) STORE 100 TO X DIMENSION Y(2,3) STORE " 用一维数组形式表示二维数组元素 " TO Y(2,1)?Y(4) 三实验结果 1.(1) (3) Visual FoxPro 6.0 中文版程序设计教程 Visual FoxPro 6.0 中文版程序设计教程换行显示同行显示看看有没有换行显示三角形试试 2. 用一维数组形式表示二维数组元素实验 3 表达式的使用一实验目的熟悉和掌握 5 种常用表达式的使用二实验内容 1. 数值表达式 (1) a=1 b=-2 c=1? (-b+(b**2-4*a*c)^(1/2))/2*a

(1) 10 20 20 50 10 20 20 102020 (3) Visual FoxPro 6.0 中文版程序设计教程 Visual FoxPro 6.

5 STORE 10 TO x STORE 3 TO y?x%y,-x%y,x%-y,-x%-y 2. 字符表达式第一部分实验指导 11 (1)?" 全国计算机等级考试 "+" 二级 "+"Visual FoxPro"+" 程序设计 "?1+2?"1"+"2"? "Visual "+"FoxPro"? "Visual "-"FoxPro" STORE " " TO A?A 3. 日期表达式和日期时间表达式 STORE {^ } TO A?A+5?A-10?{^ }-{^ }?{^ }-20?{^ ,}-20?{^ ,10:10}-{^ ,9:10} 4. 关系表达式 (1)?0>-5,0.1>0.1?$ <$ ?$ >$ ?{^ }>{^ }?1>5<({^ }<{^ }) STORE "Visual FoxPro"TO s1 STORE "Fox"TO s2 STORE "foxpro"to s3?s2$s1,s3$s1 5. 逻辑表达式?NOT 1>5?1>5 AND {^ }<{^ }?1>5 OR {^ }<{^ }

${^2009-08-13}-20?{^2009-08-13,}-20?{^2009-08-13,10:10}-{^2009-08-13,9:10} 4. 关系表达式 (1)?0>-5,0.1>0.1?$100.1234<$100.12336?$100.1234>$100.12336?{^2008-6-1}>{^2009-6-1}?$

6 12 Visual FoxPro 程序设计实验指导与习题解析三实验结果 1.(1) (1)? 全国计算机等级考试二级 Visual FoxPro 程序设计?3?12?Visual FoxPro?VisualFoxPro /15/09 12/21/ /24/09 08/12/09 11:59:40 PM (1) 5. 实验 4 函数的使用一实验目的熟悉和掌握常用函数的格式和功能二实验内容 1. 数值型函数

01/15/09 12/21/09 31 07/24/09 08/12/09 11:59:40 PM 3600 4.(1) 5.

7 STORE TO x?round(x,2),round(x,1),round(x,0)?round(x,-1),round(x,-2),round(x,-3) 2. 字符型函数 STORE "This is my sister" TO x?occurs("is",x),occurs("sis",x)?occurs("ss",x),occurs("is",x) STORE "This is my sister" TO x 第一部分实验指导 13?AT("is",x), AT("IS",x), ATC("is",x),ATC("IS",x) STORE "This is my sister"to x1 STORE "your"to x2 STORE "She"TO x3? STUFF (x1,9,2,x2), STUFF (x1,1,4,x3)?like("abc","ab"), LIKE("AB*","ABC"), LIKE("AB","AB*") 3. 日期和日期时间型函数 STORE {^ } TO x?year(x),month(x),day(x) 4. 类型转换函数 X= ?STR(X,9,2),STR(X,6,2),STR(X,3)?STR(X,6),STR(X)?VAL(" "),VAL("a ")?VAL("100a.121"),VAL(" ") 5. 测试函数 STORE 75 TO x?iif(x>60," 及格 "," 不及格 ")?BETWEEN (5,2,10)?BETWEEN ("2","05","10") 三实验结果

$STUFF (x1,9,2,x2), STUFF (x1,1,4,x3)?like("abc","ab"), LIKE("AB*","ABC"), LIKE("AB","AB*") 3. 日期和日期时间型函数 STORE {^2008-09-10} TO x?year(x),month(x),day(x) 4. 类型转换函数 X=-100.121?$

8 14 Visual FoxPro 程序设计实验指导与习题解析 This is your sister She is my sister *** 及格综合实验在命令窗口中输入以下命令并执行, 写出 Visual FoxPro 主屏幕上的显示结果 1.?EMPTY(.NULL.)?LIKE("edit","edi?")?AT("a","123abc")?EMPTY(SPACE(10)) a=" 你好 " b=" 大家 "?b+right(a,1)?b+right(a,2) 2. X=10?VARTYPE("X") 3.?LEN(SPACE(0))?AT("A", "BCD")?"[ 信息 ]"$" 管理信息系统 "?ISNULL(.NULL.)?SUBSTR(" 计算机技术 ",3,2)?EMPTY(.NULL.)?LIKE('xy?','xyz')?AT('xy','abcxyz')?ISNULL(SPACE(0)) 4. SET DATE TO YMD SET CENTURY ON SET CENTURY TO 19 ROLLOVER 10 SET MARK TO "."?CTOD(" ")

EMPTY(SPACE(10)) a=" 你好 " b=" 大家 "?b+right(a,1)?b+right(a,2) 2. X=10?VARTYPE("X") 3.?LEN(SPACE(0))?AT("A", "BCD")?"[ 信息 ]"$" 管理信息系统 "?ISNULL(.NULL.)?SUBSTR(" 计算机技术 ",3,2)?

9 第一部分实验指导 15?{^2009/03/09}+15?{^2009/03/09}-15?{^2009/02/25}+date()?{^2009/02/25}-date() 5.?'65+13'?[" 电脑商情 "]?'[ 中国 ]'?'[x=y]' 6.?LEFT("VFP ",3) && 代表空格?SUBSTR(" VFP ",2,3)?YEAR(DATE())?SUBSTR(DTOC(DATE()),7,2)?VARTYPE("40-4*5")?VARTYPE(40-4*5) A="visual " B=" foxpro"?a-b,a+b?upper("12ab34cd") 7.?"ABCD"+ "EF"= "ABCDEF"?"1234"-"34"?CTOD("05/08/03")?DTOC(DATE())>"04/03/02" 8. STORE -100 TO X?SIGN(X)*SQRT(ABS(X))?MOD(YEAR(DATE())-2000,10)?3+5#2*4?{^2009/05/01}=CTOD("05/01/09")?{^2009/05/01}=CTOD("09/05/01") 9.?" 副教授 "$" 教授 "?" 计算机 "<>" 计算机世界 "?LEN("2009/04/15")?OCCURS(" 电脑 "," 计算机俗称电脑 ")?AT("Fox","Visual FoxPro")?LIKE("a*","abcd") 10.X=50 Y=100 Z="X+Y"?50+&Z 11.X="abcd" Y="ab" SET EXACT ON?.NOT.(X==Y).OR.(Y$"XYZ")?.NOT.(X$"XYZ").AND.(X<>Y)?.NOT.(X<>Y)?.NOT.(X>=Y)

$STORE -100 TO X?SIGN(X)*SQRT(ABS(X))?MOD(YEAR(DATE())-2000,10)?3+5#2*4?{^2009/05/01}=CTOD("05/01/09")?{^2009/05/01}=CTOD("09/05/01") 9.?" 副教授 "$" 教授 "?" 计算机 "<>" 计算机世界 "?LEN("2009/04/15")?$

10 16 Visual FoxPro 程序设计实验指导与习题解析 12.SET EXACT OFF X="A"?IIF("A"=X,X-"BCD",X+"BCD") 13.?LEFT("Visual FoxPro",6)?SUBSTR("Visual FoxPro",1,6)?YEAR(DATE())?SUBSTR(DTOC(DATE()),7,2)?VARTYPE("36-5*4")?VARTYPE(36-5*4) A="this" B="is A string"?a-b?a+b 14.?LEN('CHINESE')+VAL('86')+({^2009/04/05}-{^2009/04/01})?LEN(STR(ROUND( ,2)))?LEFT(" ",LEN(" 数据库 "))?BETWEEN(40,34,50)?STUFF("GOODBOY",5,3,"GIRL")?LEN(SPACE(5)-SPACE(10))?INT(LEN(" "))?CHRTRAN(" 计算机信息 "," 计算机 "," 科技 ")?STR( ,7,3) STORE 55 TO X?IIF(X<50,X-50,X+50) 15.SET DATE TO AMERICAN SET MARK TO SET CENTURY OFF STORE {^ } TO rq?day(rq) data=ctod(" ")?data+365 综合实验答案实验结果如下 : 4 大家大家好 C 0 0 算 4

$5454,7,3) STORE 55 TO X?IIF(X<50,X-50,X+50) 15.SET DATE TO AMERICAN SET MARK TO SET CENTURY OFF STORE {^2008-05-01} TO rq?day(rq) data=ctod("01-01-99")?$

11 第一部分实验指导操作符 / 操作数类型不匹配 " 电脑商情 " [ 中国 ] [x=y] VFP VFP C N visual foxpro visual foxpro 12AB34CD Visual Visual C N Thisis A string Thisis A string ABCD GOODGIRL 15 7 科技信息 /01/00

03 4 5 6 65+13 " 电脑商情 " [ 中国 ] [x=y] VFP VFP 2008 2.

《C语言基础入门》课程教学大纲

《C语言基础入门》课程教学大纲 C 语言开发入门教程课程教学大纲课程编号 :201409210011 学分 :5 学分学时 :58 学时 ( 其中 : 讲课学时 :39 学时上机学时 :19 学时 ) 先修课程 : 计算机导论后续课程 :C++ 程序设计适用专业 : 信息及其计算机相关专业开课部门 : 计