Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.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
Vb.net 如何从单选按钮更新数据_Vb.net_Winforms - Fatal编程技术网

Vb.net 如何从单选按钮更新数据

Vb.net 如何从单选按钮更新数据,vb.net,winforms,Vb.net,Winforms,嗨,我需要一些关于如何从单选按钮检索数据的建议。我在检索id、课程和年份方面没有问题。我唯一的问题是单选按钮 下面是我检索id、课程和年份的示例代码。我需要一些关于radiobutton的帮助 Private Sub GetRecord() Dim r As DataRow = Access.DBDT.Rows(CurrentRecord) txtStudID.Text = r("ID").ToString cbxCourse.SelectedItem

嗨,我需要一些关于如何从单选按钮检索数据的建议。我在检索id、课程和年份方面没有问题。我唯一的问题是单选按钮

下面是我检索id、课程和年份的示例代码。我需要一些关于radiobutton的帮助

Private Sub GetRecord()


 Dim r As DataRow = Access.DBDT.Rows(CurrentRecord)


        txtStudID.Text = r("ID").ToString
        cbxCourse.SelectedItem = r("Course").ToString
        cbxYear.SelectedItem = r("Yr").ToString


End Sub
将数据插入数据库的代码:

Private Sub AddUser() 


        Dim TypeOfStudent As String

        If cbNew.Checked Then
            TypeOfStudent = cbNew.Text
        ElseIf cbOld.Checked Then
            TypeOfStudent = cbOld.Text
        Else
            TypeOfStudent = ""

        End If

        Access.AddParam("@ID", txtID.Text)
        Access.AddParam("@Course", cbxCourse.SelectedItem)
        Access.AddParam("@Yr", cbxYear.SelectedItem)
    Access.AddParam("@Type", TypeOfStudent)


Access.ExecQuery("INSERT INTO StudentInformation ( ID, Course, Yr,TypeOfStudent)
VALUES ( @ID, @Course,@Yr,@Type ) ; ")

 MsgBox("Student was added successfully.")
        Form1.RefreshGrid()
        Me.Close()

End Sub

我不完全理解您的问题,但如果您想将从dB检索到的数据绑定到单选按钮(如AddUser方法),您可以将数据设置为单选按钮:

Dim TypeOfStudent As String

TypeOfStudent = r("TypeOfStudent").ToString


    If TypeOfStudent == cbNew.Text Then
   cbNew.Checked =true

    ElseIf TypeOfStudent == cbOld.Text Then   
    cbOld.Checked =true
    End If

我很难理解这个问题。我在你的代码中没有看到单选按钮…?这和昨天有什么不同?这正是我的问题。我没有在私有子getrecord()中添加任何radiobutton的代码,因为我不知道如何做。我想您必须将问题改为:如何将数据绑定到radiobutton?