وی بی اے "برابر نہیں" آپریٹر | وی بی اے کی "مثال کے برابر نہیں" کی مثالوں سے مرحلہ وار

نہیں برابر وی بی اے میں ایک آپریٹر ہے جسے نفی آپریٹر بھی کہا جاسکتا ہے ، یہ ایک منطقی تقریب ہے لہذا اس فنکشن کے ذریعہ واپس آؤٹ پٹ یا تو صحیح ہے یا غلط ، ہم جانتے ہیں کہ برابر آپریٹر "=" ہے لیکن اس کے برابر نہیں ہے " وی بی اے میں ، تو جو بھی قیمت ہمیں برابر آپریٹر سے ملتی ہے ، ہمیں نٹ برابر آپریٹر کا استعمال کرکے قطعی مخالف قیمت مل جائے گی۔

وی بی اے میں آپریٹر "برابر نہیں"

عام طور پر ، ہم ایک منطقی جانچ پڑتال کرتے ہیں "چاہے کوئی چیز دوسری چیز کے برابر ہو یا نہیں"۔ کچھ معاملات میں ، ہمیں ایسا کرنے کی ضرورت ہے "عدم مساوات" بھی ٹیسٹ.عدم مساوات امتحان برابر امتحان کے سوا کچھ نہیں ہے۔ عام طور پر ، ہم کہتے ہیں کہ اگر کوئی چیز دوسری چیز کے برابر ہے یا نہیں ، اگر یہ برابر ہے تو کسی طرح کا کام انجام دیتا ہے اگر نہیں تو مختلف کام۔ اسی طرح کا استعمال کرتے ہوئے عدم مساوات ٹیسٹ بھی ہم کسی قسم کا آپریشن کرسکتے ہیں۔ وی بی اے میں "نہیں ایکوئل" کی نمائندگی علامت سے زیادہ اور کم کے امتزاج سے کی جاتی ہے۔ اگر یہ دونوں آپریٹرز اکٹھے ہوجائیں تو پھر یہ مساوی علامت نہیں بن جاتا یعنی۔ “”.

ایکسل وی بی اے میں کام کرنے کے برابر کیسے نہیں؟

وی بی اے برابر نہیں آپریٹر کے برابر کی منطق کے بالکل برعکس کام کرتا ہے۔ آپریٹر کے برابر حق کی واپسی صحیح ہوتی ہے اگر فراہم کردہ ٹیسٹ مطمئن نہیں ہوتا ہے تو یہ غلط واپس آئے گا۔ مثال کے طور پر ، اگر آپ 10 = 10 کہتے ہیں تو یہ سچائی کو واپس کرے گا ورنہ غلط۔

دوسری طرف "نہیں برابر ہے" مخالف سمت میں کام کرتا ہے ، اگر ایکسل میں فراہم کردہ منطقی امتحان برابر نہیں ہوتا ہے تب ہی وہ سچائی کو واپس کرے گا ورنہ غلط۔

مثال کے طور پر ، اگر آپ 10 10 کہتے ہیں تو یہ FALSE لوٹ آئے گا کیونکہ 10 کے برابر 10 کے برابر ہے۔ صحیح نتیجہ حاصل کرنے کے لئے ایک ویلیو دوسرے ویلیو کے برابر نہیں ہونی چاہئے۔

ایکسل وی بی اے میں برابر نہیں کی مثالیں

ذیل میں ایکسل وی بی اے میں آپریٹر کے برابر نہیں کی مثالیں ہیں۔

مثال # 1

اب ہم دیکھیں گے کہ عملی طور پر وی بی اے ناٹ برابر () علامت کو کس طرح استعمال کیا جائے۔ نیچے کوڈ کے ٹکڑے کو دیکھو.

کوڈ:

 سب NotEqual_Example1 () Dim k As String k = 100 100 MsgBox k End Sub 

یہاں ہم جانچ کر رہے ہیں کہ آیا نمبر 100 100 کے برابر نہیں ہے۔ یقینی طور پر ہم جانتے ہیں کہ نمبر 100 100 کے برابر ہے ، لہذا نتیجہ غلط ہوگا۔

اب میں مساوات کو تبدیل کروں گا۔

کوڈ:

 سب NotEqual_Example1 () Dim k As String k = 100 99 MsgBox k اختتام سب 

اب جانچ یہ ہے کہ کیا 100 نمبر 99 کے برابر نہیں ہے۔ لہذا نتیجہ صحیح ہوگا۔

مثال # 2

