首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个文本框Text1和一个命令按钮Commandl,并有以下事件过程: Private Sub Commandl—Click() Dim s As String,eh As String s=“” For k=1
设窗体上有一个文本框Text1和一个命令按钮Commandl,并有以下事件过程: Private Sub Commandl—Click() Dim s As String,eh As String s=“” For k=1
admin
2020-02-27
47
问题
设窗体上有一个文本框Text1和一个命令按钮Commandl,并有以下事件过程:
Private Sub Commandl—Click()
Dim s As String,eh As String
s=“”
For k=1 To Lea(Textl)
ch=Mid(Text1,k,1)
s=ch+s
Next k
Text1.Text=s
End Sub
程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是( )。
选项
A、Basic
B、cisaB
C、BASIC
D、CISAB
答案
B
解析
Len函数返回字符串的长度,Mid函数为字符串中部截取函数格式为:Mid(字符串,起始位置,长度)。程序中,For循环的终值是Textl中输入的字符串的长度,即“Basic”的长度,为5。循环体中Mid函数从第一个字符开始依次取出一个字符,然后与上次取出的字符连接,本次取出的字符在前,上次取出的字符在后。最终变量s中应该是“cisaB”。
转载请注明原文地址:https://kaotiyun.com/show/IjTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下过程:PrivateSubproc(xAsInteger,OptionalyAsInteger)Printx,yEndSub针对此过程,下面正确的过程调用语句是()。
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是()。
程序运行时,拖动滚动条上的滚动框,则所触发的事件是()。
在窗体上画一个组合框,其名称为Combo1,然后编写如下事件过程:PrivateSubForm_Load()Combo1.Text="1"Fori=1To10Sum=Sum+iNextiCombo1.Text=SumEndSub程
(1)在名称为Form1的窗体上添加两个名称分别为Text1和Text2的文本框,它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性,满足如下要求:①Text2可以业示多行文本,并且有垂直和
PrintRight(”VBProgramming”,2)语句的输出结果是()。
数据库系统的三级模式不包括( )。
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。
在数据库系统的内部结构体系中,索引属于()。
为达到把a、b中的值交换后输出的目的,某人编程如下:PrivateSubCommand1_Click()a%=10:b%=20Callswap(a,b)Printa,bEndSubPr
随机试题
肛管排气时,其肛管插入肛门约
茵陈蒿汤主要用于
省、自治区、直辖市政府财政部门对于本行政区域的预算收支月报,按照财政部规定的内容编制,于每月终了后()日内报送财政部。
对初始状态为递增序列的表按递增顺序排序,最省时间的是((1))算法,最费时间的是((2))算法。(1)
设。已知线性方程组Ax=b存在两个不同的解。求λ,a。
在考生文件夹下,打开testdb数据库,完成如下操作:(1)为表sell建立一个主索引,索引名为PK,索引表达式为:部门号+年度十月份。(2)将自由表datatest、model、tabc和pass添加到当前打开的数据库中。
在下面的程序段中,有关paint()方法中正确的说法是()。publicvoidpaint(Graphicsg){g.drawString("Anyquestion",10,0);}
C语言源程序名的后缀是()。
•Readthearticlebelowabouthigh-contextandlow-contextculture•Inmostofthelines41-52thereisoneextraword.Itisei
Junkfoodiseverywhere.We’reeatingwaytoomuchofit.Mostofusknowwhatwe’redoingandyetwedoitanyway.Sohere’
最新回复
(
0
)