摘要: [单项选择题] 运行下面的程序后，输出的结果为 Cls Dim t(5,5)as Integer For i=1 To 5:t(i,i)=1:Next For i=1 To 5 For[阅读全文:]
摘要: [填空题] 下列程序段的输出结果为______。 Dimy As Integer Private Sub Commandl_CUck() DimX As Integer x=2 TeKt1.Te[阅读全文:]
摘要: [单项选择题] 执行以下程序段： a $="abbaedduba" For i=6 To 2 Step-2 X=Mid(a, i, i) Y=Left(a, i)[阅读全文:]
摘要: [填空题] 下列程序段运行结果是______。 Dim c As Integer,num As Integer Num=29483 Do c=num Mod 10 Print c； num=nu[阅读全文:]
摘要: [单项选择题] 窗体上有一个按钮和一个列表框，执行下列程序后，输出的结果为 Private Sub Command1_Click()List1.AddItem "Visual"L[阅读全文:]
摘要: [填空题] 设有整型变量s，取值范围为0～100，表示学生的成绩。有如左边程序段：右边用Select Case结构改写上述程序，使两段程序所实现的功能完全相同。请填空。 左边：If s＞=90 Th[阅读全文:]
摘要: [填空题] 在窗体上画一个命令按钮Command1，然后编写如下程序： Private Sub Command1_Click() Dim arr() As Integer ReDim arr([阅读全文:]
摘要: [问答题] 注意：下面出现的“”均为c：wexam25160001。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个文本框，[阅读全文:]
摘要: [问答题] 注意：下面出现的“考生文件夹”均为c：wexam25160001。 (1)在窗体上建立一个名称为Text1的文本框，然后建立两个主菜单，标题分别为“销售业态”和“帮助”，名称分别为vbM[阅读全文:]
摘要: [单项选择题] 下面程序运行后，输出的结果是( )。 Dim arr(3,3) For i=1 To 3 For k=1 To 3Arr(j,k)=(j-1)*3+kNext kNext jF[阅读全文:]