株式会社テラソフトデザイン

Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
    Try
        AxWfrControl1.Close()
        AxWfrControl1.Open("d:\test\sample.wfr")
        AxWfrControl1.Import("#1", 103, "d:\test\sample.utf8.csv")

        AxWfrControl1.AddReport()
        AxWfrControl1.Open("d:\test\sample2.wfr")
        AxWfrControl1.Import("#1", 0, "d:\test\sample2.csv")

        AxWfrControl1.Create()
    Catch ex As Exception
        MessageBox.Show(AxWfrControl1.GetLastErrorMsg(), "ERROR")
    End Try
End Sub