আমি কীভাবে মাইক্রোসফ্ট ভিবিএ সম্পাদকটিতে কাস্টম রঙ ব্যবহার করতে পারি?

33

আমি এক্সেল এবং ভিবিএ ব্যবহার করে কাজের জন্য কয়েকটি প্রকল্পে কাজ করছি, তাই মাইক্রোসফ্ট ভিজ্যুয়াল বেসিক সম্পাদক ছাড়া আমার আর কোনও উপায় নেই। আমি সাধারণত কিছু মনে করি না, তবে সম্পাদকের জন্য কীভাবে কাস্টম রঙ সেট করতে হবে তা আমি বুঝতে পারি না (আমি কেবলমাত্র ডিফল্ট প্যালেটটি বেছে নিতে পারি)।

রঙটি বর্তমানে পরিবর্তন করতে, আমি এখানে যাই Tools -> Options -> Editor Format... তবে, আপনার পছন্দগুলি কেবলমাত্র ডিফল্ট (এবং মৌলিক) 16 টি রঙের মধ্যে সীমাবদ্ধ - এবং যখন আমি মৌলিক বলি, তখন আমার অর্থ বেসিক , যেমন গোলাপী, নীল, কালো, সাদা ইত্যাদি mean ..

কেউ কীভাবে কোনও পছন্দসই রঙ নির্দিষ্ট করতে জানেন বা খুব কমপক্ষে, ডিফল্ট প্যালেটে প্রদর্শিত রঙের কিছু পরিবর্তন করতে পারেন?

microsoft-office  microsoft-excel-2007  text-editors  vba 
— শত্রুবূহ্যভেদ
সূত্র
আমি মনে করি মাইক্রোসফ্ট আমাদের যা বলার চেষ্টা করছে তা হ'ল তারা চায় না যে ভিবিএতে লোকেরা প্রোগ্রাম করুক। বা বিল গেটস ব্যথা হত্যাকারীদের উত্পাদনকারীদের মধ্যে ভারী।
— হোলেন

উত্তর:

19

ভিবিএ এই রেজিস্ট্রি কীগুলি থেকে রঙগুলির জন্য সেটিংস পড়ে:

HKEY_CURRENT_USER \ সফ্টওয়্যার \ মাইক্রোসফ্ট \ ভিবিএ \ 6.0 \ প্রচলিত \ কোডফোরালিয়ান

এই কীগুলির প্রতিটিতে সরঞ্জাম -> বিকল্প -> সম্পাদক বিন্যাসের অভ্যন্তরে প্রতিটি প্রবেশের জন্য মানগুলির (স্থান দ্বারা পৃথক পৃথক) তালিকা থাকে। উদাহরণস্বরূপ, কোডবাকল্যান্ডের অভ্যন্তরের প্রথম মানটি পটভূমির রঙ এবং কোডফোরেইল্যান্ডের অভ্যন্তরে প্রথম মান হ'ল স্বাভাবিক পাঠ্যের অগ্রভাগের রঙ। মানগুলি রঙের অভ্যন্তরীণ আইডি, 0 এর অর্থ অটো রঙ করা, 11 শো সায়ান, 5 লাল ইত্যাদি are

এটি ব্যবহার করে দেখুন: এক্সেল বন্ধ করুন, কোডবাকল্যান্ডের প্রথম মানটি 5 এ পরিবর্তন করুন এবং এক্সেল পুনরায় চালু করুন। কোড সম্পাদকের পটভূমি এখন লাল হবে।

সমস্যাটি হ'ল ভিবিএ সম্পাদক কেবলমাত্র এই অভ্যন্তরীণ মানগুলিকে সমর্থন করে এবং সর্বাধিক সংখ্যাটি এটি বোঝে 16 টি other অন্য কোনও মান গৃহীত হবে না এবং এটি ডিফল্ট হয়ে অটোতে।

আমি বিভিন্ন মান (যেমন 128255128, 16777215, # আফাফী, 255 বা "170,255,238") প্রবেশের কয়েকটি বিকল্প চেষ্টা করেছি এবং তাদের কোনওটিই কাজ করে না।

অতএব আমি মনে করি প্রযুক্তিগতভাবে অন্যান্য রং নির্ধারণ করা সম্ভব নয়।

— টেক্স হেক্স
সূত্র
1
উত্তরের জন্য ধন্যবাদ. আইআইআরসি, আপনি কোনও অনুগ্রহ প্রত্যাহার করতে পারবেন না, তবে আপনি যদি আক্ষরিকভাবে এটি করতে না পারেন তবে আমি আপনাকে সবচেয়ে সঠিক উত্তরের জন্য এটি প্রদান করব। আরও উত্তর পোস্ট করা হয়েছে কিনা তা দেখার জন্য আমি আরও কিছুটা অপেক্ষা করতে চাই, তবে আপনার প্রতিক্রিয়ার জন্য ধন্যবাদ, +1
— ব্রেকথ্রু
1
আমাকে স্বীকার করতে হবে, এটি আরও ভাল শোনায় :)
— টেক্স হেক্স
এফএমএস থেকে "মোট ভিজ্যুয়াল কোডটুলস" ( fmsinc.com/vb6/CodingTools.html ) এর একটি সরঞ্জাম রয়েছে "সহজেই আপনার সম্পাদকের জন্য রং দেখতে এবং সেট করতে" ভিবিই কালার স্কিম ম্যানেজার "। আপনি যদি ব্যবহারকারী ম্যানুয়াল (একটি পিডিএফ) ডাউনলোড করেন তবে এটি স্ক্রিনশটগুলি দেখায় যে রঙ সেট করা আরও সহজ করার পরেও এটি 16 রঙের প্যালেটটিতে সীমাবদ্ধ। ভাববেন যদি কাস্টম রঙগুলি ব্যবহার করার প্রত্যক্ষ উপায় থাকে তবে তারা এটিকে এই সরঞ্জামটিতে অন্তর্ভুক্ত করতে পারত। দেখে মনে হচ্ছে টেক্স হেক্স্স সঠিক।
— ব্রায়ান
যেহেতু এখন এটি নীচের উত্তরগুলির সাথে দেখা গেছে যে এটি সম্ভব, তাই এই উত্তরটি পরিবর্তন করা উচিত। এইচএক্স সম্পাদক ব্যবহার করে ভিবিএ সম্পাদকের রঙগুলি নির্ভরযোগ্যভাবে পরিবর্তন করা সম্ভব।
— স্টিভেন মার্টিন
16

আমি এখানে পাওয়া তথ্যের ভিত্তিতে একটি অ্যাপ্লিকেশন তৈরি করেছি: https://github.com/dimitropoulos/VBECustom Version

এটি মূলত VBE6 / VBE7 .dll ফাইলটিকে ব্যাক আপ করে এবং একটি হেক্স সম্পাদক ব্যবহার না করে কাস্টম রঙ ব্যবহার করার অনুমতি দেয়।

এস এস

আপনি এটি এখানে ডাউনলোড করতে পারেন: https://github.com/gallaux/VBEThemeColorEditor

উপভোগ করুন

