设a$=""VisualBasic""，则Print String（3，a$）是（）。A、VVVB、VisC、sicD、ll

题目

设a$=""VisualBasic""，则Print String（3，a$）是（）。

  • A、VVV
  • B、Vis
  • C、sic
  • D、ll
相似考题

1.设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是（ ）。A．Print A=x+yB．Print"A=";x+yC．Print "A="+Str（x+y）D．Print"A="&x+y

2.在C盘当前文件夹下有一个已建立好的顺序文件Alph.txt，文件内容为只含有字母的一个字符串(有双引号界定符)。单击窗体，打开Alph.txt文件，读取字符串并显示在文本框Text1中，然后调用StrSort过程将此字符串按ASCII码的顺序重新排列并显示在文本框Text2中，最后将重新排列的字符串存入AlpO.txt文件中(无双引号界定符)。请选择横线处合适的语句( )。Private Sub Form_Load()Dim StrIn As String,StrOut As StringsOpen"C:\Alph.txt"For Input As #1______CloseText1.Text=StrIn______Text2.Text=StrOutOpen"C:\AlpO.txt"For Output As#2______CloseEnd SubPrivate Function StrSort(s As String)As StringDim s Arr() As String *1,i As Integer,j As Integer,n As IntegerDim t As String *1n=Len(s)ReDim sArr(n)For i=1 To ns Arr(i)=Mid(s,i,1)Next iFor i=1 To n-1For j=i+1 To nIf sArr(i)＞sArr(j) Thent=sArr(i):sArr(j):sArr(j):sArr(j)=tEnd IfNext j,iFor i=1 To nStrSort=StrSort & s Arr(i)Next iEnd FunctionA．Input#1,StrIn StrIn Print#2,StrOutB．Input#1,StrIn StrSort(StrIn) Input#2,StrOutC．Input#2,StrIn StrSort(StrIn) Input#1,StrOutD．Print#1,StrIn StrSort(StrIn) Input#2,StrOut

3.设x=4,y=6，则以下不能在窗体上显示出“a=10”的语句是______。A．Prim A=x＋yB．Print "A="；x＋yC．Print "A=" ＋str(x＋y)D．Print "A="&X＋y

4.（ 18 ）设 x=4 ， y=6 ，则下列不能在窗体上显示出 “ A=10 ” 的语句是（ ）。A ） Print A=x+yB ） Print"A=";x+yC ） Print"A="+Str(x+y)D ） Print"A="&x+y

