填空题

设有如下程序：
Private Sub Form_Click()
Cls
a$="ABCDFG"
For i=1 To 6
Print Tab(12-i);______
Next i
End Sub
程序运行后，单击窗体，结果如图6所示，请填空。

【参考答案】

Right(a$, i)或Mid(a$,G-i)

<上一题目录下一题>

热门试题

填空题

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，如图5所示，然后编写如下程序： Function Fun(x As Integer, ByVal y As Integer) As Integer x=x+y If x＜0 Then Fun=x Else Fun=y End If End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a=-10:b=5 Text1.Text=Fun(a,b) Text2.Text=Fun(a,h) End Sub 程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是 (11) 和 (12) 。

填空题

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

相关试题