2013-10-10 69 views
0

我想輸入方法條件。 首先我有一個變量「A」我給出一個默認值0000,我在文本框中輸入的變量「B」和作爲計算公式的變量「N」,如果我在文本框中輸入的是數字,直接到「IF B = Length(1)」的狀態並讀取變量A「000」的值,然後遵循公式「N = A + B」。 。最後當我按下出現在這些計算結果的按鈕,如何構建程序?我擁有以下如何進行計算輸入?

Public Class uckondisi 

#Region "variabel" 
    Private _bilangan As Integer = "0000" 
    Private _inputan As Integer = 0 
#End Region 

#Region "property" 
    Public Property bilangan As Integer 
     Get 
      Return Me._bilangan 
     End Get 
     Set(value As Integer) 
      Me._bilangan = value 
     End Set 
    End Property 

    Public Property inputan As Integer 
     Get 
      Return Me._inputan 
     End Get 
     Set(value As Integer) 
      Me._inputan = value 
     End Set 
    End Property 
#End Region 



    Private Sub btnproses_Click(sender As System.Object, e As System.EventArgs) Handles btnproses.Click 

     If Me.txtinputan.Text = 1 Then 
      _bilangan = "000" 
      Me.txthasil.Text = inputan + bilangan 

     Else 
end sub 
end class 
+0

我不知道我是否理解你想要什麼,但你似乎混合了類型。 TextBox只能處理字符串(「this string」或「123」從它的角度來看是相同的)。如果您想引入數字(並將它們視爲數字,例如計算),則必須對給定類型(例如,整數)執行轉換:Dim number As Integer = Convert.ToInt32(textbox.Text) 。如果沒有「可轉換爲數字字符串」,轉換將失敗。您可以通過依賴給定數字類型的TryParse或通過IsNumeric – varocarbas

+0

來檢查它來避免這種情況...最後兩個問題:請記住,「000」與字符串對待時不同於「0」;但是一旦它被轉換成一個數字,所有的尾隨零並不重要。如果你想加入兩個字符串,你可以使用「&」或「+」;但爲了避免與加號混淆,最好使用「&」....你問題的清晰度,你寫的代碼,你問的問題等等不屬於這裏(CLOSED值得)。我已經回答你是因爲看到你所有的問題到目前爲止都是這樣:請適應SO的規則,否則你將無法獲得任何幫助。 – varocarbas

+0

提前抱歉,我只是想結合兩個變量的問題,當條件爲「0000」時,「000」他有另一個功能與輸入相結合, 在這個論壇我很新,而且我沒有了解它在這個論壇上的要求。對不起,如果我的帖子只是垃圾郵件 – Bud33

回答

0

所示的結構,我不知道,我明白你的問題,但有一個明顯的您的代碼中存在問題。

更新:

Private Sub btnproses_Click(sender As System.Object, e As System.EventArgs) Handles btnproses.Click 

     If Me.txtinputan.Text = "1" Then 
      _bilangan = 000 
      Me.txthasil.Text = inputan + bilangan 

     End If 
End Sub 

注意「

值(即數字)不需要 」1「,然而字符串做

一個文本框顯示文本(即一個String )這意味着它需要「1」

如果你想要它的值,你可以使用:

If Val(txtinputan.Text) = 1 Then 
    'Do something 
End If