新建表单(FORM1)，里面添加TEXT1、TEXT2、GRID1、COMMAND1、COMMAND2等控件。你用TEXT1存放矩阵的行数(表1.DBF的记录总数)，用TEXT2存放矩阵的列数(表1.DBF的字段数)，GRID1显示表1.DBF的内容，COMMAND1为"修改表结构"，COMMAND2为"结束"，
(1)FORM1.INIT()CLOSE ALLIF FILE("表1.DBF") USE 表1.DBFELSE CREATE TABLE 表1 (列1 N(12,4),列2 N(12,4)) APPEND BLANK REPLACE 列1 WITH 0,列2 WI...
用VFP编制计算器
Tiger5392 2006-06-12
1.控件及其分布
在表单中创建29个命令按钮和1个文本框。1个文本框在表单的最上面。29个命令按钮分布在表单的5行6列，其中第1行只有5列。这29个命令按钮分别是
BackSpace(向前删除字符),CE(清除文本框内容并清除内存数据),C(清除文本框),(,);
MC(清除内存数据),7(数字7),8(数字8),9(数字9),/(除号),SQRT(求算术平方根);
<P style="MARGIN: 0cm 0cm 0pt; TEXT-INDENT: 21pt; mso-char-indent...
－道德的起源－ 把五只猴子关在一个笼子里，上头有一串香蕉实验人员装了一个自动装置。 一旦侦测到有猴子要去拿香蕉，马上就会有水喷向笼子，而这五只猴子都会一身湿。 首先有只猴子想去拿香蕉，当然，结果就是每只猴子都淋湿了。 之後每只猴子在几次的尝试后，发现莫不如此。 于是猴子们达到一个共识：不要去拿香蕉，以避免被水喷到。 后来实验人员把其中的一只猴子释放，换进去一只新猴子A。 这只猴子A看到香蕉，马上想要去拿。 结果，被其他四只猴子海K了一顿。 因为其他四只猴子认为猴子A会害他们被水淋到，所以制止他去拿香蕉，A尝试了几次，虽被打的满头包，依然没有拿到香蕉。 当然，这五只猴子...
*************************************************** 一种加密和解密算法 JM.PRG (C)Copyright 2006-2006* 加密: ?JM("文件名.DBF",88) &&返回0为成功* 解密: ?JM("文件名.DBF",-88) &&返回0为成功* 作者: Tiger5392* 时间: * 建立时间 2006.06.11* 第1次修改时间 2006.06.11*********************************************...
昨天去游戏厅，看见个mm，就上跳舞机上表演，玩了几个“花式”后，人家mm还说我帅呢，哈哈，自己都觉得表演的挺成功。跳完我就下来了，那个mm就拉着另一个胖恐龙上去玩，恐龙会玩，mm不会，不过学得很认真，我就在下面指导了几句。mm完了n个币后，居然没甩我就走了！！！！！？
我也追下楼，绕道走，去跟mm玩了一个“奇遇”，没想到那个mm还挺猥琐，见我打招呼，表扬她学得快，居然不知道说什么好了……然后她转身就走了，哈哈
唉，骗自己，想跳舞给女孩子看，为什么？
呵呵，我无非是想给柯宇看罢了，可惜，她始终不喜欢跟我出来，于是，我还在为将来给她的那次表演苦练着……
下周末爸爸就要外出工作了，可惜明天我就要回学校了，这周六考四级，恐怕周日前回不来了。
下一周，柯宇还会冷冷的对待我这个关心她的人，我将如何撑到她的生日呢？唉……忘记了跟小雅的那一段伤心事，我真不希望还会有什么事情需要我强行自己忘掉了。
眼下快考四级，可是最近作阅读题却错了很多，没心思复习，现在感觉自己很浮躁。
算了，我已经做好了伤心度过余下大学生活准备了，因为我是真的爱她！
两周多了，我还在奇怪柯宇为什么会突然不愿意理我了，我在想自己做错了什么，可是至今也没想出来。她什么也不愿意告诉我。现在的她，不回我短信，不跟我说话，甚至都不对我笑一下，我想知道她为什么会对我这样。
这个周日真的是很难熬，妈妈的病逐渐的康复了，家里的客人一队一队的，是来关心我妈妈，可是，我总是不习惯家里来人。
这段时间唯一的喜事儿就是爸爸被一个好公司聘去了，我想爸爸心里现在一定很兴奋，不过兴奋之余……爸爸的工作单位在外地，以后回家的机会就很少了。今天爸爸跟我说了很多，我心里也很不是滋味。呵呵，以后的路，还要靠自己走，努力将来养活老爸老妈和老婆吧
<div style="MARGIN: 0px auto; WIDTH: 778px;BACKGROUND-COLOR: #0000ff;">居中的div</div>
起关键作用的是：MARGIN: 0px auto;
特别是auto,少了绝对不行
#include <iostream.h>#include <string.h>class set{ int a[10];public: int m; void seta(int ele,int n){a[n]=ele;} void disp();
};void set::disp(){ for(m=0;m<=9;m++) cout<<a[m]<<" ";}void main(){ set b; set c; int x; int n; cout<<"Please input B:"; for(n=0;n<=9;n++) { cin>>x; b.seta(x,n); } ...
你说怪不怪？两个数,m和n ,如果m=n的话，他们的最大公约数就是m,或者就是n,这是废话，但是……但是！你说如果m>n,就把m-n赋值给m,如果m<n，就把n-m赋值给n,然后再重复这个步骤，直到m=n,结果，这个m或者这个n就是起初的m和n的最大公约数！我天啊，真神了！！
海啸南风 发表于：2006-1-21 22:50:17 [编辑] [精华] [删除] [回复]
输入两个5元素的集合，取并集 [c++]
#include <iostream.h>#include <string.h>#include <stdio.h>class set{ char a[5];public: void seta(char ele, int n) { a[n]=ele; } void disp(); friend void Union(set c, set b);};void set::disp(){ int n; for(n=0;n<=4;n++) cout<<a[n]; cout<<endl;}
void Union(set b,set c){ i...
好大一个天才！！不服不行，10岁就会basic了，15岁就混csdn了，高一学c#，去他blog看看：那真不像是个大二的学生写的,只用俩字儿（还不包括标点）——深奥！！！那绝不是复制粘贴来的，全是原创，且不说编程思想，那些语言用的就神了。而且，在外语上这孩子还那么有天分。跟他聊了一会儿，差距真不是一般的大啊，他一书架子书，分类十分清晰，下面的书名，我作为纪录，以后有机会，要看看，毕竟这是那位同岁的天才看过的。格式：[语言]书名（中文名 作者）如果没有写作者的，一般都是不推荐或者作者无法考证的软件工程：[英]Design Patterns（设计模式Gof）[中]重构（Fowler）[英]E...
我们导员真是可恶，本来入党积极分子的思想汇报我们都交了，两月写一份，我们都写了一年多了，可是导员居然把所有同学的思想汇报都给丢了，真是可恶啊，害得我们都要重写，而且，每份写1500字，一共8篇，就是120000字的思想汇报，郁闷啊，有那时间编编程序，学点儿别的多好呢，这不是难为我们吗？真是没办法啊，太恐怖了,我一拖再拖，这周末就得交了，我还没写呢，可是今晚真的不想写，这么好的时间，玩玩电脑多好，编编程序，时间都让我们导员给浪费了！！！
海啸南风 发表于：2006-3-2 22:14:04 [编辑] [精华] [删除] [回复]
我买了笔记本，花了1700，贵了点儿，但感觉挺好的，那个配置办公还是编程学习都不耽误，真是挺好的，今天花了一百多，买了个小键盘，买了个小耳机，买了个小鼠标目的是便于笔记本电脑的携带，我还买了张上网卡，我们校网速还是很快的，查资料一点儿问题都没有，这张上网卡我要好好利用，尽量发挥它在学习方面的价值吧！这电脑买得挺好的，用起来挺爽，我现在每天都背着它上学，自习也背着，今后还得多多努力，以后还要干大程序呢，好久没上网了，今天来更新一下blog，顺便问候一下各位网友！
海啸南风 发表于：2006-3-2 22:09:57 [编辑] [精华] [删除] [回复]
1700？在哪...
这样子过了n天了怎么过的呢，白天聊天，推魔兽，发短信（短信很耽误时间的，所以单列一条），偶尔看书学习，晚上11点以后反省了自己该学习了，所以一下干到第二天早上两天，就是现在这个点儿了。也不知道这样对不对，按我爸妈说法，把玩放在前面是不对的，但是我感觉我不是故意这样做的，只是，我不冲动起来，好像学不出什么东西。谁知道呢，总比不学强，先这么想吧！另外，半夜学习真的很爽啊！不是一般的爽！想想看……嗯……爽！明天继续，虽然是假期，但保证每天都不白过，写点儿代码，学学编程，玩玩魔兽，聊聊天，玩好学好，先这样将就着吧！我会尽量缩短玩的时间的。哈哈，这样也好玩!
海啸南风 发表于：2006-2-4...
[原创]我的程序员之梦
我是一个没名的大学的学生，专业较信息管理与信息系统。记得那年高考成绩下来了，妈问我想报哪儿，学什么专业，这时我已经无暇回答这个问题了，因为我正在做在电脑前玩那跟我阔别已久的游戏。扪心自问：是无暇吗？也许我在用游戏逃避着一个现实——我的分学计算机不够。我妈妈问我想学什么，我说就想学计算机，其他的专业名字我根本不想听，就像听不懂一样，我告诉她如果学不了计算机，别的专业随便选一个，我好好学就是了。我妈妈知道我这辈子除了电脑不会再有别的兴趣了，于是她找到了一个和计算机有点儿相关的专业，就是我现在学的这个。
那个时候，我已经决定了，就拿这个专业当作...
[转帖]你还在用if else吗
你还在用if else吗<Script language="javascript" type="text/javascript">document.title="你还在用if else吗 - "+document.title</Script> 转自 csdn
面向过程设计和面向对象设计的主要区别是：是否在业务逻辑层使用冗长的if else判断。如果你还在大量使用if else，当然，界面表现层除外，即使你使用Java/C#这样完全面向对象的语言，也只能说明你的思维停留在传统的面向过程语言上。
...
[c++]上次请教高手们关于this指针的时候，一个高手留下的稍不太文明的函数，当然是玩笑，但感谢那位高手！
class FUCK{ int fuck; void Fuck()相当于 void Fuck(FUCK*const this) { cout<<this-<fuck<<endl; }};
FUCK* fuck=new FUCK;fuck->Fuck()的调用相当于Fuck(fuck);
海啸南风 发表于：2006-1-10 10:01:38 [编辑] [精华] [删除] [回复]
[转贴]学编程的人不能不看的好文章?[讨论]
[转贴]学编程的人不能不看的好文章?[讨论]<Script language="javascript" type="text/javascript">document.title="[转贴]学编程的人不能不看的好文章?[讨论] - "+document.title</Script>
看了下面的这篇文章，深有感触，枣子碰到的问题也是我们大多数程序员的通病，也许我们大多数人都只是在做一些比较小型的软件，对软件运行的效率不在乎，就算对速度和效率在乎的也可能是一些在数据库操作方面的。大家看完了，也许会有很多感想，但这只是我同意枣子的个人观点。...
>除开五大这种要什么有什么，进去做打字也能光耀门楣的不谈。如果是嫁到一个普通软件公司，怎样的环境能使你最快的成长呢？<br/><br/> 首先基本的公司项目管理水平是必要的；<br/><br/> 其次稳健而不保守的公司技术选型是必要的;<br/><br/> 重要的，要有一个严苛的环境，那些古训说的都没错，越是严苛成长越快。<br/><br/> 然后有些助力，让你在严寒中节省体力，过得好些的，就是最佳的练功环境了。<br/><br/> <strong>一，最复杂多变的业务规则，最难侍候的客户<br/><br/></strong> 大多数人碰上这几样东西都是愁眉苦脸，天天抱怨，其...