如何在组合框中调用已转换为double的选定项？ [英] How do I call selected item in combobox that has been converted into double ?

问题描述

我在从组合框中调用已转换为双数据类型的所选项目时遇到问题。



我尝试了什么：

I have problem in calling selected item from combobox that has been converted into double data type.

What I have tried:

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, OS1.SelectedIndexChanged, CSA1.SelectedIndexChanged, ICS1.SelectedIndexChanged, MC1.SelectedIndexChanged, PM1.SelectedIndexChanged, PF1.SelectedIndexChanged, PSPD1.SelectedIndexChanged
        If sender.Text = "A+" Then
            Text = "4.0"
        End If
        If sender.Text = "A" Then
            Text = "4.0"
        End If
        If sender.Text = "A-" Then
            Text = "3.67"
        End If
        If sender.Text = "B+" Then
            Text = "3.33"
        End If
        If sender.Text = "B" Then
            Text = "3.0"
        End If
        If sender.Text = "B-" Then
            Text = "2.67"
        End If
        If sender.Text = "C+" Then
            Text = "2.33"
        End If
        If sender.Text = "C-" Then
            Text = "2.0"
        End If
        If sender.Text = "D" Then
            Text = "1.67"
        End If
        If sender.Text = "D-" Then
            Text = "1.33"
        End If

        Dim total As Double
        total = ((CDbl(3.0 * OS1.SelectedItem) + CDbl(3.0 * CSA1.SelectedItem) + CDbl(2.0 * PM1.SelectedItem) + CDbl(3.0 * MC1.SelectedItem) + CDbl(3.0 * ICS1.SelectedItem) + CDbl(2.0 * PSPD1.SelectedItem) + CDbl(3.0 * PF1.SelectedItem)) / 19.0)
        TextBox1.Text = total
    End Sub
End Class

推荐答案

请考虑一下：

Consider this instead:

total = ((3.0 * CDbl(OS1.SelectedItem)) + ... etc 

假设所有.SelectedItems不为空。

Assuming ALL .SelectedItems are not null.

这篇关于如何在组合框中调用已转换为double的选定项？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！