সম্পাদনা: উত্স কোড এখন উপলব্ধ!

— gallaux
সূত্র
বাহ দুর্দান্ত দুর্দান্ত, @ গ্লাগাক্স ভাগ করে নেওয়ার জন্য ধন্যবাদ - আমি অবশ্যই এটি পরীক্ষা করে দেখব। আপনি কি উত্সাহের বাইরে উত্স কোডটি প্রকাশ করার পরিকল্পনা করছেন?
— ব্রেকথ্রু
হ্যাঁ আমি শীঘ্রই করব, আমার কেবল এটি কিছুটা পরিষ্কার করা দরকার;)
— গ্যালাক্স
ধন্যবাদ গ্যালাক্স, আমি একই জিনিসটি বোঝাতে চেয়েছি, তবে একবার আমি আমার ভিবিএ সম্পাদককে আমার পছন্দ মতো রঙের স্কিমে পেয়েছিলাম, আমি সেই অনুপ্রেরণাটি হারিয়ে ফেলেছি কারণ আমি আর "16 বর্ণের চোখের স্ট্রেনকে হতাশ" করিনি!
— স্টিভেন মার্টিন
1
দুঃখিত এটি কীভাবে প্রয়োগ করবেন, আমার সহায়তা দরকার
— পেড্রো মিগুয়েল পিমিয়েনা মোরালেস
1
@ YouCrackedMeUp আপনার regedit ( github.com/dimitropoulos/VBECustom Version এর উপর ভিত্তি করে ) ব্যবহার করে রেজিস্ট্রি কী আপডেট করতে হবে : [1] পুনঃনির্মাণে নেভিগেট করুন HKEY_CURRENT_USER\Software\Microsoft\VBA\7.1\Common। [2] পরিবর্তন CodeBackColorsকরুন: 2 7 1 13 15 2 2 2 11 9 0 0 0 0 0 0। [3] পরিবর্তন CodeForeColorsকরুন: 13 5 12 1 6 15 8 5 1 1 0 0 0 0 0 0। [4] পরিবর্তন FontFaceকরুন: Consolas।
— টিগ্রেগালিস
7

টেক্স হেক্স স্পট অন রয়েছে। তবে, নিজের সাথে 16 বিল্ট-ইন রঙগুলি পরিবর্তন করা সম্ভব। এটির জন্য কেবল কিছুটা হেক্স সম্পাদনা প্রয়োজন। এখানে ধাপে ধাপে গাইড। (দ্রষ্টব্য: এটি ভিবি 6 এসপি 6 এর জন্য, ফাইল সংস্করণ 6.0.97.82)।

  1. আপনার VB98 প্রোগ্রাম ফোল্ডারে আপনার VB6.EXE ফাইলটির ব্যাকআপ দিন। (,চ্ছিক, তবে প্রস্তাবিত)।

  2. আপনার পছন্দসই হেক্স সম্পাদক সম্পাদনা করুন (এইচএক্সডি থেকে চিত্কার করুন) এবং VB6.EXE খুলুন।

  3. 0xE22F4 ঠিকানায় যান এটি রঙিন টেবিলের শুরু।

আপনার চারটি শূন্য দেখতে হবে। এটি আরআরজিবিবিএএ ফর্ম্যাটে কালার ব্ল্যাক উপস্থাপন করে (আলফা সমর্থিত নয় সুতরাং এটি কেবলমাত্র আরআরজিবিবিবি00 ফর্ম্যাট)। পরবর্তী চারটি বাইটগুলি পরবর্তী রঙ নির্দিষ্ট করে এবং তাই আপনি এফএফএফএফএফএফ00 (সাদা) না পাওয়া অবধি অফসেট 0xE2333 এ পৌঁছাবেন।

  1. আপনার পছন্দ অনুযায়ী এই চার-বাইট মানগুলির মধ্যে যে কোনওটিকে সম্পাদনা করুন। আরজিবি ফর্ম্যাটে যথাযথ হেক্স মানগুলি ব্যবহার করুন, তারপরে একটি শূন্য বাইট। উদাহরণস্বরূপ, আরজিবি (64, 128, 192) 40 80 C0 00 হবে।

  2. আপনার পরিবর্তনগুলি EXE এ সংরক্ষণ করুন এবং ভিবি 6 ফায়ার করুন। পূর্বে অন্তর্নির্মিত ভিবি রঙগুলির দ্বারা দখল করা স্লটে আপনার নতুন রঙ (গুলি) দেখতে হবে।

— বন্ধন
সূত্র
1
হুম, আমি অফিস 2003 সহ একটি সিস্টেমে সমস্ত কিছু দিয়ে সরঞ্জামটি অনুসন্ধান করেছি এবং এটি ভিবি 6.এক্সি বা কোনও ফোল্ডার ভিবি 98 নামক কোনও ফাইল খুঁজে পায় না। এই উত্তরটি কি ওপি-এর মতো অফিস 2007 এর জন্য? তবে সংস্করণ 6.0.97.82 অফিস 2003 এর সাথে আমার চেয়ে পুরানো
— নিক্সদা
1
@ নিক্সদা আমার সিস্টেমে কিছুই নেই - আমি মনে করি বন্ড তার সিস্টেমে ভিবি 6 অ্যাপ্লিকেশনটিকে উল্লেখ করছে, ভিসিএ এক্সেলের সাথে সংহত নয় not আমি এক্সেল এক্সিকিউটেবল এবং কিছু ভিবিএ ডিএলএল এর মাধ্যমে একটি নজর রাখতে যাচ্ছি এবং আমি কোনও রঙের টেবিলগুলি খুঁজে পেতে পারি কিনা তা দেখুন।
— ব্রেকথ্রু
1
আমার পিসিতে আমার ২০১০ অফিস রয়েছে তাই আমার ভিবিই ..ডিএলএল আছে, ভিবিই ..ডিএলএল নয়, তবে এটি একই প্রক্রিয়া হওয়া উচিত। রঙ একই। আপনি যে রঙগুলি প্রদর্শিত হচ্ছে সেটির দিকে নজর রাখলে সেগুলি হওয়া উচিত: কালো = 00 00 00 00 নেভি = 00 00 80 00 সবুজ = 00 80 00 00 টারকোইজ = 00 80 80 00 ম্যাজেন্টা = 80 00 00 00 ভায়োলেট = 80 00 80 00 জলপাই = 80 80 00 00 এলজিটি ধূসর = C0 C0 C0 00 পানীয় গ্রে = 80 80 80 00 ... আমি প্রতিটির পাশে হেক্স রঙের কোড যুক্ত করেছি। সুতরাং কেবলমাত্র একটি হেক্স সম্পাদকে VBE6.DLL খুলুন এবং নিম্নলিখিত হেক্স স্ট্রিংটির জন্য অনুসন্ধান করুন:
— বন্ড
1
00000000000080000080000000808000800000008000800080800000C0C0C00080808000 এটি একাধিকবার হতে পারে তবে আমি খুঁজে পেয়েছি যে প্রথম রঙের টেবিলটি যা সংশোধন করা দরকার তা হ'ল। দেখুন যে এটি আপনার জন্য কাজ করে।
— বন্ড
1
অসাধারণ উত্তর, বন্ড। ভবিষ্যতের পাঠকদের জন্য, আমার যে কীটি পরিবর্তন করতে হবে তা হ'ল সম্পাদনা (বাইট নং 1,200,308) ব্যবহার করে 50 12 50B4 এ অবস্থিত দ্বিতীয়টি (অফিস 2013, উইন্ডোজ 8.1) ছিল
— অ্যান্ডি টেরা
5

