下面程序的输出结果是 Private Sub Command1_Click() ch$="ABCDEF" proc ch Print ch End Sub Private Sub proc(ch As String) S="" For k=Len(ch) To 1 Step-1 s=s & Mid(ch,k,1) Next k ch=s End Sub

2022-06-06

答案：

FEDCBA

0
要求函数的功能是：从参数 str 字符串中删除所有参数 ch 所指定的字符，返回实际删除字符的个数，删除后的字符串仍在 str 中，为此某人编写了函数 DelChar 如下： Function DelChar(str As String, ch As String) As Integer Dim n%, st$, c$ st = "" n = 0 For k = 1 To Len(str) c = Mid(str, k, 1) If c = ch Then st = st & c Else n = n + 1 End If Next k str = st DelChar = n End Function 并用下面的 Command1_Click() 过程观察函数调用结果 Private Sub Command1_Click() ch$ = Text1.Text Print DelChar(ch, "x"), ch End Sub 发现结果有错误，程序代码需要修改，以下正确的修改方案是 ________ 。
1
中国大学MOOC: 若有如下程序，在文本框中输入“VisualBasic”，程序运行后Label1显示的是__________。 Dim s$,ch$,k%s=For k=1 TO Len(Text1.Text) ch = Mid(Text1.Text,k,1) s = ch+sNext kLabel1.Caption = s
2
下列程序: Option Base 1 Private Sub Form_Click() Dim a(5，5) For i ＝ 1 To 5 For j ＝ 1 To 5 k ＝ k ＋ 1 a (i，j)＝ k Next j Next i For i ＝ 1 To 5 s ＝ s ＋ a (i，i) Next i Print s End Sub 运行时的输出结果是( )。
3
下列哪项是抗原与抗体的结合部位？（） A: CH4 B: CH1 C: CH2 D: CH3 E: VH／VL
4
下列化合物不属于烃类的是（）。 A: CH3C≡CH B: CH3CH2CH3 C: CH2=CHCH3 D: CH3CH2CH2OH