Question

VB编程实现：在文本框中输入一个10以内的正整数n，单击“开始”按钮，判断输入数据的有效性，若越界给出相

关提示，并从新输入，否则随机产生一个大写字母，以此字母为首字母，连续产生n*n个字母，并给出说明文字。
请大家帮忙看哈，我的程序哪里出错了。
Dim n!, x!
x = InputBox("请输入一个数：")
If n >= 1 And n <= 10 Then
MsgBox ("数字有效")
ElseIf n > 10 Then
a = mosgbox("数字无效，请重新输入", 5, "错误提示")
Else
a=string((n*n)*((int((Z-A)+1)*rnd)+Z)
End If

Answer 1

问题不是一般的多
Dim n!, x! 应为Dim n, x
后面判定n,则x = InputBox("请输入一个数：")应为n = InputBox("请输入一个数：")
a = mosgbox("数字无效，请重新输入", 5, "错误提示")中的mosgbox应为msgbox
a=string((n*n)*((int((Z-A)+1)*rnd)+Z)不明白想表达什么意思
题目中的首字母开始连续n*n个字母是怎么个连续发，如n是9，产生81个字母，怎么连续？