যেমনটি উল্লেখ করেছেন যে, বন্ডের সমাধান (ভিবি 6.এক্সিতে রঙের টেবিল সম্পাদনা করা হেক্সস) কাজ করবে তবে আপনি যখনই ভিবি 6 শুরু করবেন তখন বিকল্পগুলি সংলাপে আপনাকে নিজের রঙগুলি পুনরায় সেট করতে হবে। আমি একটি অটোআইটি স্ক্রিপ্ট তৈরি করেছি যা আপনার জন্য সমস্ত কাজ করবে, যেখানে সেটসাইনট্যাক্স কালারিং () এ কল করা হয়েছে সেখানে প্রয়োজনীয় হিসাবে কেবল এটি সম্পাদনা করুন:

Opt("WinTitleMatchMode", 2)
Opt("MouseClickDelay", 1)
Opt("MouseClickDownDelay", 1)
Opt("MouseClickDragDelay", 1)
Opt("SendKeyDelay", 1)
Opt("SendKeyDownDelay", 1)

Const $NORMALTEXT = 0
Const $SELECTIONTEXT = 1
Const $SYNTAXERRORTEXT = 2
Const $EXECUTIONPOINTTEXT = 3
Const $BREAKPOINTTEXT = 4
Const $COMMENTTEXT = 5
Const $KEYWORDTEXT = 6
Const $IDENTIFIERTEXT = 7
Const $BOOKMARKTEXT = 8
Const $CALLRETURNTEXT = 9

Const $AUTO = 0
Const $BLACK = 1
Const $DARKBLUE = 2
Const $DARKGREEN = 3
Const $DARKRED = 4
Const $DARKBABYBLUE = 5
Const $DARKPINK = 6
Const $DARKYELLOW = 7
Const $LIGHTGRAY = 8
Const $DARKGRAY = 9
Const $BLUE = 10
Const $GREEN = 11
Const $BABYBLUE = 12
Const $RED = 13
Const $PINK = 14
Const $YELLOW = 15
Const $WHITE = 16

If WinExists( "Microsoft Visual Basic" ) Then
   WinActivate("Microsoft Visual Basic") ; activates the visual basic window
   Send("!+to") ; opens the options menu
   Sleep(10)
   WinMove("Options", "", 0, 0) ; moves the options menu to the upper left corner of the screen
   MouseClick("primary", 100, 50, 1, 0) ; clicks the editor tab

   SetSyntaxColoring($NORMALTEXT, $WHITE, $BLACK)
   SetSyntaxColoring($SELECTIONTEXT, $AUTO, $AUTO)
   SetSyntaxColoring($SYNTAXERRORTEXT, $BLACK, $YELLOW)
   SetSyntaxColoring($EXECUTIONPOINTTEXT, $AUTO, $YELLOW)
   SetSyntaxColoring($BREAKPOINTTEXT, $WHITE, $DARKRED)
   SetSyntaxColoring($COMMENTTEXT, $DARKGREEN, $BLACK)
   SetSyntaxColoring($KEYWORDTEXT, $GREEN, $BLACK)
   SetSyntaxColoring($IDENTIFIERTEXT, $WHITE, $BLACK)
   SetSyntaxColoring($BOOKMARKTEXT, $WHITE, $BLACK)
   SetSyntaxColoring($CALLRETURNTEXT, $WHITE, $GREEN)

   MouseClick("primary", 210, 340, 1, 0) ; hit the ok button to apply the changes
EndIf

Func SetSyntaxColoring($syntax, $forecolor, $backcolor)
   SelectSyntax($syntax)
   SelectForecolor($forecolor)
   SelectBackcolor($backcolor)
EndFunc

Func SelectSyntax($syntax)
   ResetSyntaxList()
   RptSend("{DOWN}", $syntax)
EndFunc

Func SelectForecolor($color)
   ResetForecolorCbo()
   RptSend("{DOWN}", $color)
EndFunc

Func SelectBackcolor($color)
   ResetBackcolorCbo()
   RptSend("{DOWN}", $color)
EndFunc

Func ResetSyntaxList()
   MouseClick("primary", 50, 95, 1, 0)
   RptSend("{UP}", 9)
EndFunc

Func ResetForecolorCbo()
   MouseClick("primary", 50, 235, 1, 0)
   MouseClick("primary", 50, 235, 1, 0)
   RptSend("{UP}", 16)
EndFunc

Func ResetBackcolorCbo()
   MouseClick("primary", 125, 235, 1, 0)
   MouseClick("primary", 125, 235, 1, 0)
   RptSend("{UP}", 16)
EndFunc

Func RptSend($text, $rpt)
   For $i = 1 To $rpt
      Send($text)
   Next
EndFunc

আমি এটি কেবল আমার ডেস্কটপে রেখেছি এবং এখনই যখনই আমাকে vb6 খুলতে হবে আমি কেবল এটিতে ডাবল ক্লিক করব এবং ঠিক তেমন সিনট্যাক্স রঙটি আমার নিয়ন্ত্রণে।

সম্পাদনা 1: স্ক্রিপ্টটিকে দ্রুত চালানোর জন্য কিছুটা অপ্টিমাইজ করেছে। আমি এমন একটি প্রোগ্রাম একসাথে রাখার কথা ভাবছি যা রঙের নির্বাচন আরও সহজ করার জন্য আপনার জন্য স্বয়ংক্রিয়ভাবে VB6.EXE সম্পাদনা করবে। আমি ভাবছি যদি ভিএস-এর জন্য একটি প্লাগইন তৈরি করে অটোআইটি স্ক্রিপ্টটি খাদের কোনও উপায় আছে?

সম্পাদনা 2: একটি ইউটিলিটি তৈরি করেছে যা আপনাকে হেক্স সম্পাদক ব্যবহার না করেই এক্সে রঙগুলি সম্পাদনা করতে দেয়: ভিবিক্ল্যাসিক কালারএডিটর । এই লিঙ্কটি বিটবাকেটের পাবলিক ভান্ডারে যায়।

— ডিলান নিসলে
সূত্র
স্ক্রিপ্ট এবং অবদানের জন্য আপনাকে ধন্যবাদ! VbClassicColorEditor- এ আমরা কোনও আপডেট লিঙ্ক পেতে পারি যে কোনও সুযোগ? আপনি যে পোস্ট করেছেন তার 404 ডি আছে ...
— অ্যান্ডি টেরা
3

