もり ひろゆきの日々是勉強

日々思ったことやIT関連のメモなどをのほほんと綴っていきたいと・・・。(^^;

ホーム 連絡をする 同期する ( RSS 2.0 ) Login
投稿数  1920  : 記事  12  : コメント  16429  : トラックバック  163

ニュース

Microsoft Innovation Center

MICでは各種無償セミナーを実施しています。
こちら
そして、スピーカーは僭越ながら私がお話させていただいております。
一生懸命努めさせていただきますので、よろしければご参加くださいm(__)m

平行運用はじめました。

  • 現在、こちらのほうで平行運用を行っております。

自己紹介

  • もり ひろゆき(森 博之)と申します。

    極東IT Engineersというコミュニティの代表です。

    本業は東京でソフトウェア開発のお仕事をしております。いわゆるDeveloperですね(^^;

    仕事ではVB,C#といろいろと渡り歩いてはおりますが、主に.NET系の業務アプリの開発が多いです。

    というか仕事となったら必死で何でも勉強しますが(^^;;;;

    最近ではMicrosoft Innovation Centerで講師もさせていただいておりますが、撃たれ弱いのでお手柔らかにお願いしますm(__)m

    まったく関係ありませんが、たこ焼き機も持っています。 関西人です。

    エントリの内容は私が個人的に収集した情報を元に書いていますが、あくまで個人的なメモ用途ですので内容の正確性を保証するものでありません。あらかじめご了承くださいm(__)m

Microsoft MVP

MCP


  • 70-316 Developing and Implementing Windows-based Applications with Microsoft Visual C# .NET and Microsoft Visual Studio .NET

    70-536 Microsoft .NET Framework 2.0 - Application Development Foundation


  • MCTS: :.NET Framework 2.0 Web アプリケーション
    70-528 Microsoft .NET Framework 2.0 - Web-based Client Development


  • MCTS: Microsoft SQL Server 2005
    70-431 Microsoft SQL Server 2005 - Implementation and Maintenance

Wankuma MVP


  • Wankuma MVP for OOO(= Original Object-Oriented)

iKnow!

etc.

  • 人気ブログランキング - もり ひろゆきの日々是勉強

    スカウター : もり ひろゆきの日々是勉強

    あわせて読みたい

書庫

日記カテゴリ

リンク

ここ最近は、リリースが終わって第1波の不具合対応をやっております。

で、今日見たソースなんですが、どうやらコードで新しい行にデータを追加しているらしいのですが・・・。

????????Dim ds As New DataSet
??????? Dim tbl As New DataTable("Foo")
??????? Dim col1 As New DataColumn("Item1", System.Type.GetType("System.String"))
??????? Dim col2 As New DataColumn("Item2", System.Type.GetType("System.Int32"))
??????? tbl.Columns.Add(col1)
??????? tbl.Columns.Add(col2)
??????? Dim row As DataRow = tbl.NewRow()
??????? tbl.Rows.Add(row)
??????? ds.Tables.Add(tbl)
??????? row.Item(0) = "ABC"
??????? row.Item(1) = 123

ってな感じのソースがありました。 もちろん、動作するのですが・・・・。

まぁ、理屈はわかるんですが、なんだか気持ち悪い気がするのは私だけなんでしょうか・・・。

投稿日時 : 2006年10月23日 23:39

コメント

# re: なんだかすっきりしない。 2006/10/24 9:46 かるあ
これだとどうだろう。
なんとなく、設定してからコレクションに入れたい気分。
設定、追加の部分は空白行を入れたい気分。

Dim ds As New DataSet
Dim tbl As New DataTable("Foo")

tbl.Columns.Add(New DataColumn("Item1", System.Type.GetType("System.String")))
tbl.Columns.Add(New DataColumn("Item2", System.Type.GetType("System.Int32")))

Dim row As DataRow = tbl.NewRow()
row.Item(0) = "ABC"
row.Item(1) = 123
tbl.Rows.Add(row)

ds.Tables.Add(tbl)


# re: なんだかすっきりしない。 2006/10/24 17:20 ひろえむ
#かるあさん

>>なんとなく、設定してからコレクションに入れたい気分。

そうなんですよねー。 そのほうが自然な気がして・・・。

>>設定、追加の部分は空白行を入れたい気分。

あ、それはサンプルを書いたときの私の入れ忘れ(^^;
失礼しました(^o^;



# re: なんだかすっきりしない。 2006/10/24 20:18 かるあ
1件だけなら

#If VBC_VER >= 8.0 Then
tbl.Rows.Add("1", "2")
#Else
tbl.Rows.Add(New Object() {"1", "2"})
#End If

でもいいですしね。


# re: なんだかすっきりしない。 2006/10/24 23:37 ひろえむ
#かるあさん

そっか・・・その手もあったかぁ・・・。

ただ、Objectで追加ってのも少々気になってしまいますが(^^;;;;;

Post Feedback

タイトル
名前
Url:
コメント