1个回答
展开全部
.版本 2
.子程序 _按钮1_被单击
.局部变量 局部_代码, 整数型
.局部变量 文本, 文本型
.局部变量 局部_数字, 文本型
.局部变量 局部_字符, 文本型
文本 = “8我的us”
局部_代码 = 取代码 (文本, 1)
.如果真 (局部_代码 ≥ 48 且 局部_代码 ≤ 57)
局部_数字 = 字符 (局部_代码)
信息框 (“第1位是数字 ” + 局部_数字, 0, )
.如果真结束
局部_代码 = 取代码 (文本, 2)
.如果真 (局部_代码 < 0)
信息框 (“第2位是中文”, 0, )
.如果真结束
局部_代码 = 取代码 (文本, 6)
.如果真 (局部_代码 ≥ 97 且 局部_代码 ≤ 122 或 局部_代码 ≥ 65 且 局部_代码 ≤ 90)
局部_字符 = 字符 (局部_代码)
信息框 (“第6位是英文 ” + 局部_字符, 0, )
.如果真结束
.子程序 _按钮1_被单击
.局部变量 局部_代码, 整数型
.局部变量 文本, 文本型
.局部变量 局部_数字, 文本型
.局部变量 局部_字符, 文本型
文本 = “8我的us”
局部_代码 = 取代码 (文本, 1)
.如果真 (局部_代码 ≥ 48 且 局部_代码 ≤ 57)
局部_数字 = 字符 (局部_代码)
信息框 (“第1位是数字 ” + 局部_数字, 0, )
.如果真结束
局部_代码 = 取代码 (文本, 2)
.如果真 (局部_代码 < 0)
信息框 (“第2位是中文”, 0, )
.如果真结束
局部_代码 = 取代码 (文本, 6)
.如果真 (局部_代码 ≥ 97 且 局部_代码 ≤ 122 或 局部_代码 ≥ 65 且 局部_代码 ≤ 90)
局部_字符 = 字符 (局部_代码)
信息框 (“第6位是英文 ” + 局部_字符, 0, )
.如果真结束
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询