আমি কেবলমাত্র পূর্বের উত্তরগুলির একটি সংক্ষিপ্ত পোস্ট করতে চেয়েছিলাম কারণ এটি এক্সেল ভিবিএ সম্পাদকের রঙ পরিবর্তন করতে কী করা প্রয়োজন তা সম্পূর্ণভাবে পরিষ্কার নয় not

নীচের উদাহরণে আমি সোলারাইজডের জন্য রঙিন স্কিম যুক্ত করছি এবং আমি অফিস 2010 এর ব্যবহার অনুমান করছি

পদক্ষেপ 0: এটি পরিবর্তন করার আগে VBE7.dll এর একটি ব্যাকআপ নিন - আপনাকে সতর্ক করা হয়েছে !!!

পদক্ষেপ 1: একটি হেক্স সম্পাদক এ, VBE7.dll অবস্থিত @ খুলুন

"C:\Program Files\Common Files\microsoft shared\VBA\VBA7\VBE7.DLL" 64 বিট জন্য

অথবা

"C:\Program Files( x86)\Common Files\microsoft shared\VBA\VBA7\VBE7.DLL" 32 বিটের জন্য

পদক্ষেপ 2: এটি 1 ম এর occurance

ff ff ff 00 c0 c0 c0 00 80 80 80 00 00 00 00 00
ff 00 00 00 80 00 00 00 ff ff 00 00 80 80 00 00
00 ff 00 00 00 80 00 00 00 ff ff 00 00 80 80 00
00 00 ff 00 00 00 80 00 ff 00 ff 00 80 00 80 00`

এবং সাথে প্রতিস্থাপন

00 2b 36 00 07 36 42 00 58 6e 75 00 65 7b 83 00
83 94 96 00 93 a1 a1 00 ee e8 d5 00 fd f6 e3 00
b5 89 00 00 cb 4b 16 00 dc 32 2f 00 d3 36 82 00
6c 71 c4 00 26 8b d2 00 2a a1 98 00 85 99 00 00

ধাপ 3: খুঁজুন 2nd এই occurance (নিশ্চিত হোন যে আপনি ফাইল উপরে থেকে অনুসন্ধান)

00 00 00 00 00 00 80 00 00 80 00 00 00 80 80 00
80 00 00 00 80 00 80 00 80 80 00 00 c0 c0 c0 00
80 80 80 00 00 00 ff 00 00 ff 00 00 00 ff ff 00
ff 00 00 00 ff 00 ff 00 ff ff 00 00 ff ff ff 00

এবং সাথে প্রতিস্থাপন

00 2b 36 00 07 36 42 00 58 6e 75 00 65 7b 83 00
83 94 96 00 93 a1 a1 00 ee e8 d5 00 fd f6 e3 00
b5 89 00 00 cb 4b 16 00 dc 32 2f 00 d3 36 82 00
6c 71 c4 00 26 8b d2 00 2a a1 98 00 85 99 00 00

পদক্ষেপ 4: dll ফাইলটি সংরক্ষণ করুন এবং তারপরে এক্সেল> ভিবিএ সম্পাদক> সরঞ্জামসমূহ> বিকল্পগুলি> সম্পাদক বিন্যাসটি খুলুন এবং কোডের রঙগুলি সেট করুন।

উভয় স্ট্রিং পরিবর্তন করা নেসেকারি কারণ এটি শাটডাউনে রঙগুলিকে সঠিকভাবে সংরক্ষণ করতে দেয় এবং রঙিন সম্পাদককে এক্সেল ক্রাশিংয়ের সাথে খোলার অনুমতি দেয়।

পূর্ববর্তী সমস্ত উত্তরদাতাদের ধন্যবাদ এটি নির্ণয় করার জন্য সময় লাগানোর জন্য!

— স্টিভেন মার্টিন
সূত্র
3

আমি একটি প্রোগ্রাম তৈরি করেছি যা এই সমস্তগুলিকে স্বয়ংক্রিয় করে ফেলেছে, এতে অনেক বেশি সময় ব্যয় করেছে, রঙ চয়নকারী তৈরি করতে মজা পেয়েছে। ভিবি 6-এ তৈরি হয়েছে কেন না। সংকলিত প্রোগ্রাম এবং সোর্স কোড এখানে উপলব্ধ । কেবলমাত্র ডিএলএল এবং ভিবি 6 এর আমার সংস্করণগুলিতে পরীক্ষা করা হয়েছে, দয়া করে কিছু পরিবর্তন করার আগে ব্যাকআপ নিন - কোডগুলিতে অবস্থানগুলি স্থির করা হয়েছে।

এটি একটি খুব পুরানো প্রশ্ন তবে আমি সম্পূর্ণতার জন্য বিবেচনা করতে চাই

ভিবিএ বা ভিবি 6 আইডিইতে VS2012 রঙের জন্য: VBE6.DLL / VBE7.DLL বা VBA6.DLL খুলুন 

C:\Program Files (x86)\Common Files\microsoft shared\VBA\
or
C:\Program Files (x86)\VB98\ (Your VB6 install location)

আপনার হেক্স সম্পাদক সহ

এর প্রথম উপস্থিতিটি প্রতিস্থাপন করুন

ff ff ff 00 c0 c0 c0 00 80 80 80 00 00 00 00 00
ff 00 00 00 80 00 00 00 ff ff 00 00 80 80 00 00
00 ff 00 00 00 80 00 00 00 ff ff 00 00 80 80 00
00 00 ff 00 00 00 80 00 ff 00 ff 00 80 00 80 00

সঙ্গে

ff ff ff 00 1e 1e 1e 00 d4 d4 d4 00 00 00 00 00
ff 00 00 00 26 4f 78 00 ff ff 00 00 d6 9d 85 00
00 ff 00 00 60 8b 4e 00 00 ff ff 00 00 80 80 00
00 00 ff 00 56 9c d6 00 ff 00 ff 00 9f 74 b1 00

তারপরে শীর্ষে ফিরে আসুন এবং দ্বিতীয় ঘটনাটি প্রতিস্থাপন করুন

00 00 00 00 00 00 80 00 00 80 00 00 00 80 80 00
80 00 00 00 80 00 80 00 80 80 00 00 c0 c0 c0 00
80 80 80 00 00 00 ff 00 00 ff 00 00 00 ff ff 00
ff 00 00 00 ff 00 ff 00 ff ff 00 00 ff ff ff 00

সঙ্গে 

00 00 00 00 56 9c d6 00 60 8b 4e 00 d6 9d 85 00
26 4f 78 00 9f 74 b1 00 d6 9d 85 00 1e 1e 1e 00
d4 d4 d4 00 00 00 ff 00 00 ff 00 00 00 ff ff 00
ff 00 00 00 ff 00 ff 00 ff ff 00 00 ff ff ff 00

তারপরে নিবন্ধে নিম্নলিখিতটি সংশোধন করুন

(For VBA)
HKEY_CURRENT_USER\Software\Microsoft\VBA\6.0\Common    
HKEY_CURRENT_USER\Software\Microsoft\VBA\7.1\Common

(For VB6)
HKEY_CURRENT_USER\Software\Microsoft\VBA\Microsoft Visual Basic 

FontFace = 'Consolas'
CodeForeColors = '8 3 5 4 1 10 14 3 4 4 0 0 0 0 0 0 '
CodeBackColors = '2 6 4 8 10 2 2 2 16 10 11 12 13 14 15 0 '

আপনি যদি ভিবিএর জন্য সংশোধন করে থাকেন তবে আপনি হয়ে গেছেন, ভিবি 6 এর জন্য এখন আপনার হেক্স সম্পাদকটিতে 'ভিবি 6.এক্সি' খুলুন এবং এর প্রথম উপস্থিতিটি সংশোধন করুন

00 00 00 00 00 00 80 00 00 80 00 00 00 80 80 00
80 00 00 00 80 00 80 00 80 80 00 00 c0 c0 c0 00
80 80 80 00 00 00 ff 00 00 ff 00 00 00 ff ff 00
ff 00 00 00 ff 00 ff 00 ff ff 00 00 ff ff ff 00

সঙ্গে

00 00 00 00 56 9c d6 00 60 8b 4e 00 d6 9d 85 00
26 4f 78 00 9f 74 b1 00 d6 9d 85 00 1e 1e 1e 00
d4 d4 d4 00 00 00 ff 00 00 ff 00 00 00 ff ff 00
ff 00 00 00 ff 00 ff 00 ff ff 00 00 ff ff ff 00

এটি ভিবি 6 এর ইন্টারফেসে প্রদর্শিত রঙটিকে সংশোধন করে যাতে আপনি যদি রঙগুলিতে অন্যান্য পরিবর্তন করতে চান তবে।

অন্যান্য সমস্ত জবাবের জন্য আপনাকে ধন্যবাদ, আমি নিজেই এগুলি নিয়ে আসি নি কেবল মনে করলাম কোনও একক পোস্টে প্রয়োজনীয় সমস্ত তথ্য থাকা দরকারী (আমি কোথাও VB6.exe এবং VBA6.dll সংশোধন করতে দেখিনি)। এই পদ্ধতিটি ব্যবহার করে আপনার উপলভ্য রংগুলি অবাধে নির্বাচন করতে সক্ষম হওয়া উচিত।

আমি অন্যান্য উত্তরগুলির মধ্যে থেকে রঙগুলিও পুনরায় সাজিয়েছি যাতে ভিবিআরড, ভিবি ব্লু, ভিবিওয়াইট ইত্যাদি পরিবর্তন না করে যাতে আপনার কোডটিতে এখনও পছন্দসই ফলাফল পাওয়া উচিত। এটি সম্পূর্ণরূপে পরীক্ষা করা হয়নি যাতে সর্বদা আপনার নিজের ঝুঁকিতে প্রোগ্রামগুলি সংশোধন করে।

এটি একটি ছোট প্রোগ্রাম একসাথে রাখা ভাল হবে যা আপনার জন্য এটি করবে (গ্যালাক্স যেমন করেছে), আমার কাছে রেজিস্ট্রি এবং VB6 আইডিই সেই প্রোগ্রামটি ব্যবহার করে লেখার সমস্যা ছিল, এবং আসুন পূর্বরূপ উইন্ডোটি সুন্দর হবে।

সীমাবদ্ধতাগুলি আমি খুঁজে পেয়েছি: এটি সূচক আইকনের রঙ পরিবর্তন করে না, আপনাকে এটি নিজেই করতে হবে।

— স্যাম
সূত্র
2

ডানিসলে এর প্রতিক্রিয়া (যেখানে তিনি জিজ্ঞাসা করেন যে কেউ কোনও অ্যাড-ইন করতে পারে কিনা) থেকে টোপটি নেওয়া, আমি ভিবি 6 এর জন্য একটি অ্যাড-ইন করেছি। এটি কিছুটা অশোধিত (এবং আমি শীঘ্রই ব্যাখ্যা করব) তবে এটি কাজটি করে।

আমি ভিবি 6-তে একটি নতুন অ্যাড-ইন প্রকল্প তৈরি করেছি যা আমাকে ডিফল্ট "frmAddin" ফর্ম (যা আমি ব্যবহার করি না) এবং "কানেক্ট" ডিজাইনার দিয়েছি। আমি নিজে একটি রঙের ক্লাস যুক্ত করেছি যাতে নিম্নলিখিতটি রয়েছে:

অপশন সুস্পষ্ট

ধীর মি_আইফোরকাল হিসাবে পূর্ণসংখ্যা হিসাবে
ধীর মি_আইব্যাক কালার পূর্ণসংখ্যা হিসাবে
ধীর মি_আইআইডিকেটর কালার হিসাবে পূর্ণসংখ্যা হিসাবে

জনসাধারণের সম্পত্তি ফোরকুলার (বাইওয়াল আইআইডি পূর্ণসংখ্যা হিসাবে)
    m_iForeColour = iID
শেষ সম্পত্তি
সর্বজনীন সম্পত্তি পূর্ণসংখ্যা হিসাবে পূর্বাভাস পান ()
    ফোরকলার = মি_আইফোরকলর
শেষ সম্পত্তি

সর্বজনীন সম্পত্তি ব্যাক কালর (ব্যাকওয়াল আইআইডি পূর্ণসংখ্যা হিসাবে)
    m_iBackColour = iID
শেষ সম্পত্তি
সর্বজনীন সম্পত্তি পূর্ণসংখ্যা হিসাবে ব্যাক কালার () পান
    ব্যাককালার = মি_আইব্যাক কালার
শেষ সম্পত্তি

সর্বজনীন সম্পত্তি ইনডিকেটর কলর (বাইওয়াল আইআইডি পূর্ণসংখ্যা হিসাবে)
    m_iIndicator Colour = iID
শেষ সম্পত্তি
সর্বজনীন সম্পত্তি ইনডিকেটর কলর () হিসাবে পূর্ণসংখ্যা হিসাবে পান
    সূচক রঙ = m_iIndicator Colour
শেষ সম্পত্তি

এবং তারপরে আমি "সংযুক্ত" ডিজাইনার কোডটি নিম্নরূপে সংশোধন করেছি:

অপশন সুস্পষ্ট

বুলিয়ান হিসাবে সর্বজনীন ফর্ম প্রদর্শন করুন
VBIDE.VBE হিসাবে সর্বজনীন VBInstance
Dim mcbMenuCommandBar হিসাবে Office.CommandBarControl
মিমফ্রিমএডডিন নতুন ফ্রমএডডইন হিসাবে
কমান্ডবারভেন্টস কমান্ড বার ইভেন্ট হ্যান্ডলার হিসাবে সর্বজনীন উইভেনভেস্টস মেনুহ্যান্ডলার

অফিস.কম্যান্ডবারকন্ট্রোল হিসাবে মিমি এমসিবি টুলবার
কমান্ডবার্ভেন্টস হিসাবে মেনুহ্যান্ডলার 2 উইথ এভেন্টস পাবলিক

রঙ হিসাবে ম্লান কোডকালস ()

'************************************************* ****************************
'রানস্ক্রিপ্ট সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'কোডটি চালায় যা কোড উইন্ডোটির জন্য প্রয়োজনীয় রঙগুলি সেট করে
'সক্রিয় আইডিই।
'*** এই প্রকল্পটি সত্যই কাজ করার আগে একটি প্রকল্প অবশ্যই লোড করা উচিত ***
'************************************************* ****************************
সাব রানস্ক্রিপ্ট ()
    ReadColoursFile

    'সরঞ্জামসমূহ> বিকল্প নির্বাচন করুন
    সেন্ডকিগুলি "% থেকে", 5
    'ট্যাবগুলিতে যান, "বিকল্পগুলি" নির্বাচন করুন
    সেন্ডকিগুলি "+ AB ট্যাব}"
    সেন্ডকিগুলি "{সঠিক}"

    'তালিকা বাক্স নির্বাচন করুন
    সেন্ডকিস "{ট্যাব}"

    রঙ হিসাবে ধীর কলরসেটিং
    ইন্টিজার হিসাবে ম্লান আইক্লুর

    আইকালোর জন্য = 0 থেকে 9
        সেটকলারস আইকলর, কোডকালস (আইকলর)
    পরবর্তী আইকালর

    সেন্ডকিস "~"
শেষ সাব

'************************************************* ****************************
'রিডকলার্সফিল সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'ডিস্ক থেকে রঙিন ফাইলটি পড়ে এবং কোডকালার্স অ্যারেকে পপুলেট করে
'থেকে সঠিক রঙ নির্বাচন করার জন্য সেটকলার * পদ্ধতি দ্বারা ব্যবহৃত হয়
'অপশন স্ক্রিন।
'************************************************* ****************************
সাব রিডক্লোরসফায়ার ()
    ডিম স্ট্রিং হিসাবে কলরলাইন
    ডিমিং কলারআরে () স্ট্রিং হিসাবে
    রঙ হিসাবে ধীর কলরসেটিং
    ফাইলসিস্টেমোবজেক্ট হিসাবে ডিএমএস ওএসও করুন

    ওএফএসও = নতুন ফাইলসিসটেমবজেক্ট সেট করুন

    যদি oFSO.FileExists (App.Path & "B VB6CodeColours.dat") না হয় তবে
        MsgBox "VB6Code Colours.dat পাওয়া যায় নি" এবং অ্যাপ.প্যাথ, vbOKOnly, "VB6 কোডক্লোর সেটিংস ফাইল পাওয়া যায় নি!"
        প্রস্থান করুন
    যদি শেষ

    OFSO = কিছু না সেট করুন

    # 1 হিসাবে ইনপুট জন্য অ্যাপ.পথ এবং "B ভিবি 6 কোড কোডর্স.ড্যাট" খুলুন
    রঙিন হিসাবে পুনর্নির্মাণ কোডকলারস (9)

    ইওএফ না থাকাকালীন (1)
        লাইন ইনপুট # 1, কলরলাইন
        কলরআরে = স্প্লিট (কলরলাইন, ",")

        যদি ইসনুমারিক (কালারআরে (0)) থাকে তবে
            যদি কোডকলারস (কলরআরে (0)) তখন কিছুই হয় না
                কলরসেটিং = নতুন রঙ সেট করুন

                যদি ইসনুমারিক (কালারআরে (1)) থাকে তবে
                    কলরসেটিং.ফোরকলর = সিন্ট (কলারআরে (1))
                যদি শেষ

                যদি ইসনুমারিক (কালারআরে (2)) থাকে তবে
                    colourSetting.BackColour = CInt (কলারআরে (2))
                যদি শেষ

                যদি ইসনুমারিক (কালারআরে (3)) থাকে তবে
                    colourSetting.Indicator Colour = CInt (colourArray (3))
                যদি শেষ

                কোডকলারস সেট করুন (কলরআরে (0)) = কলরসেটিং
            যদি শেষ
        যদি শেষ
    পথ চলা

    বন্ধ # 1

    কলর সেটটিং = কিছুই না Set
শেষ সাব

'************************************************* ****************************
'সেটকলার্স সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'তালিকা থেকে বর্ণ আইটেম নির্বাচন করে এবং তারপরে রঙ নির্বাচনকারীকে পুনরাবৃত্তি করে
'আইটেমটির সাথে সম্পর্কিত নিয়ন্ত্রণগুলি এবং মান অনুসারে সেট করে
'ভিবি 6 কোড কোডার্স.ড্যাট ফাইলটিতে সেট করুন।
'************************************************* ****************************
উপ সেটকলারস (বাইওয়াল আইক্লোর পূর্ণসংখ্যা হিসাবে, বাইরফ রঙ হিসাবে রঙিনসেটিং)
    ইমেজার হিসাবে ডিমে আইকি

    সেন্ডকিস "OME হোম}"

    আইকিএর জন্য = 1 আইক্লোরের জন্য
        সেন্ডকিগুলি "OW ডাউন}"
    পরবর্তী আইকি

    সেটকলারসিলিেক্টর কালারসেটিং.ফোরকালআর
    সেটকলারসিলিটর কলরসেটিং.ব্যাক কলর
    সেটকলারসিলিেক্টর কলরসেটিং.ইন্ডিকেশনর কলর

    সেন্ডকিগুলি "+ AB ট্যাব}"
    সেন্ডকিগুলি "+ AB ট্যাব}"
    সেন্ডকিগুলি "+ AB ট্যাব}"
শেষ সাব

'************************************************* ****************************
'সেটকলার নির্বাচনকারী সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'নির্বাচক কম্বোতে রঙ সেট করে। ধরে নিই ফোকাসটির দিকে রয়েছে
কোড চালানোর আগে নিয়ন্ত্রণের প্রিরিডিং (প্রথম লাইনের ট্যাবগুলিতে
'ধরে নেওয়া নিয়ন্ত্রণ)।
'************************************************* ****************************
উপ সেটকলার নির্বাচনকারী (বাইওয়াল আইক্লোর পূর্ণসংখ্যা হিসাবে)
    ইমেজার হিসাবে ডিমে আইকি

    সেন্ডকিস "{ট্যাব}"
    সেন্ডকিস "OME হোম}"

    আইকিএর জন্য = 1 আইক্লোরের জন্য
        সেন্ডকিগুলি "OW ডাউন}"
    পরবর্তী আইকি
শেষ সাব

'************************************************* ****************************
'AddinInstance_OnConnication সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'অ্যাডিন আইডিই দ্বারা লোড হওয়ার পরে এই পদ্ধতিটি চলে
'************************************************* ****************************
প্রাইভেট সাব অ্যাডইনস্ট্যান্স_অনেকশন (অবজেক্ট হিসাবে বাইভাল অ্যাপ্লিকেশন, অ্যাডআইনডিজাইনরঅবজেক্টস.সেক্সট_কানেক্টমোড হিসাবে বাইভাল কানেক্টমোড, অবজেক্ট হিসাবে বাইভাল অ্যাডইনস্টাইন, কাস্টম () ভেরিয়েন্ট হিসাবে)
    ত্রুটিতে GoTo এ ত্রুটিহান্ডলার

    'ভিবি উদাহরণ সংরক্ষণ করুন
    VBInstance = অ্যাপ্লিকেশন সেট করুন

    যদি কানেক্টমোড এক্সট_মিটার_আসটার্নাল হয়
        এমসিবিমেনুকম্যান্ডবার সেট করুন = অ্যাডটোএডডইনকমন্ডবার ("ভিবি 6 কোড রঙিন")
        'ইভেন্ট ডুবুন
        Me.MenuHandler = VBInstance.Events.CommandBarEvents (mcbMenuCommandBar) সেট করুন

        দিম oStdToolbar হিসাবে অফিস.কমন্ডবার
        অফিস.কমন্ডবারকন্ট্রোল হিসাবে ডিমে ওএসডিটিউলবার আইটেম

        OStdToolbar = VBInstance.CommandBars ("স্ট্যান্ডার্ড") সেট করুন
        OStdToolbarItem = oStdToolbar.Controls.Add সেট করুন (প্রকার: = msoControlButton)
        oStdToolbarItem.Style = msoButtonCaption
        oStdToolbarItem.Caption = "আইডিই রং সেট করুন"
        oStdToolbarItem.BeginGroup = সত্য
        Me.MenuHandler2 = VBInstance.Events.CommandBarEvents (oStdToolbarItem) সেট করুন
    যদি শেষ

    প্রস্থান করুন
ErrorHandler:
    MsgBox এরার বিবরণ
শেষ সাব

'************************************************* ****************************
'অ্যাডিনইনস্ট্যান্স_অনস্পর্ক সংযোগ সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'আইডিই দ্বারা অ্যাডিনটি সরানো হয় এবং কোনও পরিষ্কার হয়ে যায় তখন এই পদ্ধতিটি চলে
'রেফারেন্স ইত্যাদি।
'************************************************* ****************************
প্রাইভেট সাব অ্যাডইনস্ট্যান্স_অনডিসকনেকশন (বাইডাল সরানমোড হিসাবে অ্যাডইনডিজাইনরঅবজেক্টস.সেক্সট_ডিসকনেক্টমোড, কাস্টম () ভেরিয়েন্ট হিসাবে)
    ত্রুটি পুনরায় শুরু করার পরে

    'কমান্ড বার এন্ট্রি মুছুন
    mcbMenuCommandBar.Delete

    'অ্যাড-ইন বন্ধ করুন
    যদি ফর্মডিপ্লাই করে থাকে তবে
        SaveSetting App.Title, "সেটিংস", "DisplayOnConnect", "1"
        ফর্মডিসপ্লেড = ভুয়া
    আর
        SaveSetting App.Title, "সেটিংস", "DisplayOnConnect", "0"
    যদি শেষ

    MfrmAddIn আনলোড করুন
    MfrmAddIn = কিছুই না সেট করুন

    মেনুহ্যান্ডলার সেট করুন = কিছুই নয়
    মেনুহ্যান্ডলার 2 = কিছুই সেট করুন
শেষ সাব

'************************************************* ****************************
'মেনুহ্যান্ডলার_ ক্লিক সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'মেনু আইটেমটি ক্লিক করা হলে এই পদ্ধতিটি প্রয়োজনীয় কাজগুলি সম্পাদন করে।
'************************************************* ****************************
প্রাইভেট সাব মেনু হ্যান্ডলার_ক্লিক (বাইওয়াল কমান্ডবার বারকন্ট্রোল অব অবজেক্ট, বুলিয়ান হিসাবে পরিচালনা করা, বুলিয়ান হিসাবে বাতিল ডিফল্ট)
    RunScript
শেষ সাব

'************************************************* ****************************
'মেনুহ্যান্ডলার 2_স্লিক ক্লিক করুন
'------------------------------------------------- ----------------------------
'বর্ণনা:
'টুলবার বোতামটি ক্লিক করা হলে এই পদ্ধতিটি প্রয়োজনীয় কাজগুলি সম্পাদন করে।
'************************************************* ****************************
ব্যক্তিগত সাব মেনু হ্যান্ডলার 2_ ক্লিক করুন (বাইভাল কমান্ডবার বারকন্ট্রোল অব অবজেক্ট, বুলিয়ান হিসাবে পরিচালনা করা, বুলিয়ান হিসাবে বাতিল ডিফল্ট)
    RunScript
শেষ সাব

'************************************************* ****************************
'AddToAddInCommandBar সাব
'------------------------------------------------- ----------------------------
'বর্ণনা:
'মেনু তালিকায় নির্দিষ্ট আইটেম যুক্ত করে।
'************************************************* ****************************
অফিস.কমন্ডবারকন্ট্রোল হিসাবে ফাংশন অ্যাডটোএডডইনকম্যান্ডবার (স্ট্রিং হিসাবে এস ক্যাপশন)
    Dim cbMenuCommandBar হিসাবে Office.CommandBarControl 'কমান্ড বার অবজেক্ট
    অবজেক্ট হিসাবে ডিবি সিবিমেনু

    ত্রুটি পুনরায় শুরু করার পরে

    'দেখুন আমরা অ্যাড-ইন মেনু পেতে পারি কিনা
    সিবিমেনু = ভিবিআইএনস্ট্যানস.কম্যান্ডবারস সেট করুন ("অ্যাড-ইনস")
    সিবিম্যানু যদি কিছু হয় না তবে
        'উপলব্ধ নেই তাই আমরা ব্যর্থ হই
        প্রস্থান প্রস্থান
    যদি শেষ

    ত্রুটিতে GoTo এ ত্রুটিহান্ডলার

    কমান্ড বারে এটি যুক্ত করুন
    সিবিমেনুকম্যান্ডবার সেট করুন = সিবিমেনু.কন্ট্রোলস.এড করুন (1)
    'ক্যাপশন সেট করুন
    cbMenuCommandBar.Caption = sCaption

    AddToAddInCommandBar = cbMenuCommandBar সেট করুন

    প্রস্থান প্রস্থান
ErrorHandler:
    'দয়া করে প্রস্থান করুন
ফাংশন শেষ

এই কোডটি অ্যাপ্লিকেশনটিকে একটি ফাইল থেকে আমার রঙগুলি পড়ার অনুমতি দেয় যা .dll (VB6CodeColours.dat নামে পরিচিত) একই ডিরেক্টরিতে থাকে। এই ফাইলটিতে নিম্নলিখিতগুলি রয়েছে (এবং আপনি ভিবি 6.এক্সইএতে কোন রঙগুলি প্রতিস্থাপন করবেন তার উপর ভিত্তি করে এটি পৃথক হবে সুতরাং একটি সরল অনুলিপি এবং পেস্ট সম্ভবত কাজ করবে না।

0,14,12,0
1,0,0,0
2,16,13,0
3,0,15,15
4,16,5,5
5,7,12,0
6,11,12,0
7,8,12,0
8,16,10,10
9,16,3,3

জিব্রিশ মনে হচ্ছে, তবে আমি ব্যাখ্যা করব। এতে "কোড কালার", "ফোরগ্রাউন্ড", "ব্যাকগ্রাউন্ড", ইনডিকেটর "ফর্ম্যাট রয়েছে তাই শীর্ষ সারিতে" স্বাভাবিক পাঠ্য "সেট করবে ফোরগ্রাউন্ডের কম্বোয়ের 14 তম আইটেমটিতে, পটভূমির জন্য দ্বাদশ এবং সূচকটির জন্য প্রথম হবে ।

কেন আমি বললাম এটি একটি দুর্দান্ত অশোধিত সমাধান: * এটি সেন্ডকি ব্যবহার করে। সেখানে আর কোনও ব্যাখ্যার দরকার নেই আমি নিশ্চিত :) * কার্যকর হওয়ার জন্য ব্যবহারকারীকে মেনু / সরঞ্জামদণ্ড বিকল্পটি ক্লিক করতে হবে। * কোডটি সুনির্দিষ্টভাবে কাঠামোগত নয় (আমার মতে) তবে সেই সময়টিতে আমি যে পরিমাণ সময় উত্সর্গ করতে পারি তার উপর ভিত্তি করে ছিল। আমি ভবিষ্যতে এটির উন্নতি করার লক্ষ্য রেখেছি, তবে বর্তমান অবস্থায় এটি আমার পক্ষে ভাল কাজ করে (তাই আমি সম্ভবত এটি ছেড়ে যাব!)

সম্ভবত একটি ভিত্তি সহ, কেউ এর উপর আরও প্রসারিত করতে পারে।

— jonifen
সূত্র
2

আপনার রঙ নির্বাচন স্থায়ী রাখার কৌশল এখানে। আরও কিছুটা হেক্স সম্পাদনা। আপনি যদি বন্ডের প্রস্তাবিত প্রতিস্থাপন করেন তবে আপনার হাতে নিম্নলিখিতটি থাকা উচিত: বেসিক (ক্লাসিক) 16 টির জন্য 0 থেকে 15 এর সূচকযুক্ত আরজিবিএ মানগুলি এবং আপনার কাস্টম রঙগুলির জন্য আরজিবিএ মান একইভাবে সূচিত হয়। নীচের সূচির ক্রম অনুসারে "ক্লাসিক" আরজিবিএ মানগুলি থেকে তৈরি বাইট সিকোয়েন্সের জন্য এখন ভিবিএক্স.ডিএলএল অনুসন্ধান করুন: 15, 7, 8, 0, 12, 4, 14, 6, 10, 2, 11, 3, 9, 1 , 13, 5 (অর্থাত সাদা, ধূসর, গা dark় ধূসর, কালো, লাল, গা dark় লাল ইত্যাদি)। নিদর্শনটি এলোমেলো নয়, এটি মান থেকে নেওয়া, রেজিস্ট্রিতে সঞ্চিত, টেক্স হেক্সের পোস্ট দেখুন। অনুসন্ধানের জন্য হেক্স স্ট্রিংটি দেখতে দেখতে 'এফএফএফএফএফএফএফ০০০০০০০০০৮০৮০০০০০০০০০০০০০ এফএফ০০০০০০ ...' ইত্যাদি মোট 64 বাইটের মতো হওয়া উচিত। "কাস্টম" রংগুলির আরজিবিএ মানগুলির সাথে পাওয়া বাইট সিকোয়েন্সটি প্রতিস্থাপন করুন, উদাহরণস্বরূপ, 15, 7, 8, ইত্যাদি Now ভাল, সব, কিন্তু "সূচক" রং। এগুলি সর্বদা ডিফল্টে রিসেট হয়। নোট:

  1. VBE7.DLL (MSO2010) এ আমি অফসেট 0x15A98C তে এইভাবে অর্ডার করা বাইটের কেবল একটি ক্রম পেয়েছি।
  2. বন্ডের পোস্টে উল্লিখিত হিসাবে প্রথম প্রতিস্থাপনের জন্য বেশ কয়েকটি বাইট সিকোয়েন্স রয়েছে (বেসিক আরজিবিএ মানগুলি 0 থেকে 15 পর্যন্ত সরাসরি অর্ডার করা হয়)। আমি কেবল একটি পরিবর্তন করেছি, পূর্ববর্তী নোট থেকে অফসেটের নিকটতম (0x15A5AC এ পাওয়া গেছে)।
  3. সর্বোপরি আপনি নিজের ঝুঁকিতে করছেন :) এবং ব্যাকআপ নিতে ভুলবেন না।

প্রাথমিক গবেষণার জন্য টেক্স হেক্স এবং বন্ডকে ধন্যবাদ ।

ইউপিডি: MSO2007 (VBE6.DLL) এবং MSO2013 (VBE7.DLL) দিয়ে পরীক্ষিত। কবজির মতো কাজ করুন।

— দিন
সূত্র
2

বন্ডের সমাধান (VB6.exe রঙের টেবিল সম্পাদনা করা) VB6 আইডিইতে রঙ টেবিলটি পরিবর্তন করার জন্য পুরোপুরি কাজ করে। তবে, আমি দেখেছি যে কোনও পরিবর্তিত রঙ নির্বাচন করা হয় এবং ভিবি 6 বন্ধ হয়ে গেলে, ভিবি 6 রেজিস্ট্রিতে পরিবর্তিত রঙটি সঠিকভাবে সংরক্ষণ করতে সক্ষম হয় না।

সাধারণত, ভিবি 6 প্রতিটি পাঠ্য আইটেমের রঙ পরিবর্তন করতে পারে তার জন্য 16-মান রঙের টেবিলের মধ্যে একটি সূচক লিখবে।

রঙ সূচকগুলি এখানে রেজিস্ট্রিতে লেখা হয়:

HKEY_CURRENT_USER\Software\Microsoft\VBA\Microsoft Visual Basic\CodeForeColors
HKEY_CURRENT_USER\Software\Microsoft\VBA\Microsoft Visual Basic\CodeBackColors

উদাহরণস্বরূপ, কোডফোরাল্যান্ড মানটি এরকম কিছু দেখবে:

6 14 5 0 1 3 13 4 15 0 0 0 0 0 0 0

1 থেকে 16 এর মানগুলি রঙ টেবিলের একটি রঙকে উপস্থাপন করে এবং 0 এর অর্থ 'অটো'।

যাইহোক, যখন কোনও পরিবর্তিত রঙ নির্বাচন করা হয়, তখন ভিবি 6 রেজিস্ট্রিতে সূচি সীমার বাইরে একটি সংখ্যা লিখবে এবং কোডফোরালিয়ান মানটি এর মতো দেখতে পাবেন:

5245006 14 5 0 1 3 13 4 15 0 0 0 0 0 0 0

পরের বার ভিবি 6 শুরু হওয়ার পরে এটি পরিবর্তিত রঙে সেট করা আইটেমটির জন্য সঠিক রঙ সেট করতে সক্ষম হবে না।

আমি এখনও একটি সমাধান বের করার চেষ্টা করছি তবে আমি এ পর্যন্ত যা খুঁজে পেয়েছি তা পোস্ট করতে চাই।

— ravanbak
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.