填空题

在窗体上画一个名称为Command1的命令按钮，编写如下事件过程
Private Sub Command1_Click()
Dim a As String
a=______
For i=1 To 5
Print Space(6-i);Mid$(a,6-i,2*i-1)
Next i
End Sub
程序运行后，单击命令按钮，要求窗体上显示的输出结果如下，请填空。
5
456
34567
2345678
123456789

【参考答案】

"123456789\

<上一题目录下一题>

热门试题

填空题

在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)，此时如果在文本框中输入字符，则命令按钮Command1变为可用。请填空。 Pfivate Sub Form_Load() Command1.Enabled=False End Sub Private Sub Text1______ Command1.Enabled=True End Sub

填空题

程序运行后，若为“甲队”且成绩大于80分，则在窗体上显示“表现优良”，否则显示“表现普通”。 Private Sub Form_Activate() Dim team1 As String Dim fen As Integer team 1= 乙队 fen=86 Print Print 球队=； team1 Print 成绩=； fen If team1= 甲队 Then If fen＞=80 Then Print 表现优良! Else ______ End If Else Print 表现普通 ! End If End Sub

相关试题