有如下语句:str1=InputBox(“输入 ”,” ”,”联系 ”)从键盘上输入字符串“学生”后,str1的值为()
A.“输入”
B.“ ”
C.“联系”
D.“学生”
- · 有3位网友选择 A,占比33.33%
- · 有3位网友选择 C,占比33.33%
- · 有2位网友选择 B,占比22.22%
- · 有1位网友选择 D,占比11.11%
A.“输入”
B.“ ”
C.“联系”
D.“学生”
A.将字符串str3 添加到 字符串str1结尾,再添加到字符串str2 结尾;
B.将字符串str2 添加到字符串 str3 结尾,再添加到字符串 str1结尾;
C.将字符串str1 添加到字符串 str2 结尾,再添加到字符串 str3结尾;
D.将字符串str3 添加到字符串 str2 结尾,再添加到字符串 str1结尾;
(33)假定有以下函数过程:
Function Fun(S As String)As String
Dim s1 As String
For i=1 To Len(S)
s1=LCase(Mid(S, i, 1))+s1
Next i
Fun=s1
End Function
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim Str1 As String, Str2 As String
Str1=InputBox("请输入一个字符串")
Str2=Fun(Str1)
Print Srt2
End Sub
程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定”按钮后在窗体
上的输出结果为()。
A)ABCDEFG
B)abcdefg
C)GFEDCBA
D)gfedcba
设有如下语句:str1=IntputBox("输入","","练习")从键盘上输入字符串“示例”后,str1的值是()。
A.输入
C.练习
D.示例
假定有以下函数过程: 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 Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim Str1 As String, Str2 As String Strl = InputBox(“请输入一个字符串”) Str2=Fun(Str1) Print Str2 End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定” 按钮后在窗体上的输出结果为,
A.abcdefg
B.ABCDEFG
C.gfedcba
D.GFEDCBA
执行如下语句: a = InputBox("Today", "Tomorrow", "Yesterday",,, "Day before yesterday", 5) 将显示一个输入对话框时,在对话框的输入区中显示的信息是 ______。
A.Today
B.Tomorrow
C.Yesterday
D.Day before yesterday
执行如下语句: a=InputBox("Today", "Tomorrow", "Yesterday", "Day before yesterday", 5) 将显示一个输入对话框,在对话框的输入区中显示的信息是______。
A.Today
B.Tomorrow
C.Yesterday
D.Day before yesterday
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday",,,"Day before yesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是
A.Today
B.Tomorrow
C.Yesterday
D.Day before yesterday
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!