VB输入一行英文句子,找出其中最长的单词,输出该单词和长度

在窗口上放两个控件,一个text1,一个command1,并注意窗口不要太小、控件不要太靠窗口的顶部.程序如下：PrivateSubcommand1_click()DimLAsInteger,SAsS

如果要判断句子中的英文单词是否正确,那就很麻烦的.如果不要判断单词的正确性,仅仅假设句子中.单词以空格分隔,那么就比较容易实现了.思路:1．计算句子的长度,字符数L2．ZFS----存放英文单词所用到

PrivateSubCommand1_Click()Dimstra()AsString,changduAsIntegerstra=Split(Text1.Text,"")Fori=LBound(str

在main函数中调用测字符串长度函数,用while(i='.')就结束读字符然后输出就好啦!给你思想,程序还是自己写.再问：啊、是指针题啊，函数调用还没有学过。。。再答：main(){inti;cha

PrivateSubCommand1_Click()IfText1.Text=""ThenExitSubDimwordAsVariant,sAsStringDimkAsInteger,maxwAsSt

输入一段英文短文,将其中每个单词的首字母改为大写,若有两个或两个以上的PrivateSubForm_Click()DimaAsVariantDimstrTAsStringDimi

#include#includevoidmain(){charsen[256];intben=0,men=0,spa=0,num=0,oth=0;inti;gets(sen);for(i=0;i='A

#includemain(){intletter=0,number=0,blank=0,other=0;\\分别用来统计字母,数字,空格和其它字符的个数charc;\\用来读取字符while((c=g

#includevoidmain(){\x09intletter,space,number,other;\x09charch;\x09letter=space=number=other=0;\x09w

Dimb()AsStringb()=Split(a,"")然后判断每一个b数组每一个数据的len即可

请用以下代码要求一个list1用来排序单词请将sorted属性设置为true.PrivateSubCommand1_Click()DimanoFori=1ToLen(Text1.Text)IfMid(

PrivateSubCommand1_Click()DimiAsInteger,myWord()AsString,myOutputAsString,myTempAsString,myMaxAsInte

有个缺陷,如果是thisisatest,则把a也大写了,不知道这样是不是符合你的要求.（按你的题目讲是正确的）如果不符合,则稍加个判断即可.#include#includeintmain(){char

PrivateSubCommand1_Click()Dima,b,cAsIntegerDimmaxRandomizea=Int(900*Rnd+100)b=Int(900*Rnd+100)c=Int(

#includevoidmain(){charq[100];char*p;inta=0,b=0,c=0,d=0,e=0,f=0,i;p=q;for(i=0;i再问：请问这是什吗意思？for(i=0;i

'不用这么复杂,你的代码太长没有看,如果一定用你的代码,我再给你修改一下OptionExplicitPrivateSubCommand1_Click()DimiAsLong,arr,nAsLongIf

a=XXb=YYc=MMifa>bthenmax=aelsemax=bendififc>maxthenmax=cendif

vars:string;l,i:longint;beginreadln(s);{输入s字符串}l:=0;{l是A的个数,先清零}fori:=1tolength(s)do{length（s）是求s的长度

vars,z:string;i,j:longint;a:array[1..1000]ofinteger;beginreadln(s);readln(z);fillchar(a,sizeof(a),0)

privatesubCommand1_Click()n=0strold=""s=text1.textfori=1tolen(s)strnew=ucase(mid(s,i,1))if(strold"Z"