VB2005を使用しています。データービューのフィルター機能を使用してレコードを抽出したいのですが、以下のようなコードを書いた場合、出版社コードで検索すると
----
System.Int32 および System.String で 'Like' 操作を実行できません。
----
といったエラーが表示されます。
出版社コードが整数型を使用している場合にはLikeを使用して絞り込みをする場合には、どのような書き方をしたらいいのでしょうか?
'Viewを取得
Dim dv As New DataView
dv.Table = dSetHanbai.出版社名一覧
'検索キーの設定
Dim key As String
key = Me.txt検索キー.Text
If key = "" Then
MessageBox.Show("検索キーが入力されていません", "エラー")
Exit Sub
Else
'フィルタの設定
If RadioButton1.Checked = True Then
dv.RowFilter = "出版社コード LIKE '%" & key & "%'"
ElseIf RadioButton2.Checked = True Then
dv.RowFilter = "出版社名 LIKE '%" & key & "%'"
End If
End If
dgv出版社名一覧.DataSource = dv
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
整数値に対して Like演算子は使えませんね m(__)m
DataSetを作り変えて 出版社コードに対するString型フィールドを作成したほうが早いのかも ・・・
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) InputBoxでキャンセルボタンを押したらファイル自体を閉じたい 3 2022/07/23 17:52
- Visual Basic(VBA) ワークシート内を検索 1 2022/12/19 23:46
- Visual Basic(VBA) Excelで下記のようにマクロを作ったところ、一回目は実行できたのですが、二回目以降「実行時エラー1 1 2022/03/25 08:08
- Visual Basic(VBA) Excel VBA キーワードから列を取得して、さらに空欄行を非表示にする 3 2022/10/21 22:49
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) エクセルで、1つのセルで上書き足し算して セルの範囲を指定できますか? パソコン初心者です。 お時間 3 2023/07/05 06:13
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
フィルターかけた後、重複を除...
-
1日に1人がこなせるプログラム...
-
1、Rstudioで回帰直線を求める...
-
access2003 クエリSQL文に...
-
【EXCEL】UserFormで入力して ...
-
pythonにてseleniumを使うも、...
-
Accessでの抽出で完全一致。
-
Exel VBA 別ブックから該当デ...
-
ASCIIコードを文字に変換したい
-
◾️Excel VBA 統合について Cons...
-
パイソンプログラム
-
JavaScriptの定数名が取り消し...
-
CheckBoxのコントロール配列に...
-
VBA ユーザーフォームの印刷に...
-
ActiveReportの改ページ不具合...
-
Gitのクローンについて
-
Outlook VBAについて
-
Nullの使い方が不正です。
-
JANコードとPOSコードは同じ?
-
VBA リストボックス(複数条件...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
フィルターかけた後、重複を除...
-
access2003 クエリSQL文に...
-
1日に1人がこなせるプログラム...
-
Exel VBA 別ブックから該当デ...
-
pythonにてseleniumを使うも、...
-
ExcelのVBAコードについて教え...
-
ExcelのVBAコードについて教え...
-
chatgptでつくってもらったコー...
-
欠番の抽出について
-
JANコードとPOSコードは同じ?
-
JavaScriptの定数名が取り消し...
-
1、Rstudioで回帰直線を求める...
-
特定行の背景色を変えたいのですが
-
変数名「cur」について
-
PreviewKeyDownイベントが2回...
-
将来AIが進歩してくるにつれて...
-
ACCESSユニオンクエリでORDER B...
-
COBOLの文法
-
VBAでファイルオープン後にコー...
-
Nullの使い方が不正です。
おすすめ情報