？ LEN（"计算机")＜LEN（SUBSTR（"computer",1,6))______。

？ LEN("计算机")＜LEN(SUBSTR("computer",1,6))______。

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“？ LEN（"计算机")＜LEN（SUB…”相关的问题

第1题

？LEN（“计算机”)＜LEN（“COMPUTER”)=【】。

？LEN(“计算机”)＜LEN(“COMPUTER”)=【】。

点击查看答案

第2题

？LEN（"计算机")＜LEN（"COMPUTER")的显示结果是【】。

？LEN("计算机")＜LEN("COMPUTER")的显示结果是【】。

点击查看答案

第3题

LEFT（"ABCDEFG"，LEN（“计算机”))的计算结果是【】。

LEFT("ABCDEFG"，LEN(“计算机”))的计算结果是【】。

点击查看答案

第4题

设有如下记录类型： Type student Number As String*10 Name As String*8 End Type 窗体中有

若干控件，单击其中的一个按钮Command1时，执行如下事件过程，该过程的功能是把数据输出到指定的文件中。根据题意，请完善下列程序。 Private sub Command1_click() Dim stu As student Open "C:\file, dat" For Random As 1 Len=Len(【】) Title $="写记录到随机文件" Str1 $="请输入学生名" Str2 $="请输入学生名" For i=1 To 5 stu. Number=InputBox(Str1 $, Title $) stu. Name=InputBox$(Str2 $, Title $) 【】1, i, stu Next i Close【】 End Sub

点击查看答案

第5题

下面程序的功能是统计字符串中“广的个数，请填空。 Sub COU（) a$="Beijing University of

下面程序的功能是统计字符串中“广的个数，请填空。 Sub COU() a$="Beijing University of Technology" Dim n AS Integer n=Len(a$) For i=1 To n b$=【】 If【】Then x=x+1 Next i Print "x="；x End Sub

点击查看答案

第6题

有下列程序，程序运行后，单击“Command1”按钮，在列表框List1中显示的第一行和第二行的结果分别是【

】和【】，最后一行的结果是【】。 Type type_a chr1 As String*1 num1 As Integer End Type Private Sub Command1_Click() Dim testdata As type_a, n As Integer Dim f1 As Integer, c()As String*1 f1=FreeFile Open "d:\data. txt" For Random As f1 Len=Len(testdata) n=1 For I=97 To 102 ReDim Preserve c(n) c(n)=Chr(I) testdata. chr1=c(n) testdata. num1=I n=n+1 Put f1, , testdata Next I Seek f1, 1 For I=1 To UBound(c) Get f1, , testdata List1. AddItem testdata. chr1 & testdata num1 Next I List1. AddItem UBound(c) Close End Sub

点击查看答案

第7题

？ LEN（“计算机”)＜MN（"COMPUTER")=______。

？ LEN(“计算机”)＜MN("COMPUTER")=______。

点击查看答案

第8题

在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能

将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test .dat中。请在空格处填上适当的内容，将程序补充完整。 Private Sub Command1_Click() Open "c:\test.dat"For【】As 1 For i=1 to Len(Text1.text) print1，mid(Text1.Text，i，1) Next Close i End Sub

点击查看答案

第9题

下列程序实现的功能是：当在窗体上单击时，从键盘上读入5个学生的学号、姓名、英语成绩并存入到文件d

：\stu1.dat中，然后从文件中读出第3个人的学号、姓名和英语成绩并显示在窗体中。 Type student No As Long Name As String * 20 English As Integer End Type Private Sub form_ Click () Dim k As student, i As Integer 【】 Open "d:\stu1. dat" for Random As 10 Len = Reclen for i = 1 To 5 k. No= InputBox(“请输入学号”) k. Name = InputBox (“请输入姓名”) k. English= InputBox (“请输入英语成绩”) 【】 Next i 【】 Print k. No; k. Name; k. English Close 10 End Sub

点击查看答案

第10题

如图16－10所示．在列表框List1中已经有若干人的简单信息，运行时在Text1文本框（即“查找对象”右边的

如图16-10所示．在列表框List1中已经有若干人的简单信息，运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名，单击“查找”按钮，则在列表框中进行查找，若找到，则把该人的信息显示在Text2文本框中。若有多个匹配的列表项，则只显示第1个匹配项；若未找到，则在Text2中显示“查无此人”。请填空。 Private Sub Conmlandl_Click() Dim k As Integer, n As Integer, found As Boolean found=False n=Len(【】) k=0 While k＜List1. ListCount And Not found If Text1=Left $(List1. List(k), n)Then Text2=【】 found=True End If k=k+1 Wend If Not found Then Text2="查无此人" End If End Sub