Question

这是我的代码

Sub Main()

    process()

    Console.WriteLine("Ulangi Pencarian? (Y/N)?")
    strUlangi = Console.ReadLine()

    'conditions for searching
    If strUlangi.ToUpper = "Y" Then

        Console.WriteLine()
        process()
        Console.WriteLine()

    Else

        Console.WriteLine()
        Console.Write("Press any key to exit")
        Console.ReadKey()

    End If

  End Sub

 Sub process()

    Console.WriteLine("Masukan Kode Mahasiswa : ")
    decKodeMhs = Console.ReadLine()

    Console.WriteLine("Masukan Kode Matakuliah : ")
    decKodeMatkul = Console.ReadLine()
    Console.WriteLine()

    Console.WriteLine("Hasil Pencarian : ")
    Console.WriteLine("Nilai Mahasiswa A.N " & strNamaMhs(decKodeMhs) & " untuk Matakuliah " & StrNamaMatkul(decKodeMatkul) & " adalah " & intNilaiMhs(decKodeMhs, decKodeMatkul))
    Console.WriteLine()

 End Sub

我想如果我输入“ Y”，过程功能将再次运行。它的工作，但当我输入decKodeMatkul的变量时，该应用程序将退出。为什么？？请有人告诉我

Answer 1

我认为你应该把 Console.ReadKey() 在代码末尾。

Sub Main()

    process()
    Console.WriteLine("Ulangi Pencarian? (Y/N)?")
    strUlangi = Console.ReadLine()
    'conditions for searching
    If strUlangi.ToUpper = "Y" Then
        Console.WriteLine()
        process()
    Else
        Console.WriteLine()
        Console.Write("Press any key to exit")
    End If
    Console.ReadKey()
End Sub

Sub process()
    Console.WriteLine("Masukan Kode Mahasiswa : ")
    decKodeMhs = Console.ReadLine()

    Console.WriteLine("Masukan Kode Matakuliah : ")
    decKodeMatkul = Console.ReadLine()
    Console.WriteLine()

    Console.WriteLine("Hasil Pencarian : ")
    Console.WriteLine("Nilai Mahasiswa A.N " & strNamaMhs(decKodeMhs) & " untuk Matakuliah " & StrNamaMatkul(decKodeMatkul) & " adalah " & intNilaiMhs(decKodeMhs, decKodeMatkul))
    Console.WriteLine()

End Sub

您的process（）实际上可以工作，但是它执行的太快，然后关闭，因此您认为它刚刚关闭。

再次运行功能的条件

1 个答案: