2. 计算机

设有如下程序： Private Sub Form_Click() Dim m As Single, n As String Dim flag As Integer m = InputBox("请输入一个单精度数") n =

admin2015-06-30  37
问题 设有如下程序：
Private Sub Form_Click()
    Dim m As Single, n As String
    Dim flag As Integer
    m = InputBox("请输入一个单精度数")
    n = Str(m)
    flag = InStr(n, ".")
    If flag Then
        Print Mid(n, flag)
    End If
End Sub
以上程序的功能是
选项 A、将m转换成字符串输出
B、输出m的整数部分
C、输出m的小数部分
D、将m的小数点删除后转换成字符串输出
答案C
解析 InputBox是Visual Basic函数，功能是弹出一个对话框，在其中显示提示，等待用户输入文字并按下按钮，然后返回用户输入的文字，将返回用户输入的数字存储在m中，str（m）函数将数字m转换为字符串，并存储在n中。函数InStr（n，"."）返回字符"."在另一个字符串n中第一次出现的位置，若n中没有要搜索的字符"."，则返回结果为0。如果flag不为0，则执行Mid（n，flag）语句，输出n的"."以后的部分，即输出m的小数部分。
转载请注明原文地址:https://kaotiyun.com/show/40Qp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)