Question

帮忙做一个小型vfp程序

帮忙做一个小型的vfp程序，网上找的也可以
要求：
学生上机系统 大概就是登陆之后，选择“上机”的话开始倒计时，还可以查询信息，编辑信息
表包括用户名密码一张，学生信息一张（字段为姓名、学号、上机时间）
表单包括登陆表单、倒计时、上机信息查询、上机信息录入
最后用一个项目（project）整合起来，使它能脱离vfp运行

以上为大致要求，不用做的太复杂，谢谢啦!
发到邮箱 537528192@qq.com

Answer 1

我有个现成的，已发到您邮箱，请注意查收。

package student_manage;

import java.awt.*;

import javax.swing.*;
import com.borland.jbcl.layout.XYLayout;
import com.borland.jbcl.layout.*;
import com.borland.dbswing.JdbLabel;
import com.borland.dbswing.JdbTextField;
import com.borland.dx.sql.dataset.Database;
import com.borland.dx.sql.dataset.*;
import com.borland.dbswing.TableScrollPane;
import com.borland.dbswing.JdbTable;
import com.borland.dbswing.JdbNavToolBar;
import com.borland.dbswing.JdbStatusLabel;
import java.awt.event.ActionEvent;
import java.awt.event.ActionListener;
import java.awt.event.KeyEvent;
import java.awt.event.KeyAdapter;
import java.sql.DriverManager;
import java.sql.Statement;
import java.sql.ResultSet;
import java.sql.Connection;

