VB阅读程序写结果.docVIP

二、阅读程序写出运行结果 1．在程序运行时，将保存在C盘Pic文件夹中的名为Fishing.bmp的图片加载到图片框Picture1中的语句为 （1） 。 2．执行下面的Command1_Click事件过程后，Text1中显示内容是 （2） ，Text2中 显示内容是 （3） 。 Private Sub Command1_Click() Dim S As String, I As Integer Const Ch As String = 0123456789. S = 2L0A03U.1SI0V.11 For I = 1 To Len(S) If InStr(Ch, Mid(S, I, 1)) = 0 Then Text1 = Mid(S, I, 1) Text1 Else Text2 = Text2 Mid(S, I, 1) End If Next I End Sub 3．执行下面程序，单击Command1按钮后，窗体上第一行内容是 （4） ，第二行内容是 （5） ，最后一行内容是 （6） 。 Private Sub Command1_Click() Dim N