[リストへもどる]　　　[VBレスキュー(花ちゃん)]
一括表示
投稿時間：2004/08/24(Tue) 11:18
投稿者名：ももたろう
Ｅメール：
ＵＲＬ　：
タイトル：IF文の書き方
花ちゃんのHPにある「プログラムの最適化」を参考にプログラム修正を行おうと思い、
下記のように変更したのですが、IF文でエラーになってしまいます。
開発環境はXPを使用していますが、XPでは駄目なのでしょうか？

【最適化前】
If lblCopy1.Caption = "処理済" and lblCsvmake1.Caption= "処理済" AND lblExcelmake2.Caption = "処理済" Then

【最適化後】
If (lblCopy1.Caption Or lblCsvmake1.Caption Or lblExcelmake2.Caption) = "処理済" Then

◎上記以外にも試したこと
Dim a1 As String
Dim a2 As String
Dim a3 As String
a1 = lblCopy1.Caption
a2 = lblCsvmake1.Caption
a3 = lblExcelmake2.Caption
a4 = "処理済"
If (a1 or a2 or a3) = a4 Then

よろしくお願いします。

投稿時間：2004/08/24(Tue) 11:35
投稿者名：りっとっと
Ｅメール：
ＵＲＬ　：
タイトル：Re: IF文の書き方
String型に対してOr演算子を使用できません。
なので、一つ一つ判定式を書くしかないと思います。

投稿時間：2004/08/24(Tue) 11:42
投稿者名：ももたろう
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: IF文の書き方
> String型に対してOr演算子を使用できません。
> なので、一つ一つ判定式を書くしかないと思います。

そうなんですか、知りませんでした。
りっとっとさん返信ありがとうございました。

投稿時間：2004/08/24(Tue) 21:49
投稿者名：Say
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: IF文の書き方
最適化というわけではありませんが発想を変えて、
    If lblCopy1.Caption & lblCsvmake1.Caption & lblExcelmake2.Caption = "処理済処理済処理済" Then
とか。(良い子はマネしないでね。)