题目内容（请给出正确答案）

[单选题]

在程序中,使用InputBox函数可以接受用户的输入,如果要把它的返回值转换为数值型的数据,应该使用的函数是（）

A.Val

B.Len

C.Str

D.Log

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“在程序中,使用InputBox函数可以接受用户的输入,如果要…”相关的问题

第1题

在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓

名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序()。 Private Type student StuName As String * 10 StuGrade As String * 10 StuAge As Integer End Type Private Sub Form_Click() Dim s As student Open "c:\student.txt" For Random As #1 Len = Len(s) For i = 1 To 1 s.StuName = InputBox("请输入姓名") s.StuGrade = InputBox("请输入年级号") s.StuAge = Val(InputBox("请输入年龄")) Next i Close #1 End Sub

A．Print #1,s

B．Print #1,i

C．Put #1,,s

D．Put #1,,i

点击查看答案

第2题

（33）假定有以下函数过程： Function Fun（S As String)As String Dim s1 As String For i=1 To L

（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

点击查看答案

第3题

在窗体上画一个命令按钮，命名为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，

在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1，在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则F1返回1，否则返回0。能够正确实现上述功能的代码是。A．Private Sub Command1_Click() x=InputBox("请输入整数") a=F1（Val（x）） Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End FunctionB．Private Sub Command1_Click() x=InputBox("请输入整数") a=F1（Val（x）） Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 0 Else F1= 1 End If End FunctionC．Private Sub Command1_Click() x=InputBox("请输入整数") F1（Val（x）） Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 1 Else F1= 0 End If End FunctionD．Private Sub Command1_Click() x=InputBox("请输入整数") F1（Val（x）） Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function

点击查看答案

第4题

假定有以下函数过程：Function Fun（S AsString)AsStringDim s1 As StringFor i=1 To Len（S)s1 = U

假定有以下函数过程： 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

点击查看答案

第5题

要求生产10个随机整致，存放在数组arr中。从键盘输入要删除的数组元素的下标，将该元素中的数据删除

，后面元素中的数据依次前移，并显示删除后剩余的数据。现有如下程序： Option Base 1 Privare Sub Command1 Click（） Dim arr(10)As Integer For i=1To 10循环1 Arr(i)，=Int(Rnd*100) Print arr(i)； Next i x=InputBox("输入1—10的一个整数：") For i=X+1 To 10循环2 arr(i-1)=arr(i) Next i For i=x-1 To 10 循环3 Print arr(i) Next i End Sub 程序运行后发现显示的结果不正确，应该进行的修改是（）。

A.产生随机数时不使用Int函数

B.循环2的初值应为i= x

C.数组定义改为Dim a(11)As Integer

D.循环3的循环终值应改为9

点击查看答案

第6题

下列叙述中，错误的是()。

A.在同一C程序文件中，不同函数中可以使用名字相同的变量

B.在main()函数体内定义的变量是全局变量

C.形参是局部变量，函数调用完成即失去意义

D.若同一文件中全局和局部变量同名，则全局变量在局部变量作用范围内不起作用

点击查看答案