Question

建立一个工程，在一个给定的字符串中查找某个指定字符第一次出现的位置。运行时，在文本

框中任意输入一个小写字母后，及显示“X first occurs in position X”。如在文本框中输入小写字母b，则将字母转换为大写字母并显示“B first occurs in position 11” .文本框内容始终处于选中状态。（图没有）

Answer 1

Private Sub Text1_Change()
Dim a As String
Dim b As String
a = Label1.Caption
b = UCase(Text1.Text)
pos = InStr(a, b)
Label4.Caption = b & " first occurs in position " & pos
End Sub

Answer 2

如果，你是在C#中编写，方法都是差不多的
#include<stdio.h>
#include<string.h>

void main()
{
char ch;
printf("输入一个字母：");
scanf("%c",&ch);
if(ch>=97 && ch<=122)
{
ch=ch-32; //通过ASCII转换大小写
}
printf("转换成大写：%c \n",ch);

char a[50];
int i;
for(i=0;i<strlen(a);i++)
{
if(a[i]==ch)
{
printf("%c first occurs in position %d ",ch,i+1);
break;
}
}

//这儿最好再加个判断
if(i>=strlen(a))
{
printf("在字符串中不存在该字符");
}
}

Answer 3

啥编程语言啊？