tceic.com
学霸学习网 这下你爽了
赞助商链接
当前位置:首页 >> >>

安徽是个值得投资的地方——访部分参加外交部安...

在1979年至1980年冷战期间,苏军曾在阿富汗使用过它。


设有下列通用过程:
Public Function Fun(xStr As String)As String
Dim tStr As String,strL As Integer
tStr=" "
strL=Len(xStr)
i=strL/2
DO While i<=StrL
tStr=tStr&Mid(xStr,i+1,1)
i=i+1
Loop
Fun=tStr&tStr
End Function
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写下列的事件过程:
Private Sub Command1_Click()
Dim S1 As String
S1="ABCDEF"
Text1.Text=LCase(Fun(S1))
End Sub
程序运行后,单击命令按钮,文本框中显示的是( )

A.ABCDEF
B.abcdef
C.defdef
D.defabc


推荐相关:

...Public Function Fun(xStr As String)As String _答....doc

设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String, strL As Integer tStr = " " strL = Len (xStr)...


...Public Function Fun(xStr As String)As String _答....doc

设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr) i=1 Do While i<=str...


程序测试题.doc

Fun(x As Integer,y As Single )”定义过程 Fun...通用声明处和过程 Sub1中分别用 Public K As ...Function Fun(S As String) As String Dim S1 As...


设有以下函数过程 Private Function Fun(a()As Integer....doc

设有以下函数过程 Private Function Fun(a()As Integer,b As String)As Integer End Function 若已有变量声明: Dim x(5)As Integer,n As Integer,ch As ...


中国石油大学华东VB练习题VB格林课堂选择题.doc

假定有以下函数过程: Function Fun(S As String)As String Dim s1 As String...设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr...


假定有以下函数过程: Function Fun(S As String) As String Dim ....doc

假定有以下函数过程: Function Fun(S As String) As String Dim s1 As String For i=1 To Len(S) s1=UCase(Mid(S,i,1))+s1 Next i Fun=S1 End...


过程.doc

设有如下通用过程 Public Function fun(xstr As String) As String Dim tstr...假定有以下函数过程: Function Fun(S As String) As String Dim S1 As ...


2015年全国计算机等级《二级VB》命题预测试卷三-21843.pdf

34设有下列通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr) i=strL/2 DO While ...


过程未完成题.doc

End sub 说明:过程从作用域来看分为通用过程( 说明:过程从作用域来看分为通用...2.设有如下通用过程 . Public Function Fun(xStr As String) As String ‘...


过程.doc

“计算”的命令按钮 Command1,并编写了以下程序: Private Sub Command1_ClickO...设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr...


计算机二级vb真题2008-9.doc

设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String, strL As Integer tStr="" strL=Len(xStr) i=1 Do While i<=...


2013计算机二级VB真考 选择题 题库(5).doc

2013计算机二级VB真考 1.下列叙述中正确的是( 选择题 题库(5) B )。 A)...设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr...


2010年计算机等级二级VB笔试考前模拟试题(2)-中大网校.doc

(3)设有如下关系表 则下列操作正确的是( A. T=R/S B. T=R×S C. ...(20)设有如下通用过程: Public Function Fun(xStr As String)As StringDim ...


2VB0903(29).doc

作为过程的参数 C( 30 )设有如下通用过程: Public Function fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr...


全国计算机等级考试二级笔试样卷Visual Basic语言程序设计.doc

(27)设有如下通用过程: Public Function Fun(xStr As String) As String Dim tStr As String, strL As Integer tStr = "" strL = Len(xStr) i = 1...


公选课二级考试指导(文科)试卷.doc

A)25 B)26 C)27 D)28 21、设有如下通用过程: Public Function Fun(xStr As String) Dim tStr As String, srtL As Integer tStr =”” strL=Len(x...


全真笔试试卷(1).doc

设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr) i=1 Do While i<=...


2013计算机二级VB真考 选择题 题库(4).doc

2013计算机二级VB真考 选择题 题库(4) 1.下列数据结构中,属于非线性结构的是...设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr...


2009年3月计算机等级考试二级VB真题.doc

窗体可以作为过程的参数 [答案讨论] (30)设有如下通用过程: public Function Fun (xStr As String) As String Dim tstr As string,strL As Integer tStr=...


2006年9月全国计算机等级考试二级VB笔试试卷.doc

(27) 设有如下通用过程: Public Function fun(xStr As String) As String Dim tStr As String, strL As Integer tStr = " " strL = Len(xStr) i=1...

网站首页 | 网站地图
All rights reserved Powered by 学霸学习网 www.tceic.com
copyright ©right 2010-2021。
文档资料库内容来自网络,如有侵犯请联系客服。zhit325@126.com
宋祖英与王力宏洛杉矶合影曝光 闵孝琳 二人背后各有靠山 性感可爱艳惊四座 转战上海 五年一亮剑是否有惊喜 我只做了个牙 SJ成员崔始源变身花店主人 曾志伟生日搞斋宴筹款 邓建国因欠债机场被拘
林保怡被曝带男友见家长 吴亦凡为鹿晗送祝福(图) 倪妮为张艺谋倒水照曝光 自曝多次拒绝男友求婚 铭凯 与女子热聊(图) 郭富城分手疑因四角恋 关菊英陪同看医生(图) 票房新算法 90%的电影不赚钱 姜文出演“曹操 平时会养猪种菜 唐文龙做客