【简答题】如下程序的功能是随机产生10个大写字母保存到数组。请在_________处填入适当的内容(数值),完善程序。Private Sub Command1_Click() Dim a(9) As String, i% For i = 0 To 9 a(i) = Chr(Rnd * 26 + _________) NextEnd Sub
【单选题】运行下面的程序,单击命令按钮Command1,窗体上显示的结果是( )。 Private Sub Command1_Click() Dim x As Integer, y As Integer x = 5: y = 6 Call p1(x, y) Print y End Sub Sub p1(ByVal a As String, ByVal b As String) b = a + b End S...
【判断题】若有如下定义:Structure student Dim Name As String Dim Score As IntegerEnd Structure Dim t,s(9) As StudentDim x As String.y As Integer若要交换结构数组中第一个元素与最后一个元素的值,则如下语句: t=s(0) : s(0) = s(9) : s(9) = t是正确的。
【简答题】从键盘输入任一个 N ,输出一个字符串。字符串的每一位对应 N 的每位数加 1 ,如果 N 上的某一位是 0 ,则字符串对应位是 1 ,如果 N 上某一位是 9 ,则字符串对应位是 A ,例如,输入 12986 ,则输出 ”23A97” Dim n as long,x as string,y as string Dim c as string*1,I as integer Do (1)=in...