اب ہم دیکھیں گے کہ ریئل ٹائم مثالوں میں اس کے برابر نہ چلانے والا آپریٹر کیسے استعمال کیا جائے۔ مظاہرے کے ل I ، میں نے کچھ ڈیٹا تیار کیا ہے۔

ہمارے پاس دو قدریں ہیں ، "ویلیو 1" اور "ویلیو 2"۔

اب میری ضرورت یہ ہے کہ اگر ویلیو 1 ویلیو 2 کے برابر نہیں ہے تو پھر مجھے "مختلف" کے بطور نتائج کی ضرورت ہے ورنہ مجھے بھی اسی طرح کے نتائج کی ضرورت ہے۔

مرحلہ نمبر 1: عددی طور پر متغیر کی تعریف کریں۔

کوڈ:

 سب NotEqual_Example2 () Dim k بطور انٹیجر اینڈ سب 

مرحلہ 2: اگلے 2 سے 9 تک لوپ کے لئے کھولیں۔

کوڈ:

 سب NotEqual_Example2 () D K k Integer as K = 2 to 9 Next k اختتام سب 

مرحلہ 3: لوپ کے اندر ، ہمیں یہ جانچنے کی ضرورت ہے کہ آیا قدر 1 قدر 2 کے برابر نہیں ہے۔ چونکہ ہمیں اپنے نتائج کی ضرورت ہے تو ہم حالت استعمال کرنے کی ضرورت ہیں۔

کوڈ:

 سب NotEqual_Example2 () D K k Integer for K = 2 to 9 اگر سیل (k، 1) سیل (k، 2) پھر سیل (k، 3). ویلیو = "مختلف" دوسرے سیلز (K، 3). ویلیو = "ایک ہی" اختتام اگر اگلا k اختتام سب 

اگر حالت جانچ پڑتال کرتی ہے کہ آیا قدر 1 کی قیمت 2 کے برابر نہیں ہے یا نہیں۔ اگر برابر نہیں ہے تو یہ "مختلف" لوٹ آئے گی ، اگر برابر ہے تو وہ "ایک ہی" لوٹ آئے گی۔

آپ ذیل میں وی بی اے کوڈ کو کاپی اور پیسٹ کرسکتے ہیں۔

اس کوڈ کو اپنے ماڈیول میں کاپی کریں اور F5 کلید یا دستی طور پر استعمال کریں۔ یہ اس طرح کا نتیجہ لوٹائے گا۔

نہیں برابر نشان کے ساتھ شیٹس کو چھپائیں اور چھپائیں

برابر نہیں گانے کے استعمال کے مختلف طریقے بہت زیادہ ہیں۔ ہم اس اشارے کو اپنی ضروریات کو پورا کرنے کے لئے استعمال کرسکتے ہیں۔

# 1 - ایک شیٹ کے علاوہ تمام شیٹس کو چھپائیں

ہم نے کئی بار اس قسم کی صورتحال دیکھی ہے۔ ہمیں خاص شیٹ کے علاوہ تمام شیٹس کو چھپانے کی ضرورت تھی۔

مثال کے طور پر ، اگر آپ شیٹ کے نام "کسٹمر ڈیٹا" کے علاوہ تمام شیٹس کو چھپانا چاہتے ہیں تو آپ اس کوڈ کو استعمال کرسکتے ہیں۔

کوڈ:

 سب Hide_All () ایکٹ ورک ورک بوک.ورکشیٹس میں ہر Ws کے لئے ورک شیٹ کے طور پر Dim Ws. Ws.Name "کسٹمر ڈیٹا" تو Ws.Visible = xlSheetVeryHided اختتام اگلا Ws سب سب 

نوٹ: ورک شیٹ کا نام اپنے ورک شیٹ کے نام میں تبدیل کریں۔

# 2 - ایک شیٹ کے علاوہ تمام شیٹس کو چھپائیں

اسی طرح ، ہم ایک شیٹ کے علاوہ تمام شیٹس کو بھی چھپا سکتے ہیں۔ ایسا کرنے کے لئے نیچے کا کوڈ استعمال کریں۔

کوڈ:

 سب انحیڈ_ آل () ڈیم ڈبلیو ایس کو ہر ایک Ws کے لئے ورک شیٹ کے بطور ایکٹو ورک بک بک میں۔ ورکس شیٹ اگر Ws.Name "کسٹمر ڈیٹا" ہے تو Ws.Visible = xlSheetVisible اختتام اگلا Ws اختتام سب 

آپ یہاں یہ وی بی اے ناٹ ایکسل ٹیمپلیٹ ڈاؤن لوڈ کرسکتے ہیں۔ وی بی اے نہیں برابر آپریٹر ٹیمپلیٹ