a = InputBox("输入A字串")
b = InputBox("输入B字串")
k = 1
For i = 1 To Len(a)
If Mid(a, k, 1) > Mid(a, i, 1) Then k = i
Next i
a = Left(a, k) & b & Mid(a, k + 1)
Print a
Print b
End Sub本回答被提问者采纳
...的第一个最小元素后面插入字符串b。显示字符串a,字符串b
a = InputBox("输入A字串")b = InputBox("输入B字串")k = 1 For i = 1 To Len(a)If Mid(a, k, 1) > Mid(a, i, 1) Then k = i Next i a = Left(a, k) & b & Mid(a, k + 1)Print a Print b End Sub
...输入字符串a和字符串b,在a串中的第一个最小元素的后面插入字符串b...
if(T_mp3==25000)T_mp3=0;\/\/5s
从键盘输入字符串a和字符串b,并在a串中的最小元素(不含结束符)后面插入...
size,stdin);\/\/从键盘获取字符串s2int len_source=strlen(source);\/\/删除S2最后的回车if ( source[len_source-1] == '\\n'){source[len_source-1]='\\0';}insert(s1,source);puts(s1);
...一个字符串a,并在a串中的最大元素后面插入字符串b(“ab”) 求解...
include <string.h> define N 356 void main(){ char a[N]={’\\0’},b[N]={’\\0’},ch,max;int i,j,k,c;\/输入字符串\/ printf(“请输入字符串”);gets(a);\/输入ch的值\/ printf(“Input ch:”);scanf("%c",&ch);\/求出最大字符\/ i=1;max=a[0];while(a[i]!=’\\0’...
在VB中怎样区分和使用integer\\long\\single\\double\\string等?
非0的数据转换为true,0为fasle。六、字符串( String ，类型符$)字符串是一个字符序列，必须用双引号括起来 说明：双引号为分界符，输入和输出时并不显示。字符串中包含字符的个数称为字符串长度。长度为零的字符串称为空字符串，比如“”，引号里面没有任何内容 ...
本人用vb编程,输入一组数,求取其中的最大最小值,代码如下
因此你的数组元素中保存的实际上是字符串。也就有 "11" < "4" 了 解决方法：（1）指定数组的数据类型，将第二行修改为： Dim a() as integer 或(2) 进行类型转换，将第八行修改为：a(i) = val(InputBox("请输入第" & i & "个数字："))...
...一个字符串,并在该串中最大元素后面插入字符串“ab”
include <string> main(){ char str[80];char *p1,*p2,*max,*p_e;char temp;int n;puts("input a string:");gets(str);\/\/输入串 p1=str;max=p1;temp=*p1;\/\/将临时最大值放在temp p_e=str+strlen(str)-1;\/\/尾指针 n=strlen(str);while(*p1)\/\/找最大值，将max指针指向最大...
(vb程序设计)求代码:分类统计。文本框中输入一串字符,统计各字母出现的...
1 End Select Next For i = 97 To 122 If a(i) <> 0 Then List1.AddItem UCase(Chr(i)) & ":" & a(i)Next List1.AddItem "其它:" & a(123)End Sub 第二题可以用 select case x 也可以用 if ... then elseif ... then elseif ... then ...endif 很简单就不写了。
vb 编写一个程序,输入任意10个数字,从中找出最大和最小的数,并给出最...
For j = i + 1 To UBound(Vimt)ReDim SerAim(i)If Vimt(i) > Vimt(j) Then '这个语句是以小到大排序，数组的第一个就是最小数 If Vimt(i) < Vimt(j) Then '这个语句是以大到小排序，数组的第一个就是最大数 '注意上面的二个语句只能用一个！！Num = Vimt(i)Vimt(...
vb中如何找出数组中的最小值,并找出最小值的位置(第几个数字)_百度知 ...
x = 65536'定义变量x为一个比数组中最大值还要大的数 for i = 0 to 99'假设数组元素个数为100个 if x > a(i) then x= a(i)‘如果x大于数组中的元素，则让x等于数组中的这个元素，这样x最终就成了数组中最小的数 y = i'y获得x为最小值时，i的值，也就是x为数组中的第几个数字...
