Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/sql/81.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Mysql 如何将sql查询中选定列的结果存储在vb.net中的变量中_Mysql_Sql_Vb.net - Fatal编程技术网

Mysql 如何将sql查询中选定列的结果存储在vb.net中的变量中

Mysql 如何将sql查询中选定列的结果存储在vb.net中的变量中,mysql,sql,vb.net,Mysql,Sql,Vb.net,我想将emp_id、emp_fname、emp_lname、empmname、position、branch存储在变量中,并在标签中显示。我是vb.net新手,尝试了我搜索过的代码,但不起作用。请帮忙 Try cn.Open() Dim query As String Dim fname As String Dim reader As MySqlDataReader query = "Select emp_id,emp_fname,emp_lname,em

我想将emp_id、emp_fname、emp_lname、empmname、position、branch存储在变量中,并在标签中显示。我是vb.net新手,尝试了我搜索过的代码,但不起作用。请帮忙

Try
    cn.Open()
    Dim query As String
    Dim fname As String
    Dim reader As MySqlDataReader
    query = "Select emp_id,emp_fname,emp_lname,empmname,position,branch from dtrsystem.tblemployee where emp_id = '" & Class1.empid & "' "
    sql = New MySqlCommand(query, cn)
    reader = sql.ExecuteReader

    cn.Close()
Catch ex As Exception

End Try
            ''declare variables    v1,v2,v3
            Try
                            cn.Open()
                            Dim query As String
                            Dim fname As String
                            Dim reader As MySqlDataReader
                            query = "Select emp_id,emp_fname,emp_lname,empmname,position,branch from dtrsystem.tblemployee where emp_id = '" & Class1.empid & "' "
                            sql = New MySqlCommand(query, cn)
                            reader = sql.ExecuteReader
                while reader.read

                v1=reader(0) 'emp id
                v2=reader(1) 'emp fname
                v3=reader(2) '  emp lname
    ''etc

                End While
                            cn.Close()
                        Catch ex As Exception

                        End Try