/**
* <p>Title: </p>
*
* <p>Description: </p>
*
* <p>Copyright: Copyright (c) 2007</p>
*
* <p>Company: </p>
*
* @author not attributable
* @version 1.0
*/
public class admin_index extends JDialog {
JPanel panel1 = new JPanel();
BorderLayout borderLayout1 = new BorderLayout();
JTabbedPane jTabbedPane1 = new JTabbedPane();
JPanel jPanel1 = new JPanel();
JPanel jPanel2 = new JPanel();
JPanel jPanel3 = new JPanel();
JPanel jPanel4 = new JPanel();
XYLayout xYLayout1 = new XYLayout();
JPanel jPanel5 = new JPanel();
XYLayout xYLayout2 = new XYLayout();
JdbLabel jdbLabel1 = new JdbLabel();
JdbLabel jdbLabel2 = new JdbLabel();
JdbTextField jdbTextField1 = new JdbTextField();
JdbTextField jdbTextField2 = new JdbTextField();
JPanel jPanel6 = new JPanel();
JButton jButton1 = new JButton();
JButton jButton2 = new JButton();
XYLayout xYLayout3 = new XYLayout();
JdbLabel jdbLabel3 = new JdbLabel();
JdbLabel jdbLabel4 = new JdbLabel();
JdbTextField jdbTextField3 = new JdbTextField();
JdbTextField jdbTextField4 = new JdbTextField();
XYLayout xYLayout4 = new XYLayout();
Database database1 = new Database();
QueryDataSet queryDataSet1 = new QueryDataSet();
TableScrollPane tableScrollPane1 = new TableScrollPane();
JdbTable jdbTable1 = new JdbTable();
JdbNavToolBar jdbNavToolBar1 = new JdbNavToolBar();
JdbStatusLabel jdbStatusLabel1 = new JdbStatusLabel();
XYLayout xYLayout5 = new XYLayout();
JPanel jPanel8 = new JPanel();
Database database2 = new Database();
QueryDataSet queryDataSet2 = new QueryDataSet();
TableScrollPane tableScrollPane2 = new TableScrollPane();
JdbTable jdbTable2 = new JdbTable();
JdbNavToolBar jdbNavToolBar2 = new JdbNavToolBar();
JdbStatusLabel jdbStatusLabel2 = new JdbStatusLabel();
XYLayout xYLayout6 = new XYLayout();
Database database3 = new Database();
QueryDataSet queryDataSet3 = new QueryDataSet();
TableScrollPane tableScrollPane3 = new TableScrollPane();
JdbTable jdbTable3 = new JdbTable();
JdbNavToolBar jdbNavToolBar3 = new JdbNavToolBar();
JdbStatusLabel jdbStatusLabel3 = new JdbStatusLabel();
JPanel jPanel10 = new JPanel();
XYLayout xYLayout7 = new XYLayout();
JPanel jPanel11 = new JPanel();
JPanel jPanel12 = new JPanel();
XYLayout xYLayout8 = new XYLayout();
JdbLabel jdbLabel5 = new JdbLabel();
JdbTextField jdbTextField5 = new JdbTextField();
Database database4 = new Database();
QueryDataSet queryDataSet4 = new QueryDataSet();
TableScrollPane tableScrollPane4 = new TableScrollPane();
JdbTable jdbTable4 = new JdbTable();
JdbNavToolBar jdbNavToolBar4 = new JdbNavToolBar();
JdbStatusLabel jdbStatusLabel4 = new JdbStatusLabel();
Database database5 = new Database();
QueryDataSet queryDataSet5 = new QueryDataSet();
XYLayout xYLayout9 = new XYLayout();
TableScrollPane tableScrollPane5 = new TableScrollPane();
JdbTable jdbTable5 = new JdbTable();
JdbNavToolBar jdbNavToolBar5 = new JdbNavToolBar();
JdbStatusLabel jdbStatusLabel5 = new JdbStatusLabel();
JdbLabel jdbLabel6 = new JdbLabel();
JdbTextField jdbTextField6 = new JdbTextField();
XYLayout xYLayout10 = new XYLayout();
JdbLabel jdbLabel7 = new JdbLabel();
JdbTextField jdbTextField7 = new JdbTextField();
JdbLabel jdbLabel8 = new JdbLabel();
JLabel jLabel1 = new JLabel();
public admin_index(Frame owner, String title, boolean modal) {
super(owner, title, modal);
try {
setDefaultCloseOperation(DISPOSE_ON_CLOSE);
jbInit();
pack();
} catch (Exception exception) {
exception.printStackTrace();
}
}

public admin_index() {
this(new Frame(), "admin_index", false);
}

private void jbInit() throws Exception {
panel1.setLayout(borderLayout1);
jTabbedPane1.setTabPlacement(JTabbedPane.LEFT);
jTabbedPane1.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jPanel1.setLayout(xYLayout1);
jPanel5.setBorder(BorderFactory.createEtchedBorder());
jPanel5.setLayout(xYLayout2);
jdbLabel1.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel1.setText("用 户 名：");
jdbLabel2.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel2.setText("旧 口 令：");
jdbTextField1.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbTextField1.setText("");
jdbTextField2.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbTextField2.setToolTipText("");
jdbTextField2.setText("");
jPanel6.setBorder(BorderFactory.createEtchedBorder());
jPanel6.setLayout(xYLayout3);
jButton1.setBackground(Color.gray);
jButton1.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jButton1.setText("确 认");
jButton1.addActionListener(new admin_index_jButton1_actionAdapter(this));
jButton2.setBackground(Color.gray);
jButton2.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jButton2.setText("取 消");
jdbLabel3.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel3.setText("新 口 令：");
jdbLabel4.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel4.setText("确认口令：");
jdbTextField3.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbTextField3.setText("");
jdbTextField4.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbTextField4.setText("");
jPanel2.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jPanel2.setLayout(xYLayout4);
database1.setConnection(new ConnectionDescriptor(
"jdbc:microsoft:sqlserver://localhost:1433;DatabaseName=master",
"sa", "lingfeng", false,
"com.microsoft.jdbc.sqlserver.SQLServerDriver"));
queryDataSet1.setQuery(new com.borland.dx.sql.dataset.QueryDescriptor(
database1,
"SELECT admin.auser 用户名,admin.apassword 密码 FROM ADMIN", null, true,
Load.ALL));
tableScrollPane1.setBorder(BorderFactory.createEtchedBorder());
jdbTable1.setDataSet(queryDataSet1);
jdbStatusLabel1.setBorder(BorderFactory.createEtchedBorder());
jdbStatusLabel1.setText("jdbStatusLabel1");
jdbStatusLabel1.setDataSet(queryDataSet1);
jdbNavToolBar1.setBorder(BorderFactory.createEtchedBorder());
jdbNavToolBar1.setToolTipText("");
jdbNavToolBar1.setDataSet(queryDataSet1);
jPanel3.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jPanel3.setLayout(xYLayout5);
jPanel8.setBorder(BorderFactory.createEtchedBorder());
jPanel8.setLayout(xYLayout10);
database2.setConnection(new ConnectionDescriptor(
"jdbc:microsoft:sqlserver://localhost:1433;DatabaseName=master",
"sa", "lingfeng", false,
"com.microsoft.jdbc.sqlserver.SQLServerDriver"));
tableScrollPane2.setBorder(BorderFactory.createEtchedBorder());
jdbTable2.setDataSet(queryDataSet2);
jdbNavToolBar2.setDataSet(queryDataSet2);
jdbStatusLabel2.setText("jdbStatusLabel2");
jdbStatusLabel2.setDataSet(queryDataSet2);
jPanel4.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jPanel4.setLayout(xYLayout6);
database3.setConnection(new ConnectionDescriptor(
"jdbc:microsoft:sqlserver://localhost:1433;DatabaseName=master",
"sa", "lingfeng", false,
"com.microsoft.jdbc.sqlserver.SQLServerDriver"));
queryDataSet3.setQuery(new com.borland.dx.sql.dataset.QueryDescriptor(
database3,
"select course.cname 课程名,course.cno 课程号,course.cteacher 任课教师,course.ccredat " +
"学分,count(sc.sno) 选课人数 from course,sc where \nsc.cno=course.cno group " +
"by course.cname,course.cno,course.cteacher,course.ccredat", null, true,
Load.ALL));
tableScrollPane3.setBorder(BorderFactory.createEtchedBorder());
jdbTable3.setDataSet(queryDataSet3);
jdbStatusLabel3.setText("jdbStatusLabel3");
jdbStatusLabel3.setDataSet(queryDataSet3);
jPanel10.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jPanel10.setLayout(xYLayout7);
jPanel12.setBorder(BorderFactory.createEtchedBorder());
jPanel12.setLayout(xYLayout8);
jdbLabel5.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel5.setText("请输入学生学号：");
database4.setConnection(new ConnectionDescriptor(
"jdbc:microsoft:sqlserver://localhost:1433;DatabaseName=master",
"sa", "lingfeng", false,
"com.microsoft.jdbc.sqlserver.SQLServerDriver"));
queryDataSet4.setQuery(new com.borland.dx.sql.dataset.QueryDescriptor(
database4,
"select student.sno 学号,student.sname 姓名,course.cname 课程名,course.ccredat " +
"学分,sc.sgrade 分数 from sc,course,student where sc.sno=student.sno and " +
"sc.cno=course.cno", null, true, Load.ALL));
tableScrollPane4.setBorder(BorderFactory.createEtchedBorder());
jdbTable4.setDataSet(queryDataSet4);
jdbStatusLabel4.setText("jdbStatusLabel4");
jdbTextField5.setText("");
jdbTextField5.addKeyListener(new admin_index_jdbTextField5_keyAdapter(this));
jdbTextField5.addActionListener(new
admin_index_jdbTextField5_actionAdapter(this));
jPanel11.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jPanel11.setLayout(xYLayout9);
database5.setConnection(new ConnectionDescriptor(
"jdbc:microsoft:sqlserver://localhost:1433;DatabaseName=master",
"sa", "lingfeng", false,
"com.microsoft.jdbc.sqlserver.SQLServerDriver"));
queryDataSet5.setQuery(new com.borland.dx.sql.dataset.QueryDescriptor(
database5,
"SELECT student.sno 学号,student.sname 姓名,student.ssex 性别,student.smingzu " +
"民族,student.szhuanye 政治面貌,student.sgrade 年级,student.sxueyuan 学院,student.sclass " +
"班级,student.sphone 电话,student.szhengzhi 政治面貌,student.scard 身份证,student.saddress " +
"家庭住址,student.sbrith 出生日期,student.semail 邮箱 FROM master.dbo.student", null, true,
Load.ALL));
tableScrollPane5.setBorder(BorderFactory.createEtchedBorder());
jdbTable5.setDataSet(queryDataSet5);
jdbStatusLabel5.setText("jdbStatusLabel5");
jdbNavToolBar5.setBorder(BorderFactory.createEtchedBorder());
jdbNavToolBar5.setDataSet(queryDataSet5);
jdbLabel6.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel6.setText("新用户名：");
jdbLabel7.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel7.setText("请输入教师号：");
jdbLabel8.setFont(new java.awt.Font("DialogInput", Font.PLAIN, 12));
jdbLabel8.setText("例如：2001");

Answer 2

到处都可以下载