搜题
网友您好,请在下方输入框内输入要搜索的题目:
搜题
题目内容 (请给出正确答案)
提问人:网友jerrylg 发布时间:2022-01-07
[主观题]

将text1文本框输入的字母反序显示在text2,运行效果如下图所示。

将Text1文本框输入的字母反序显示在Text2,运行效果如下图所示。将text1文本框输入的字母反序显示在text2,运行效果如下图所示。将Text1文本框输入的字母反保存工程和窗体,窗体文件名为:昵称-5-3.frm;工程名为:昵称-5-3.vbp。将工程文件和窗体文件压缩成:昵称-5-3.rar,以附件形式提交。 提示: ①要考虑字母包括大写和小写。 ②首先利用Len函数求Text1.Text字符串长度,然后利用For循环结构和Mid函数逐一取字符进行判断是否为字母,若是字母则利用语句:Text2.Text =字母 & Text2.Text,将字母连接到Text2文本框前面,实现反序。

简答题官方参考答案 (由简答题聘请的专业题库老师提供的解答)
  抱歉!暂无答案,正在努力更新中……
更多“将text1文本框输入的字母反序显示在text2,运行效果如下图所示。”相关的问题
第1题

在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text 1和 Text 2 Text 2。编写如下两个事件过程: Dim str As String, strl As String Private Sub form_load() TextText = " " TextText = " " TextEnabled = False TextEnabled = False End Sub Private Sub Form. KeyPress(KeyAscii As Integer) str= str&Chr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) str1 = strl&Chr(KeyCode) End Sub Private Sub Command1_Click() TextText =str TextText = str1 str= " " str1= " " End Sub 当在设计阶段把窗体KeyPreview属性设置为True时,程序运行过程中,在键盘上输入小写字母abc,然后单击命令按钮,则文本框Text1中显示的内容为 ______ 。

A.abc

B.不显示任何信息

C.ABC

D.出错

点击查看答案
第2题
在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:

Dim Str1 As String,str2 As String

Private Sub form_load()

Text1.Text=""

Text2.Text=""

Text1.Enabled=False

Text2.Enabled=False

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

str1=str1 & Chr(KeyAscii)

End Sub

Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)

str2=str2 & Chr(KeyCode)

End Sub

Private SubCommand1_Click()

Text1.Text=str1

Text2.Text=str2

str1=""

str2=""

End Sub

当在设计阶段的窗体的KeyPreview属性设置为True时,程序运行过程中,在键盘上输入小写字母abc,然后单击命令按钮,则文本框Text1中显示的内容为

A.abc

B.不显示任何信息

C.ABC

D.出错

点击查看答案
第3题
求s=1+(1+2)+(1+2+3)+(1+2+3+4)+…+(1+2+3+4+…+n),运行效果如下图所示。 要求如下: (1)用For循环求前30项和。 (2)用Do···Loop Until 求多项式和,直到和大于5000为止。 保存工程和窗体,窗体文件名为:昵称-5-2.frm;工程名为:昵称-5-2.vbp。将工程文件和窗体文件压缩成:昵称-5-2.rar,以附件形式提交。
点击查看答案
第4题
下列循环嵌套的结构中,正确的是_______。

A、For i = 2,4,6,8,10 ``` Do ``` Loop While s > 0 Next

B、For i = 2 To 10 ``` Do While s > 0 ``` Loop Next

C、For i = 2 To 10 ``` Do While s > 0 ``` Next Loop

D、For i = 2 To 10 ``` Do ``` Next Loop While s > 0

点击查看答案
第5题
水平滚动条的__________属性表示滑块当前位置的值。

A、Caption

B、Value

C、Text

D、Name

点击查看答案
第6题
滚动条(ScrollBar)的Scroll事件是在拖动滑块的时候触发的。
点击查看答案
第7题
下列关于定时器(Timer)的Interval属性,正确的说法是___________。

A、Interval属性表示定时器是否产生Timer事件。

B、Interval属性表示定时器是否在界面上显示。

C、Interval属性表示定时器上所显示的文字。

D、Interval属性表示定时器触发Timer事件的时间间隔。

点击查看答案
第8题
关于枚举法的说法中,正确的是_______。

A、枚举法得到的结果不一定全面,有可能遗漏答案。

B、枚举法的算法效率是最高的。

C、枚举法一般采用多重循环实现。

D、枚举法的算法效率和数据量有关,数据量越大,效率越高。

点击查看答案
第9题
如下程序的功能是删除文本框Text1中的数字字符。请在_________处填入适当的内容,完善程序。 Private Sub Command1_Click() Dim i%, s$, c$ s = "" For i = 1 To Len(Text1.Text) c = Mid(Text1.Text, i, 1) If _________ Then s = s + c End If Next Text1.Text = s End Sub

A、c >= "0" And c <=> B、c >= 0 And c <=> C、c < "0" Or c > "9"

D、c <= 0 or c>= 9

点击查看答案
第10题
有如下程序,用来求4个整数(从键盘输入)中的最小值。若程序运行后,依次输入56,88,23,14,则在Label1显示的是__________。 Private Sub Command1_Click() Dim min%, k%, a% For k = 1 To 4 a = Val(InputBox("输入一个整数")) If a < min Then min = a End If Next Label1.Caption = min End Sub

A、14

B、23

C、56

D、88

E、0

点击查看答案
重要提示: 请勿将账号共享给其他人使用,违者账号将被封禁!
查看《购买须知》>>>
重置密码
账号:
旧密码:
新密码:
确认密码:
确认修改
购买搜题卡查看答案
购买前请仔细阅读《购买须知》
请选择支付方式
微信支付
支付宝支付
点击支付即表示你同意并接受《服务协议》《购买须知》
立即支付
搜题卡使用说明

1. 搜题次数扣减规则:

功能 扣减规则
基础费
(查看答案)
加收费
(AI功能)
文字搜题、查看答案 1/每题 0/每次
语音搜题、查看答案 1/每题 2/每次
单题拍照识别、查看答案 1/每题 2/每次
整页拍照识别、查看答案 1/每题 5/每次

备注:网站、APP、小程序均支持文字搜题、查看答案;语音搜题、单题拍照识别、整页拍照识别仅APP、小程序支持。

2. 使用语音搜索、拍照搜索等AI功能需安装APP(或打开微信小程序)。

3. 搜题卡过期将作废,不支持退款,请在有效期内使用完毕。

请使用微信扫码支付(元)

订单号:

遇到问题请联系在线客服

请不要关闭本页面,支付完成后请点击【支付完成】按钮
遇到问题请联系在线客服
恭喜您,购买搜题卡成功 系统为您生成的账号密码如下:
重要提示:请勿将账号共享给其他人使用,违者账号将被封禁。
发送账号到微信 保存账号查看答案
怕账号密码记不住?建议关注微信公众号绑定微信,开通微信扫码登录功能
警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

- 微信扫码关注简答题 -
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反简答题购买须知被冻结。您可在“简答题”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
- 微信扫码关注简答题 -
请用微信扫码测试
欢迎分享答案

为鼓励登录用户提交答案,简答题每个月将会抽取一批参与作答的用户给予奖励,具体奖励活动请关注官方微信公众号:简答题

简答题官方微信公众号

简答题
下载APP
关注公众号
TOP