प्रश्न 1. इस फ़ंक्शन और सब द्वारा कौन-से दो सेट के मान प्रिंट किए जाते हैं?
Function GetVitals(ID AsLong, Age AsLong, Optional Weight AsLong) AsString GetVitals="ID=" & ID &"Age=" & Age & "Weight=" & Weight
EndFunctionSub ShowVitals()
Dim ID AsLong, Age AsLong,Weight asLong Debug.Print GetVitals(ID:=5,Age:=20)
Debug.Print GetVitals(ID:=6,Age:=25,Weight:=130)
EndSub
:
ID=5 Age = 20 Weight=
ID=6 Age = 25 Weight=130
:
ID=5 Age = 20 Weight=0
ID=6 Age = 25 Weight=130
:
ID=5 Age = 20 Weight=Null
ID=6 Age = 25 Weight=130
:
ID=5 Age = 20
ID=6 Age = 25 Weight=130
प्रश्न 2. यह कोड किस स्थिति में सही रूप से काम करेगा?
Sub CalledSub(Surname, Age)
call Calledsub "smith",26
calledsub (surname="smith", Age = 26)
calledsub (Surname:="Smith", Age:=26)
calledsub "smith", 26
प्रश्न 3. एक क्लास और एक ऑब्जेक्ट के बीच मुख्य अंतर क्या है?
इसमें कोई सार्थक अंतर नहीं है। शब्दों का प्रयोग परिसंघात्मक रूप से किया जाता है।
एक क्लास एक ऑब्जेक्ट की गुणधर्मों की घोषणा करता है। एक ऑब्जेक्ट उस घोषणा को पूरा करता है जिसमें घटनाएँ और विधियाँ परिभाषित होती हैं।
एक ऑब्जेक्ट एक क्लास के लिए एक टेम्पलेट है।
एक क्लास एक ऑब्जेक्ट के डिज़ाइन का वर्णन करता है। एक ऑब्जेक्ट उस डिज़ाइन का एक उदाहरण है।
प्रश्न 4. MsgBox विधिका किस मान को प्रदर्शित करती है?
Sub MySub(VarA AsLong, ParamArray VarB() As Variant)
MsgBox VarB(0)
EndSubSub ShowValue()
Call MySub(10, "First arg", 2, 3.1416)
EndSub
2
10
First arg
3.1416
प्रश्न 5. एक यूज़रफ़ॉर्म मॉड्यूल को वीबीए परियोजना में डालने के लिए कौन सी वस्तु आवश्यक है?
संबंधित मानक कोड मॉड्यूल
UserForm
संबंधित क्लास मॉड्यूल
UserForm क्लास
प्रश्न 6. उत्पाद क्या है?
Sub UseSum()
Dim TestArray() As Integer, Total As Integer
ReDim TestArray(1)
TestArray(1) = 6ReDim TestArray(2)
TestArray(2) = 3Total = WorksheetFunction.Sum(TestArray)
EndSub
3
0
9
6
प्रश्न 7. ड्राइवर सबरूटीन को Sub Driver (Y) द्वारा घोषित किया जाता है। किस बयान से कॉम्पाइल त्रुटि आती है?
Driver x
कॉल Driver (x)
कॉल Driver x
Driver (X)
प्रश्न 8. आपके पास एक यूज़र फ़ॉर्म पर व
िभिन्न चर को प्रदर्शित करने के लिए कई चर हैं, और एक ही समय में सभी चरों को प्रदर्शित करने के लिए बहुत अधिक चर हैं। उपयोगकर्ता को सभी चरों को देखने की सर्वश्रेष्ठ नियंत्रण कौन सा है?
फ़्रेम
मल्टीपेज
टैबस्ट्रिप
लिस्टबॉक्स
प्रश्न 9. नीचे एक फ़ंक्शन है जिसका नाम SquareIt है। किस संस्करण के सबरूटीन का संकलन एक कॉम्पाइल त्रुटि का परिणाम होता है?
Function SquareIt(ByRef Basis AsInteger) AsLongSquareIt = Basis ^ 2EndFunction
सब क्षेत्र ()
दिम Result जैसा लंबा, दिम साइड जैसा आदेश
साइड = 5परिणाम = Squarelt (साइड)
समाप्त सब
सब क्षेत्र ()
दिम Result जैसा लंबा, दिम साइड
साइड = 5परिणाम = SquareIt (Cint (साइड))
समाप्त सब
प्रश्न 10. EmailAddress() एक एरे है। इसका डिक्लेअरेशन Dim EmailAddress (10) As String है, और विकल्प बेस 1 प्रभाव में है। EmailAddress() में कितनी पंक्तियाँ और स्तंभ हैं?
10 पंक्तियाँ और 10 स्तंभ
10 पंक्तियाँ और 1 स्तंभ
10 पंक्तियाँ और 0 स्तंभ
1 पंक्ति और 10 स्तंभ
प्रश्न 11. यदि आप इस कोड को चलाते हैं तो कौन सा सेलेक्ट होगा?
जब आप विज़ुअल बेसिक मॉड्यूल में प्रोसेडियों, स्थिर मानों, चरों और तर्कों का नामकरण करते हैं, तो आपको निम्नलिखित नियमों का पालन करना चाहिए: पहले वर्ण के रूप में आपको एक पत्र का प्रयोग करना होगा। आप नाम में स्थान, अवधि, विस्तार, जीर्ण या नमूना के लिए एक अक्षर नहीं प्रयोग कर सकते हैं।
प्रश्न 13. एक प्रयोगकर्ता निर्मित डेटा प्रकार की एक वैध परिभाषा क्या है?
:
TypeCBC
नाम जैसा लंबा
अगला जैसा लंबा
अंत प्रकार
:
TypeCBC
नाम जैसा लंबा
_अगला जैसा लंबा
अंत प्रकार
:
TypeCBC
नाम जैसा लंबा
@Option जैसा लंबा
अंत प्रकार
:
TypeCBC
नाम जैसा लंबा
%For जैसा लंबा
अंत प्रकार
प्रश्न 14. एक प्रोजेक्ट से एक डिफ़ॉल्ट प्रोजेक्ट में एक यूज़र फ़ॉर्म को कैसे डुप्लिकेट किया जाए?
:
मौजूदा यूज़र फ़ॉर्म के साथ प्रोजेक्ट को सहेजें और बंद करें।
सेट करें > फ़ाइल पर क्लिक करें।
मौजूदा प्रोजेक्ट के स्थान पर ब्राउज़ करें।
उस पर दायाँ क्लिक करें और आप जिस यूज़र-फ़ॉर्म को डुप्लिकेट करना चाहते हैं, चुनें।
:
मौजूदा यूज़र फ़ॉर्म को डिज़ाइन मोड में खोलें।
फ़ॉर्म पर दायाँ क्लिक करें और प्रतिलिपि चुनें।
दूसरे प्रोजेक्ट पर स्विच करें।
मॉड्यूल पर दायाँ क्लिक करें और पेस्ट चुनें।
:
प्रोजेक्ट एक्सप्लोरर में, यूज़र फ़ॉर्म पर दायाँ क्लिक करें और प्रतिलिपि चुनें।
नए प्रोजेक्ट पर स्विच करें।
यूज़रफ़ॉर्म पर दायाँ क्लिक करें और पेस्ट चुनें।
:
मौजूदा यूज़र फ़ॉर्म को डिज़ाइन मोड में खोलें।
फ़ाइल > निर्यात फ़ाइल पर क्लिक करें।
दूसरे प्रोजेक्ट पर स्विच करें।
फ़ाइल > आयात फ़ाइल पर क्लिक करें।
प्रश्न 15. एक माइक्रो मेंक्रो मैक्रो का रेकॉर्डिंग संभावित रूप से उपयोगकर्ता के कार्रवाईयों का अधूरा रिकॉर्ड होने के कारण क्यों है?
माइक्रो के मैक्रो रिकॉर्डर को कीबोर्ड शॉर्टकट द्वारा प्रारंभ किए गए कार्रवाइयों को रिकॉर्ड नहीं करता।
माइक्रो के मैक्रो रिकॉर्डर फाइंड और रिप्लेस संपादनों का समर्थन नहीं करता है।
माइक्रो के मैक्रो रिकॉर्डर तारीखी टैब के रिबन के डेवलपर टैब पर बटन क्लिक करके प्रारंभ किए गए कार्रवाइयों को रिकॉर्ड नहीं करता है।
माइक्रो के मैक्रो रिकॉर्डर उन कार्रवाइयों को रिकॉर्ड नहीं करता है जो माउस पॉइंटर के साथ पाठ का चयन शामिल करते हैं।
प्रश्न 16. सबरूटीन की त्रुटि हैंडलर के आगे कौन सा वक्तव्य होना चाहिए?
समाप्त
वापसी
बाहर आउट सब
रुकें
प्रश्न 17. मायएरे कितने मानों को धारण कर सकता है?
Option Base 0
Sub BuildArray()
Dim MyArray(5) As Integer
0
32,769
5
6
प्रश्न 18. कौन सा वक्तव्य सही है?
सेट एक क्लास में एक मान स्थापित करता है; लेट एक क्लास से एक मान लौटाता है।
लेट एक क्लास में एक मान स्थापित करता है; सेट एक क्लास से एक मान लौटाता है।
लेट एक क्लास में एक मान स्थापित करता है; गेट एक क्लास से एक मान लौटाता है।
गेट एक क्लास में एक मान स्थापित करता है; सेट एक क्लास से एक मान लौटाता है।
प्रश्न 19. एक घोषणा का क्षेत्र होता है, जिसमें तीन स्तर होते हैं। वे क्या हैं?
मॉड्यूल, प्रोजेक्ट और ऑटोमेशन
प्रोसीजर, प्राइवेट मॉड्यूल और पब्लिक मॉड्यूल
सबरूटीन, मॉड्यूल और प्रोजेक्ट
प्रोसीजर, प्रोजेक्ट और ग्लोबल
प्रश्न 20. एक्सेल में किसी भी विज़ुअल बेसिक कोड को चलाने के लिए विज़ुअल बेसिक एडिटर में दो संदर्भ चयनित करना आवश्यक होता है। ये दो संदर्भ क्या हैं?
एमएस एक्सेल ऑब्जेक्ट लाइब्रेरी और एमएस ऑफिस ऑब्जेक्ट लाइब्रेरी
वीबीए और एमएस ऑफिस ऑब्जेक्ट लाइब्रेरी
वीबीए और एक्सेल ऑब्जेक्ट लाइब्रेरी
एमएस एक्सेल ऑब्जेक्ट लाइब्रेरी और ओएलई ऑटोमेशन
प्रश्न 21. आपके प्रोजेक्ट को उसके चर को रीसेट करने के लिए कौन सा कार्यवाही करेगा?
डीबग मोड में वर्तमान संवाद के तर्कों की सूची को संपादित करें।
रन-टाइम त्रुटि संवाद में एंड पर क्लिक करें।
वर्कशीट में एक एक्टिवएक्सकंट्रोल जोड़ें।
इन सभी उत्तरों
प्रश्न 22. कौन सा कीबोर्ड शॉर्टकट वीबीई को एक प्रक्रिया के घोषणा का पता लगाने के लिए कार्यक्षम करता है?
शिफ्ट+F3
अल्ट+F (Windows) या ऑप्शन+F (Mac)
श
िफ्ट+F2
कंट्रोल+F (Windows) या कमांड+F (Mac)
प्रश्न 23. जब आप एक नए ऑब्जेक्ट की कक्षा को परिभाषित करते हैं, तो आप उसे कहां नामित करते हैं?
कक्षा मॉड्यूल के नाम में
कक्षा मॉड्यूल के कोड में
स्टैंडर्ड मॉड्यूल के कोड में
स्टैंडर्ड मॉड्यूल के गुणों में
प्रश्न 24. कैसे एक क्लास मॉड्यूल स्पष्ट रूप से बताता है कि वह एक विशेष इंटरफेस का उपयोग करता है?
इंटरफेस स्वयं क्लास मॉड्यूल का हिस्सा होता है।
इंटरफेस कीवर्ड और इंटरफेस का नाम के माध्यम से।
Implements कीवर्ड और इंटरफेस का नाम के माध्यम से।
इंटरफेस का नाम एक पैरामीटर के रूप में पास किया जाता है।
प्रश्न 25. वीबीए प्रोजेक्ट में अन्य मॉड्यूलों के लिए मॉड्यूल1 की सामग्री को उपलब्ध कराने के लिए क्या आवश्यक है, लेकिन किसी अन्य वीबीए प्रोजेक्ट के लिए नहीं?
मॉड्यूल1 के शीर्ष पर विकल्प ग्लोबल सेट करें
मॉड्यूल स्तरीय चरों को निजी घोषित करें
मॉड्यूल1 के शीर्ष पर मॉड्यूल स्तर स्कोप सेट करें
मॉड्यूल1 के शीर्ष पर विकल्प निजी मॉड्यूल सेट करें
प्रश्न 26. एक ऐरे नामित MyArray के साथ उपयोग किया जाने पर एक लूप नियंत्रण चर की शुरुआत और समापन मानों को सेट करने का पसंदीदा तरीका क्या है?
For i = 0 To UBound(MyArray,1)
For i = 1 To UBound(MyArray,1)
For i = LBound(MyArray,1) To UBound(MyArray,1)
इस पर निर्भर करता है कि क्या विकल्प बेस 0 या विकल्प बेस 1 का उपयोग हो रहा है।
प्रश्न 27. टेस्ट3 का मान क्या है?
Enum TestEnum
Test1
Test2
Test3
End Enum
0
1
3
2
प्रश्न 28. कौन सा वक्तव्य एक ऐरे का घोषणा करता है?
Q38. यह कोड "Subscript out of range" त्रुटि क्यों उत्पन्न करता है?
Sub Example()
Dim MyArr() As Variant
ReDim MyArr(3, 4)
'कुछ कोडReDimPreserve MyArr(4, 4)
EndSub
मास्क केवल एक बार बदल सकते हैं।
MyArr पहले 3 "पंक्तियों" के साथ घोषित किया गया था।
आप केवल जब आप ReDim Preserve को निर्दिष्ट करते हैं, तो एक एरे के आखिरी आयाम को बदल सकते हैं।
सही वाक्यांश यह है ReDim Preserve MyArr(0 To 4, 0 To 4)।
Q39. कौन सा सबरोटीन घोषणा कॉम्पाइल त्रुटि नहीं उत्पन्न करता है?
Sub Called(Salary As Long, ParamArray Vals() As Variant)
Sub Called(ParamArray Vals() As Variant, Salary As Long)
Sub Called(Optional Salary As Long, ParamArray Vals() As Variant)
Sub Called(Salary As Long, ParamArray Vals() As String)
Q40. उपयोगकर्ता कैसे डेटा एंटर कर सकता है या विंडो बदल सकता है, जब UserForm1 स्क्रीन पर प्रदर्शित है?
इस विधि के साथ फ़ॉर्म को दिखाएं: UserForm1.Show vbModal
इस विधि को कोड में शामिल करें: UserForm1.Hwnd = False.
उपयोगकर्ता फॉर्म की SpecialEffect संपत्ति को frmShowModal पर सेट करें
उपयोगकर्ता फॉर्म की ShowModal संपत्ति को नकारात्मक सेट करें।
Q41. SubA SubB को MyVar को पास करता है। कैसे सुनिश्चित किया जा सकता है कि SubA को वापस लौटते समय MyVar का उसका मूल्य हो?
SubB को Sub SubB(ByRef MyVar) के रूप में घोषित करें।
SubB को Sub SubB(MyVar) के रूप में घोषित करें।
SubB को Sub SubB(Static MyVar) के रूप में घोषित करें।
SubB को Sub SubB(ByVal MyVar)
के रूप में घोषित करें।
Q42. कौन सा प्रकार का प्रक्रिया घोषणा वाक्यांश संटैक्टिकली सही है?
:
Sub MySub(VarA AsString, Optional VarB _
As Variant, Optional VarC AsLong)
:
Sub MySub(VarA AsString, Optional VarB _
As Variant, VarC AsLong)
:
Sub MySub(Optional VarA AsString, Optional VarB _
As Variant, VarC asLong)
:
Sub MySub(OPtional VarA AsString, VarB _
As Variant, Optional VarC asLong)
Q43. VBA में दो प्रमुख प्रकार की प्रक्रियाएँ क्या हैं?
फ़ंक्शन और इवेंट
फ़ंक्शन और स्कोप
सबरूटीन और इवेंट
सबरूटीन और फ़ंक्शन
Q44. कौन सा कोड ब्लॉक त्रुटि के बिना कंपाइल होता है?
Sub Decs() Dim MyFixed As String * 0 MyFixed = "A" MsgBox MyFixed End Sub
Sub Decs() Dim MyInt% * 1 MyInt = 7 MsgBox MyInt End Sub
Sub Decs() Dim MyInt% As Integer * 1 MyInt = 5 MsgBox MyInt End Sub
Sub Decs() Dim MyInt, MyNum As Integer MyInt = "A" MsgBox MyInt End Sub
Q45. वर्तमान CountValues में मूल्य को प्रदर्शित करने के लिए तत्काल खिड़की में क्या उपयोग किया जाता है?
= CountValues= CountValues
| CountValues| CountValues
: CountValues: CountValues
? CountValues? CountValues
Q46. इस स्तर पर आप एक चर को कैसे घोषित कर सकते हैं: Private TopSecret As String?
फ़ंक्शन
मॉड्यूल
सबरूटीन
प्रक्रिया
Q47. जब उपयोगकर्ता UserForm1 को स्क्रीन पर प्रदर्शित किया जाता है, तो कैसे उपयोगकर्ता वर्कशीट या दस्तावेज़ पर डेटा दर्ज कर सकता है, या विंडो को बदल सकता है?
इस विधि के साथ फ़ॉर्म को दिखाएं: UserForm1.Show vbModal.
उपयोगकर्ता फॉर्म की SpecialEffect संपत्ति को frmShowModal पर सेट करें।
इस कोड में इस विधि को शामिल करें: UserForm1.Hwnd = False.
उपयोगकर्ता फॉर्म की ShowModal संपत्ति को नकारात्मक सेट करें।
Q48. SubA MyVar को SubB को पास करता है। जब नियंत्रण SubA को लौटता है, तो कैसे सुनिश्चित किया जा सकता है कि MyVar का उसका मूल्य हो?
SubB को Sub SubB(Static MyVar) के रूप में घोषित करें।
SubB को Sub SubB(ByVal MyVar) के रूप में घोषित करें।
SubB को Sub SubB(MyVar) के रूप में घोषित करें।
SubB को Sub SubB(ByRef MyVar) के रूप में घोषित करें।
Q49. एरे एक से अधिक बार आकार नहीं बदला जा सकता है।
Sub Example() Dim MyArr() As Variant ReDim MyArr(3, 4) 'some code ReDim Preserve MyArr(4, 4)EndSubSub Example() Dim MyArr() As Variant ReDim MyArr(3, 4) 'some code ReDim Preserve MyArr(4, 4) End Sub
सही वाक्यांश है ReDim Preserve MyArr(0 To 4, 0 To 4)।
आप केवल जब आप ReDim Preserve को निर्दिष्ट करते हैं, तो एक एरे के आखिरी आयाम को बदल सकते हैं।
MyArr पहले 3 "पंक्तियों" के साथ घोषित किया गया था।
SubB को Sub SubB(ByRef MyVar) के रूप में घोषित करें।
Q50. कौन सा कोड ब्लॉक अंत में जब i चर मान 5 के बराबर होता है और X 10 के बराबर होता है?
:
DoX = X + 1
i = i + 1
Loop Until i < 5
End Sub
:
Sub Loopi()
Dim X AsInteger, i AsIntegerFor i = 1To5X = X + 1Next I
EndSub
:
Sub Loopi()
Dim X AsInteger, i AsIntegerDoUntil i < 5X = X + 1i = i + 1LoopEndSub
:
Sub Loopi()
Dim X AsInteger, i AsIntegerDoX = X + 1i = i + 1LoopWhile i < 5EndSub
Q51. एक क्लास मॉड्यूल कैसे संकेत करता है कि वह एक विशेष इंटरफ़ेस का उपयोग करता है?
Implements कीवर्ड और इंटरफ़ेस का नाम के माध्यम से।
Interface कीवर्ड और इंटरफ़ेस का नाम के माध्यम से।
इंटरफ़ेस का नाम पैरामीटर के रूप में पारित किया जाता है।
इंटरफ़ेस स्वयं क्लास मॉड्यूल का हिस्सा है।
Q52. VBE का कौन सा हिस्सा आपको VBA की वाक्यांश क
ा अन्वेषण करने में मदद कर सकता है?
स्थानीय विंडोज़
ऑब्जेक्ट ब्राउज़र
परियोजना अन्वेषक
वैकल्पिक संवाद
Q53. यह कोड एक नई संग्रह स्थापित करने का प्रयास कर रहा है, जो कर्मचारी के नाम और संख्याओं से बना है। Assoc एक क्लास है। कोड से कौन सा वाक्यांश अभाव है?
Dim Associates As Collection, Assoc As CAssoc, i AsByteFor i = 1To200Set Assoc = New CAssoc
Assoc.Name = Cells(i,1)
Assoc.Number = Cells(i,2)
Associates.Add Assoc
Next i
Set Associates = New Collection
Set Associates = Collection
Redim(Associates(Associates.Count+1))
Redim(Associates _ (Unbound(Associates)+1))
Q54. एक ऐसा चर या मान क्या है जो एक सबरूटीन या फ़ंक्शन से दूसरे के पास किया जाता है, इसके लिए मानक शब्द क्या है?
संदर्भ
तत्व
प्रार्थना
गुण
Q55. एक ऐसा चर या मान क्या है जो एक सबरूटीन या फ़ंक्शन से दूसरे के पास किया जाता है, इसके लिए मानक शब्द क्या है?
संदर्भ
तत्व
प्रार्थना
गुण
Q56. किस स्तर पर वर्कबुक के कोड मॉड्यूल में Worksheet_Change का नामित ईवेंट प्रक्रिया पाया जाता है?
किसी साधारण कोड मॉड्यूल में
वर्कशीट के ऑब्जेक्ट मॉड्यूल में
Worksheet_Change क्लास मॉड्यूल में
वर्कबुक के कोड मॉड्यूल में
Q57. आप वर्कशीट के लिए एक ईवेंट प्रक्रिया बना रहे हैं, और आप ईवेंट प्रक्रिया के Sub विधिमें तारीख को संपादित करते हैं। जब ईवेंट प्रक्रिया चलती है, तो क्या होता है?
इसमें कोई अंतरित नहीं है तुलना में साधारण प्रक्रिया के परिणामों के साथ।
परिणाम अप्रत्याशित होते हैं।
प्रक्रिया संकलित नहीं होती है।
प्रक्रिया एक रनटाइम त्रुटि फेंकती है।
Q58. इस आधार पर कौन सा प्रक्रिया SumCosts को सही रूप से उपक्रिया करता है?
Sub Sumosts(AcctName AsString, Amount AsLong)
Range("A1") = AcctName
EndSub