一个关于在线考试的web系统，具有试卷生成功能的ASP+SQL Server源码-an examination of online web system, Generating function papers with the ASP SQL Server source code ======================== 考试系统论文 摘要 随着计算机技术的普及和提高，计算机等级考试成为热门，等级考试的目的在于适应社会主义市场经济建设的需要，一方面是为了促进计算机知识的普及和计算机应用
DELPHI Rijndael algorithm implementation~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~The implementation is based on an original code.The CBC-mode bug fixed.As the example of API usage is complemented by simple functions:{encode string} function EnCryptString(c
一个贪吃蛇游戏 只有 36k建18个image控件组 名为 sn(0) ;sn(1) ...sn (17)一个timer1 一个label2 用来记分三个image名为 pg;she和st 分别放苹果;蛇身和蛇头的图片所有image的长 宽 都为255一个shape 名为 sh 长宽为4590源码如下;(本人要读书,不太完善)Dim n As ByteDim cz As IntegerPrivate Sub Form_KeyDown(KeyCode As Integer, Shift As I
asp生成html源码 <% function chan_time(shijian)'转换日期时间函数 s_year=year(shijian) if len(s_year)=2 then s_year="20"&s_year s_month=month(shijian) if s_month<10 then s_month="0"&s_month s_day=day(shijian) if s_day<10 then s_day="0"&s_day s_hour=hour(
Delphi 连续生成7个随机数 测试，源码可运行于Delphi7环境，主要是使用Delphi中的Random和Array函数来生成，每次生成一个随机数，并使用Showmessage来弹出框显示随机数，比如下面的代码： procedure TForm1.Button1Click(Sender: TObject); Var I:integer; Num:array[0..6] of integer; Begin Randomize; For I:=0 to 6
http://blog.sina.com.cn/s/blog_4cd4ffc401018xbx.html vb编写双色球号码生成小程序源码 需要3个label，用来显示相应信息；两个文本框，一个显示生成的号码，一个用来设置号码数量；两个按钮，一个用来开始生成，一个用来复制生成的号码。完整代码如下： 首先声明一个生成号码的函数用于调用 Sub 生成() vb的函数名称可以用汉字的，呵呵 Dim n(1 To 33), i, j, q, p 定义变量 For i = 1 To 33 n(i)
PB新大陆星POS扫码支付源码，调用C#动态库，简单实现接口，采用POWERBUILDER9.0开发
string ls_url
string ls_data
string ls_dd
string ls_zfqd
//【交易类型--传入平台用】
if rb_1.checked = true then
ls_zfqd = "WXPAY"
end if
if rb_2.checked = true then
ls_zfqd = "ALIPAY"
end if
if rb_3.checked =
苏鲁
Nim中的tqdm风格进度栏
上面的演示使用以下代码：
import unittest, os, sequtils, random
randomize ()
test "random time test" :
for a in suru ( toSeq ( 0 ..< 100 )) :
sleep (( rand ( 99 ) + 1 ))
test "long time test" :
for a in suru ([ 1 , 2 , 3 , 5 ]) :
