VBA Debug.Assertã®ä½¿ã„æ–¹ - t-hom’s diary以下ã®ãƒ—ãƒã‚°ãƒ©ãƒ を実行ã™ã‚‹ã¨ã€ãƒ©ãƒ³ãƒ€ãƒ ãªæ•°å€¤ãŒå‡ºåŠ›ã•ã‚Œã‚‹ã€‚ Sub BugSample() Dim Arr(1 To 10) As Long Dim UpperBound As Long: Upper = 1000 Dim LowerBound As Long: Lower = 10 Dim i As Integer For i = 1 To 10 Arr(i) = Int((UpperBound - LowerBound + 1) * Rnd + LowerBound) Next Dim j As Integer For j = 1 To 10 Debug.Print Arr(j) Next End Sub …嘘ã§ã‚る。 ã‚ã–ã¨ã‚‰ã—ã„ãƒã‚°ãªã®ã§ä¸€è¦‹ã—ã¦ã™ãã«æ°—付ã„ãŸäººã‚‚ã„ã‚‹ã‹ã‚‚ã—ã‚Œãªã„ãŒã€ã“れを実行ã—ã¦ã‚‚イミディエイトウインドウã«ã¯0ãŒ10個並ã¶ã ã‘ã§ã‚る。 ãƒã‚°ã¯å¤‰æ•°åã§ã‚る。Uppe
ãƒã‚°ã‚’ã©ã®ã‚ˆã†ã«è¦‹ã¤ã‘ã‚‹ã‹
gdbã§åŠ¹çŽ‡çš„ã«ãƒ‡ãƒãƒƒã‚°ã™ã‚‹ãŸã‚ã®Tips
{{#tags}}- {{label}}
{{/tags}}