时间戳

首页 > 解决方案 > 无法编译此 Visual Basic 程序

vb.net - 无法编译此 Visual Basic 程序

问题描述

因此，我得到了一个示例 Visual Basic 代码，并要求运行代码中给出的函数。当我在它不运行的在线 VB 编译器上编译它时，它返回以下错误消息：

以下是我问这个问题的代码：

Function ???? (data As Integer(), val As Integer) As Boolean
    Dim i As Integer

    For i = 0 To data.Length - 1
        If data(i) = val Then
            Return True
        End If
    End For
    Return False
End Function

data:
|----|----|----|----|----|
|  2 |  6 | -3 |  3 |  7 |
|----|----|----|----|----|
val: 5

data:
|----|----|----|----|----|
| -1 |  8 |  2 | -4 |  9 |
|----|----|----|----|----|
val: 2

标签： vb.net

解决方案

Function ???? (data As Integer(), val As Integer) As Boolean

这是您对函数的声明。它目前被命名为????，它不能作为代码基础的名称。它接受两个参数，一个整数数组（数据）和一个要在数组中找到的整数（val），并返回一个布尔值（真/假值）。

Dim i As Integer

声明一个名为 i 的整数

For i = 0 To data.Length - 1  
    If data(i) = val Then
        Return True
    End If
End For
Return False

For 循环运行从 0 到数组数据长度的整数值（从函数导入）。如果在数组中找到该值，则返回True，如果未找到，则返回False

End Function

函数结束。这是它将返回到调用该函数的任何模块的地方。

data:
|----|----|----|----|----|
|  2 |  6 | -3 |  3 |  7 |
|----|----|----|----|----|
val: 5

对于此数据，函数应返回False，因为数据中没有出现 5。

data:
|----|----|----|----|----|
| -1 |  8 |  2 | -4 |  9 |
|----|----|----|----|----|
val: 2

对于这些数据，函数应该返回True，因为数字 2 出现在数组空间 2 中（请记住，数组从 0 开始）。

老实说，这是我希望在 Chegg 而不是 StackOverflow 上看到的问题。

推荐阅读