【单选题】在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click( ) S=0 For i=1 To 15 x=2*i-1 1fx Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是
【单选题】在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To sqr(i) If i Mod j = 0 Then Exit For Next j If j > Sqr(i) Then Print i Ne...
【单选题】在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是______。
【单选题】在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:Microsoft Visual Basic Programming 然后编写如下事件过程: Private Sub Command1_Click() Open 'd:/temp/outf.txt' For Output As #1 For i = 1 To Len(Text1.Text) ...
【单选题】在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序: Private Sub Command1_Click() Dim x,y,z As Integer x=5 y=7 z=0 Text1.Text='' Call Fun1(x,y,z) Text1.Text=Str(z) End Sub Sub Fun1(ByVal a As Integer, ByV...