更多“设a$=""VisualBasic""，则Print Strin”相关问题

  • 第1题：

    （35）在C盘当前文件夹下有一个已经建立好的顺序文件Alph.txt,文件内容为只含有字母的一个字符去、串（有双引号界定符）。单击窗体，打开Alph.txt文件，读取字符串显示在文本框Text1中，最后将重新排列的字符串存入AipO.txt文件中（无双引号界定符）。请选择横线处合适的语句 Private Sub Fom_Load() Dim StrIn As String,StrOut As String Open"C/:Alph.txt"For Input As#1 ______ Close Text1.Text=StrIn ______ Text2.Text=StrOut Open"C/:AlpO.txt"For Output As#2 ______ Close End Sub Private Function StrSort(s As String)As String Dim sArr()As String*1,i As Integer,j As Integer,n As Integer Dim t As String*1 n=Lem(s) Redim sArr(n) For i=1 To n sArr(i)=Mid(s,i,1) Next i For i=1 To n-1 For j=i+1 To n If sArr(i)>sArr(j)Then t=sArr(i):sArr(i)=sArr(j):sArr(j)=t End If Next j,i For i=1 To n StrSort=StrSort&sArr(i) Next i End FunctionA.Input#1,StrIn StrIn Print#2,StrOut B.Input#1,StrIn StrOut(StrIn) Print#2,StrOutC.Input#2,StrIn StrOut(StrIn) Print#1,StrOutD.Input#1,StrIn StrOut(StrIn) Input#2,StrOut


    正确答案：B
    【解析】本题操作较复杂，请仔细分析题中要求。第1个横线处是读出文件1中的字符放在变量StrIn中，第2个横线处是调用StrSort函数，转换StrIn中的字符串，并将返回结果赋值给StrOut变量，第3个横线处将StrOut变量中的内容写入2号文件。

  • 第2题：

    （8）设当前日期为2007年12月27日，星期四，则执行下列语句后的输出结果是。 Print Day(Now) Print Month(Now) Print Year(Now) Print Weekday(Now)


    正确答案：271220075（表示换行）
    【解析】本题考查了日期函数的应用。其中Day(Now)函数表示返回当前号数（即当前天是几号）；Month(Now)函数表示返回当前月份（即当前是几月）；Year(Now)函数表示返回当前年份（即当前是哪年）；Weekday(Now)函数表示返回当前星期号（即当前是星期几）。注意：星期号是用0-6来表示，0代表周六，1代表周日，2代表周一，3代表周二，4代表周三，5代表周四，6代表周五。

  • 第3题：

    下列可以作为VisualBasic的变量名的是:()

    A.FileName

    B.a(A+b)

    C.23D

    D.print


    参考答案：A

  • 第4题：

    如果A为整数且，|A|＞=10，则打印“OK”，否则打印“Error”，表示这个条件的单行格式If语句是( )。

    A．If Int(A)=A And Sqr(A)＞=10 Then Print"OK"Else Print "Error"

    B．If Fix(A)=a And Abs(A)＞=-10 Then Print"OK"Else Print "Error"

    C．If Int(A)=A And(A＞=10,A＜-10) Then Print"OK"Else Print "Error"

    D．If Fix(A)=A And A＞=10,And A＜=-10 Then Print"OK" Else Print "Error"


    正确答案：B
    解析：解答本题考生需了解题中用到的3个函数的作用，Int和Fix都会删除参数的小数部分而返回剩下的整数。Abs函数返回参数的绝对值，其类型和参数相同。而Int和Fix的不同之处在于，如果参数为负数，则Int返回小于或等于参数的第一个负整数，而Fix则会返回大于或等于参数的第一个负整数。

  • 第5题：

    设t=2，b=3，c=4，d=5，则下面语句输出的是（ ）。 Print3>2*b Or a=c And b<>c Or c>d

    A.False

    B.1

    C.True

    D.-1


    正确答案：A
    A。【解析】采用了部分确认结果法，即先计算And操作符的前部分。3>2*b为False，a=c为False，所以And的前部分是False，因此整个表达式的结果也是False。

  • 第6题：

    在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： PrivateSubCommandl_CnCk() aS="VisualBasic"， Print String(3,a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是( )。

    A．VVV

    B．Vis

    C．sic

    D．11


    正确答案：A

  • 第7题：

    （19）设a=z, b=3，c=4, d=5，则下面语句的输出是

    Print 3>2*b Or a=c And b<>c Or c>d

    A）False

    B）1

    C）True

    D）-1


    正确答案：A

  • 第8题：

    设str=’python’，想把字符串的第一个字母大写，其他字母还是小写，正确的选项是（）。

    • A、print（str[0].upper（）+str[1：]）
    • B、print（str[1].upper（）+str[-1：1]）
    • C、print（str[0].upper（）+str[1：-1]）
    • D、print（str[1].upper（）+str[2：]）

    正确答案:A

  • 第9题：

    在InstAllShielD-〉Express中，有专门针对VB开发的（）。

    • A、VisuAlBAsiC6.0Help
    • B、VisuAlBAsiC6.0BuilDer
    • C、VisuAlBAsiC6.0WizArD
    • D、VisuAlBAsiC6.0Express

    正确答案:C

  • 第10题：

    设a$=""Microsoft VisualBasic"" b$=Right（a$，5） c$=Mid（a$，1，9） MsgBox a$，34，b$，c$，5 则在弹出的信息框的标题栏中显示的信息是（）。

    • A、Microsoft
    • B、Visual
    • C、MicrosoftBasic
    • D、5

    正确答案:C

  • 第11题：

    判断题
    在visualbasic中，输入PRINT语句时，不论输入“PRINT”还是“print”，visualbasic都会转换为Print。
    A

    对

    B

    错


    正确答案： 对
    解析： 暂无解析

  • 第12题：

    单选题
    在窗体Form1的Click事件过程中有以下语句：Label1.Caption=”VisualBASIC”设标签的原Caption属性值为默认值，则该语句执行之后该标签控件Name属性和Caption属性的值分别为（）
    A

    “Label1”、“VisualBASIC”

    B

    “Label1”、“Caption”

    C

    “Label”、“VisualBASIC”

    D

    “Label”、“Label1”


    正确答案： B
    解析： 暂无解析

  • 第13题：

    （19）如果A为整数且|A|>=10,则打印“OK”，否则打印“Error”,表示这个条件的单行格式If语句是 A.If Int(A)=A And Sqr(A)>=10 Then Print“OK”Else Print “Error” B.If Fix(a)=A And Abs(a)>=10 Then Print“OK”Else Print “Error” C.If Int(A)=A And (A>=10 ,A=-10) Then Print“OK”Else Print “Error” D.If Fix(A)=A And A>=10, Abs A<=-10 Then Print“OK”Else Print “Error


    正确答案：B
    【解析】解答本题考生需了解题中用到的3个函数的作用，Int和Fix都会删除参数的小数部分而返回剩下的整数。Abs函数返回参数的绝对值，其类型和参数相同。而Int和Fix的不同之处在于，如果参数为负数，则Int返回小于或等于参数的第一个负整数，而Fix则会返回大于或等于参数的第一个负整数。

  • 第14题：

    设当前日期为2008年4月28日，星期一，则执行下面语句后的输出结果为______。

    Print Day(Now)

    Print Month(Now)

    Print Year(Now)

    Print Weekday(Now)


    正确答案：28CR＞4CR＞2008CR＞2CR＞ (CR＞表示换行)
    28CR＞4CR＞2008CR＞2CR＞ (CR＞表示换行) 解析：本题考查了日期函数的应用。其中，Day(Now)函数，表示返回当前号数(即当前天是几号)；Month(Now)函数，表示返回当前月份(即当前是几月)；Year(Now)函数，表示返回当前年份(即当前是哪年)；Weekday(Now)函数，表示返回当前星期号(即当前是星期几)。注意，星期号是用0～6来表示，0代表周六，1代表周日，2代表周一，3代表周二， 4代表周三，5代表周四，6代表周五。

  • 第15题：

    Str1=“VisualBasic“:StrResult=Ucase(Strl)则StrResult的值是()。

    A、VisualBasic

    B、“visualbasic“

    C、“VISUALASIC“

    D、VISUALBASIC


    正确答案:C

  • 第16题：

    设a2，b=3，c=4，d=5，则下面语句的输出是

    Print 3>2*b Or a=c And b<>c Or c>d

    A．False

    B．1

    C．真

    D．一1


    正确答案：A
    解析：分别计算表达式3>2*b；a=c And b<>c；c>d的值，其值均为False，则输出为False。

  • 第17题：

    设a=”Visualbasic”，下面使b=”Basic”的语句是


    正确答案：C
    Left函数只有两个参数，所以排除A)和D)项。C)项能正确输出“Basic”，但B)项的输出是“asic”。

  • 第18题：

    下面哪个程序段能够正确裙带如果A＜B，则A=1，否则A=-1？

    A．If A＜B Then A=1 A=-1 Print A

    B．If A＜B Then A=l：Print A A=-1：PrintA

    C．If A＜B Then A=1：Print A Else A=-1： End If

    D．If A＜B Then A=1 A=-1 Print A Print A


    正确答案：C
    解析：本题考查的是IfThenElse结构，在此结构中可以有若干组语句块；题意是如果AB，则A=1，否则A=-1。

  • 第19题：

    使用SET DEVICE TO PRINT可以设将结果送至打印机输出。（）


    正确答案:正确

  • 第20题：

    在窗体Form1的Click事件过程中有以下语句：Label1.Caption=”VisualBASIC”设标签的原Caption属性值为默认值，则该语句执行之后该标签控件Name属性和Caption属性的值分别为（）

    • A、“Label1”、“VisualBASIC”
    • B、“Label1”、“Caption”
    • C、“Label”、“VisualBASIC”
    • D、“Label”、“Label1”

    正确答案:A

  • 第21题：

    在visualbasic中，输入PRINT语句时，不论输入“PRINT”还是“print”，visualbasic都会转换为Print。


    正确答案:正确

  • 第22题：

    单选题
    VisualBasic程序设计时常用的Print、Cls属于（）
    A

    方法

    B

    事件

    C

    打印字库

    D

    属性


    正确答案： D
    解析： 暂无解析

  • 第23题：

    单选题
    设a$=""Microsoft VisualBasic"" b$=Right（a$，5） c$=Mid（a$，1，9） MsgBox a$，34，b$，c$，5 则在弹出的信息框的标题栏中显示的信息是（）。
    A

    Microsoft

    B

    Visual

    C

    MicrosoftBasic

    D

    5


    正确答案： C
    解析： 暂无解析

相关内容