如果Else使用表中的列

时间:2013-02-16 17:20:50

标签: vb.net

我有一个名为studentlogs的表..它上面有列状态.. 当我完成在学生日志上插入记录时..我想使用if else语句.. status列只能有3个值,它们是1,2和3 ..

现在..我想在插入记录之后就好了...我会做...

if status="1" then
   CALL SENDSMS()
ENDif`
if status="2" then
   msgbox("")ENDif
if status="3" then
   msgbox("")

当我处理列时,我该怎么做?感谢..:)

1 个答案:

答案 0 :(得分:-1)

如果有多个潜在值,请尝试使用CASE语句,以防止必须使用大量ElseIf语句。要获取特定列中行的值,只需在行对象后面使用括号,并指定ColumnNameColumnIndex属性以获取值。

    'declare local variables
    Dim dr As DataRow

    'create table
    Dim studentLogs As New DataTable("StudentLogs")

    'add columns
    With studentLogs
        .Columns.Add("Status", GetType(Integer))
        .Columns.Add("OtherCol1", GetType(String))
    End With

    'add values
    With studentLogs
        dr = studentLogs.NewRow()
        dr("Status") = 1
        dr("OtherCol1") = "Joey"
        studentLogs.Rows.Add(dr)
    End With

    For Each row As DataRow In studentLogs.Rows
        Select Case row("Status")
            Case 1
                Call SENDSMS()
            Case 2
                MsgBox("2")
                Exit For
            Case 3
                MsgBox("3")
        End Select
    Next