Как сделать динамическое текстовое поле в Visual Basic 2008

Question

Я новичок в vb 2008, я пытаюсь подать заявку на расчет молярности (химия).

Ниже приведено уравнение (не для химии)

              M1V1=M2V2

, где M1 и M2 - молярность, а V1, V2 - объем (все переменные).

поэтому для моего приложения я создал четыре текстовых поля и кнопку. Теперь мое приложение может найти только одну переменную M2, если предоставлены другие три значения

например

              M2=(M1V1)/V2

Я хочу знать, как я могу сделать это приложение более динамичным

скажем я хочу найти

   M1,M2,V1 or V2 any of these,just providing the other three values

Я думаю, что это может быть сделано, если еще стат, но я не знаю, как это сделать

Заранее спасибо за помощь

Answer 1

Я бы обработал это таким образом.

Я бы назвал свои четыре текстовых поля:

txtM1
txtM2
txtV1
txtV2

затем

Создать:

 Private Sub textbox_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtM1.TextChanged, txtM2.TextChanged, txtV1.TextChanged, txtV2.TextChanged
               Select Case True
        Case txtM1.Text <> "" AndAlso _
             txtV1.Text <> "" AndAlso _
             txtV2.Text <> ""
            txtM2.Text = CInt((txtM1.Text * txtV1.Text) / txtV2.Text)
        Case txtM2.Text <> "" AndAlso _
             txtV1.Text <> "" AndAlso _
             txtV2.Text <> ""
            txtM1.Text = "Your formula for M1"
        Case txtM1.Text <> "" AndAlso _
             txtM2.Text <> "" AndAlso _
             txtV1.Text <> ""
            txtV2.Text = "Your formula for V2"
        Case txtM1.Text <> "" AndAlso _
             txtM2.Text <> "" AndAlso _
             txtV2.Text <> ""
            txtV1.Text = "Your formula for V1"
    End Select        End Sub