• 2022-06-06 问题

    下面程序的输出结果是( )Private Sub proc(ch As String) s = "" For k = Len(ch) To 1 Step -1 s = s & Mid(ch, k, 1) Next k ch = sEnd SubPrivate Sub Command1_Click() ch$ = "ABCDEF" proc ch Print ch End Sub A: ABCDEF B: A C: FEDCBA D: F

    下面程序的输出结果是( )Private Sub proc(ch As String) s = "" For k = Len(ch) To 1 Step -1 s = s & Mid(ch, k, 1) Next k ch = sEnd SubPrivate Sub Command1_Click() ch$ = "ABCDEF" proc ch Print ch End Sub A: ABCDEF B: A C: FEDCBA D: F

  • 2022-06-06 问题

    下面程序的输出结果是 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

    下面程序的输出结果是 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 问题

    设有如下事件过程:Private Sub Command1_Click() ch = "ABCDEFG" n = Len(ch) k = 1 Do Print Mid(ch, k, 1); Mid(ch, n, 1); k = k + 1 n = n - 1 Loop Until k > nEnd Sub运行此过程所产生的输出是 A: AGBFCEDD B: AGBFCED C: GFEDCBA D: GAFBECD

    设有如下事件过程:Private Sub Command1_Click() ch = "ABCDEFG" n = Len(ch) k = 1 Do Print Mid(ch, k, 1); Mid(ch, n, 1); k = k + 1 n = n - 1 Loop Until k > nEnd Sub运行此过程所产生的输出是 A: AGBFCEDD B: AGBFCED C: GFEDCBA D: GAFBECD

  • 2022-06-06 问题

    下面程序运行时,若输入“Visual Basic Prograrmming”,则在窗体上输出的是( ) Private Sub Command1_Click() Dim count(25)As Integer,ch As String ch=Ucase(InputBox("请输入字母字符串")) For k=1 To Len(ch) n=Asc(Mid(ch,k,1))-Asc("A") If n>=0 Then count(n)一count(n)+1 End If Next k m=count(0) For k=1 To 25 If m<count(k) Then m=count(k) End If Next k Print m End Sub A: 0 B: 1 C: 2 D: 3

    下面程序运行时,若输入“Visual Basic Prograrmming”,则在窗体上输出的是( ) Private Sub Command1_Click() Dim count(25)As Integer,ch As String ch=Ucase(InputBox("请输入字母字符串")) For k=1 To Len(ch) n=Asc(Mid(ch,k,1))-Asc("A") If n>=0 Then count(n)一count(n)+1 End If Next k m=count(0) For k=1 To 25 If m<count(k) Then m=count(k) End If Next k Print m End Sub A: 0 B: 1 C: 2 D: 3

  • 2021-04-14 问题

    中国大学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

    中国大学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

  • 2021-04-14 问题

    有以下程序段 char ch; int k; ch=′a′; k=12; printf("%c,%d,",ch,ch,k); printf("k=%d ",k); 已知字符a的ASCII码值为97,则执行上述程序段后输出结果是

    有以下程序段 char ch; int k; ch=′a′; k=12; printf("%c,%d,",ch,ch,k); printf("k=%d ",k); 已知字符a的ASCII码值为97,则执行上述程序段后输出结果是

  • 2021-04-14 问题

    若ch为char型变量,k为int型变量(已知字符a的ASCII十进制代码为97), 则以下程序段的执行结果是(). ch='a'; k=12; printf('%x,%o,',ch,ch,k); printf('k=%%d ',k);

    若ch为char型变量,k为int型变量(已知字符a的ASCII十进制代码为97), 则以下程序段的执行结果是(). ch='a'; k=12; printf('%x,%o,',ch,ch,k); printf('k=%%d ',k);

  • 2021-04-14 问题

    有以下程序段,已知字符’a’的ASCll十进制代码为97,则执行下述程序段后输出结果是( )。 char ch; int k; ch=’a’; k=12; printf('%c,%d,',ch,ch); printf('k=%d',k);

    有以下程序段,已知字符’a’的ASCll十进制代码为97,则执行下述程序段后输出结果是( )。 char ch; int k; ch=’a’; k=12; printf('%c,%d,',ch,ch); printf('k=%d',k);

  • 2022-06-16 问题

    执行以下程序,输出结果是_____。#include<;stdio.h>;int main(){ char ch;int k;ch='a';k=65;printf("%d,%c,%d,%c",ch,ch,k,k);return 0;} A: a,a,65,65 B: 97,a,65,A C: 97,a,65,65 D: a,A,65,65

    执行以下程序,输出结果是_____。#include<;stdio.h>;int main(){ char ch;int k;ch='a';k=65;printf("%d,%c,%d,%c",ch,ch,k,k);return 0;} A: a,a,65,65 B: 97,a,65,A C: 97,a,65,65 D: a,A,65,65

  • 2022-06-09 问题

    中国大学MOOC: 有以下程序段 char ch; int k; ch=a; k=12; printf(

    中国大学MOOC: 有以下程序段 char ch; int k; ch=a; k=12; printf(

  • 1 2 3 4 5 6 7 8 9 10