第4版的《VB语言程序设计》184页的作业
要求的是随机产生的是大小写字母，而且不分大小写，录入都算正确，这个大佬们怎么解决呢？

这个样子的

DDDDDDDDDDDDDD

大写字母就是ASCII码在65~90之间的字符，小写字母就是ASCII码在97~122之间的字符
先产生一个这个范围内的随机数，再用Chr函数转换成对应的字符，就是随机字母了

定义一个数组存放52个字母 然后用rnd和int组合产生1到52的随机正整数 就是定义麻烦的很 应该可以吧？ 我只是一个无情的顶帖机器可不要当真

也可以两次生成随机数，第一次0到25对应26个大写字母，第二次0到1若为一则用Lcase转为小写字母

nZM = Int(Rnd * 58 + 65)
If nZM >= 91 And nZM <= 96 Then nZM = nZM + 7
cZM = Chr(nZM) '　字符型变量 cZM 的值，就是随机大小写字母

这个样子的

DDDD

Dim s1 As String, s2 As String
Dim i As Integer, n As Integer, c As Integer
s1 = UCase(Text1.Text)
s2 = UCase(Text2.Text)
n = Len(s2)
For i = 1 To n
If Mid(s1, i, 1) = Mid(s2, i, 1) Then c = c + 1
Next i
Text4.Text = Format(c / n, "0%")

多谢楼主大大，网友大大解惑！