请教datarelation

Question

<%@ page language="vb"%>
<%@import namespace="system.data"%>
<script runat="server">sub page_load(ob as object,ev as eventargs)
dim ds as new dataset
dim dt as new datatable
dim dt1 as new datatable
dim keys（2） as datacolumn
dim keys1(2) as  datacolumn
dim myrow as datarow
dim myrow1 as datarow
dim dr as datarelation
dt.Columns.add("firstname",system.type.gettype("System.String"))  
dt.columns.add("lastname",system.type.gettype("System.String"))
dt.columns.add("userid",system.type.gettype("System.Int32"))
dt.columns("userid").autoincrement=true
keys(0)=dt.columns("userid")
dt.primarykey=keys  
myrow=dt.newrow()
myrow(0)="jone"
myrow(1)="s"
dt.rows.add(myrow)
ds.tables.add(dt)
dt1.columns.add("firstname",system.type.gettype("System.String"))
dt1.columns.add("bookid",system.type.gettype("System.Int32"))
dt1.columns.add("userid",system.type.gettype("System.Int32"))
myrow1=dt1.newrow()
myrow1(0)="jone"
myrow1(1)="12"
myrow1(2)="1"
dt1.rows.add(myrow1)
ds.tables.add(dt1)dr=new datarelation("dr1",dt.columns("userid"),dt1.columns("userid"))
ds.relations.add(dr)
end sub
</script>不加ds.relations.add(dr)，不会报错。加上就会报错：System.ArgumentException: This constraint cannot be enabled as not all values have corresponding parent values.