0
Bu, VBScript'te basit bir kod parçasıdır, ancak beklenen çıktıyı göstermiyor. 1 değerini iki kez gösterir. Kalan üç olduğu için 3 göstermelidir. Doğru bir sonuç göstermek için yeni bir değişken tanımlamalı mıyım?Bölüm neden yanlış kalanı döndürüyor?
Dim a, b, c, d
a = 5
b = 2
c = division(a, b)
MsgBox "The division is zero" & " " & c
d = division(a, b)
MsgBox "The division is not zero" & " " & d
Function division(a,b)
Dim Varinfn
Varinfn = a Mod b
If Varinfn = 0 Then
division = Varinfn
Else
division = Varinfn
End If
End Function
İki Msgbox'ınız var. Bu kod neden metninizi üç kez görüntülemeli? –
@Gosha_Fighten: Hayır, sonucu üç kez göstermiyor. Doğru sonucu göstermem gerekiyor. Doğru cevabı göstermek için iki kez mesaj kutusu kullandım. Belki de yanlış olanı görmezden gelecek şekilde yapmalıyım. –