首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,名称为Textl,然后编写如下程序: Private Sub Form_Load() Textl.Text=””:Textl.SetFocus End Sub Private Sub For
在窗体上画一个文本框,名称为Textl,然后编写如下程序: Private Sub Form_Load() Textl.Text=””:Textl.SetFocus End Sub Private Sub For
admin
2020-04-18
25
问题
在窗体上画一个文本框,名称为Textl,然后编写如下程序:
Private Sub Form_Load()
Textl.Text=””:Textl.SetFocus
End Sub
Private Sub Form_Click()
Dim a As String,s As String
a=Textl.Text:s=""
For k=1 To Len(A)
s=UCase(Mid(a,k,1))+s
Next k
Textl.Text=S
End Sub
程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容
选项
A、与原字符串相同
B、与原字符串中字符顺序相同,但所有字母均转换为大写
C、为原字符串的逆序字符串,且所有字母转换为大写
D、为原字符串的逆序字符串
答案
C
解析
Mid(字符串,起始位置[,个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串,UCase()函数用于将字符串中小写字母转化为大写字母,原本大写或非字母字符保持不变。本题中在循环内每次取出第k位个字符并且连接到结果字符串的前面,所以结果字符串是源字符串的逆序字符串。
转载请注明原文地址:https://jikaoti.com/ti/rYx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:PrivateSubForm_Click()DimiAsInteger,nAsIntegerFori=1To20i=i+4:n=n+iIfi>10ThenExitForNextPrintn
设a=10,b=5,c=1,执行语句Printa>b>c窗体上显示的是
若要清除列表框控件中的所有列表项,应该使用的方法是
若要把窗体上命令按钮Commandl的状态设置为不可用,应该执行的命令是
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下:PrivateSubCommand1_Click()PrivateFunctionp(xAsInteger)AsBoolean
以下关于事件、事件驱动的叙述中,错误的是
设a=2,b=3,c=4,d=5,下列表达式的值是a>bAndc
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommand1_Click()Dims1AsString,s2AsStringOpen"c:\d4.
表达式2*3^2+4*2/2+3^2的值是
随机试题
骨盆由_________、_________、_________以及_________构成。
子宫颈的上段称______,下段称______,
疏通下水道、清理排水沟勤洗澡、洗头、更换衣服
右向左分流型(青紫型)先天性心脏病,最明显的外观特征是
牙石形成的时间为
下列关于招标方式的说明,不正确的是()。
基金托管人的职责不包括()。
D/A转换器是()。
A、 B、 C、 D、 B
下列关于诉讼时效的说法正确的是
最新回复
(
0
)