最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
考试系统之填空题-实现方法
时间:2008-01-12 编辑:简简单单 来源:一聚教程网
1、出题的时候,将需要填空的部分用固定长度的下划线表示,保存到数据库中,字段名字为stnr
2、取出stnr,用分割函数以固定长度的下划线为分隔符,将除填空部分以外的字符串搞到一个数组里,然后循环取出这个数组里每一个值并上赋给字符串str,再用table.innerHtml=str,这样就将考题输出到表格里了,填空的部分被替换成文本框
---------------------xx.aspx.vb-----------------
Private Sub Create()
Dim str As String
str = dv.Item(0).Item("stnr").ToString.Trim
Dim a() As String
a = Split(str, "_____", -1, CompareMethod.Text)
Dim i As Int16
Dim str1 As String
For i = 0 To a.Length - 2
If dvDab.Count > 0 Then
Dim strDab As String
strDab = dvDab.Item(0).Item("da").ToString.Trim
Dim s() As String
s = Split(strDab, "|", -1, CompareMethod.Text)
-
上一个: Singleton深入浅出
-
下一个: DATAGRID的集中功能!!(代码页)
相关文章
- C#复制数组的两种方式及效率比较解读 10-24
- ASP.NET Identity用法解析 10-24
- ASP.NET MVC使用Identity增删改查用户介绍 10-24
- C语言中atoi函数模拟实现介绍 10-18
- .Net反向代理组件Yarp用法介绍 10-10
- .NET使用YARP通过编码方式配置域名转发实现反向代理教程 10-10