• 2021-04-14
    中国大学MOOC: 如下程序的功能是删除文本框Text1中的数字字符。请在_________处填入适当的内容,完善程序。Private Sub Command1_Click() Dim i%, s$, c$ s = "" For i = 1 To Len(Text1.Text) c = Mid(Text1.Text, i, 1) If _________ Then s = s + c End If Next Text1.Text = sEnd Sub