数组
2007-12-8 9:33:02 阅读12 评论0 82007/12 Dec8
数组具有以下属性：
数组可以是一维、多维或交错的。
数值数组元素的默认值设置为零，而引用元素的默认值设置为 null。
交错数组是数组的数组，因此，它的元素是引用类型，初始化为 null。
数组的索引从零开始：具有 n 个元素的数组的索引是从 0 到 n-1。
数组元素可以是任何类型，包括数组类型。
数组类型是从抽象基类型 Array 派生的引用类型。由于此类型实现了 IEnumerable 和 IEnumerable，因此可以对
多个文本框内容（非顺序）值相等
2007-11-20 20:53:15 阅读9 评论0 202007/11 Nov20
function IsRightAnswer(aryTKT() as long,txtTKT as object) as boolean
dim abIsMatch(9) as boolean, lMatchCount as long
dim i as long, j as long, l as long
for i= 0 to 9
l = CLng(txtTKT(i))
for j= 0 to 9
MsFlexGrid显示图片
2007-11-20 20:48:53 阅读130 评论2 202007/11 Nov20
Private Sub Command1_Click()
For i = 0 To 11
For j = 0 To 3
addpicture i, j, "C:\Documents and Settings\lianzy\My Documents\IMG_0005.jpg"
Next
Next
End Sub
Sub addpicture(ByVal row As Integer, ByVal col As Integer, ByVal picpath As String)
Dim pic1 As PictureBox, pic2 As PictureBox
MSFlexGrid1.row = row
For i = 0 To 11
For j = 0 To 3
addpicture i, j, "C:\Documents and Settings\lianzy\My Documents\IMG_0005.jpg"
Next
Next
End Sub
Sub addpicture(ByVal row As Integer, ByVal col As Integer, ByVal picpath As String)
Dim pic1 As PictureBox, pic2 As PictureBox
MSFlexGrid1.row = row