小编Wan*_*abe的帖子

Do..While ...循环

我的学习书对下面的代码做了如下陈述:

** "计算机评估Do ...循环语句中的循环条件,以确定是否应该处理循环指令.在这种情况下,inputales <> String.Empty条件将输入销售变量的最大容量与String进行比较.Empty value.如你所知,String.Empty值表示零长度或空的字符串,如果inputsales变量为空,则循环条件的计算结果为True,计算机处理循环指令.*另一方面,如果是inputales变量不为空,循环条件计算为false,计算机跳过循环指令.

基于代码,我认为它是相反的:...虽然inputales值不为空,但它应该评估为true并处理循环,如果它是空的,它应该计算为false并跳过循环?请看下面.非常感谢你的帮助!

Option Explicit On
Option Strict On

Imports System.Globalization


Public Class SalesForm

    Private Sub exitButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles exitButton.Click
        Me.Close()
    End Sub

    Private Sub calcButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles calcButton.Click
        Const prompt As String = "Enter a sales amount. Click cancel to end."
        Const title As String = "Sales Entry"
        Dim inputsales As String
        Dim sales As Decimal
        Dim salesCounter As Integer …
Run Code Online (Sandbox Code Playgroud)

vb.net while-loop

8
推荐指数
1
解决办法
2135
查看次数

VB.net中的Fibonacci序列使用循环

请你帮我看一下前10个斐波那契数字.我的代码显示以下结果:1,2,3,5,8,13,21,34,55,我需要它还显示前两个Fibonacci数字(0和1).我该怎么办?

Public Class Form1
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim a As Integer = 0
    Dim b As Integer = 1
    Dim fib As Integer = 0

    Do
      fib = a + b
      a = b
      b = fib
      Label1.Text = Label1.Text + fib.ToString & ControlChars.NewLine
    Loop While fib < 55
  End Sub
End Class
Run Code Online (Sandbox Code Playgroud)

在专业编程中你需要使用Fibonacci序列吗?

vb.net fibonacci

6
推荐指数
1
解决办法
4万
查看次数

标签 统计

vb.net ×2

fibonacci ×1

while-loop ×1