1

голосов
0

ответ
54

Просмотры

В Access 2007, как я могу изменить * Design View * Вкладка порядок управления ..?

Там в океан веб-страниц, которые объясняют, как изменить порядок табуляции в Access 2007 формы контроля, как они функционируют в форме представления. Но ... может вкладка порядок управления быть изменен, как они функционируют в режиме конструктора ..? Я клавиатура урод и предпочитаю вкладки с помощью элементов управления в режиме конструктора, а также использовать клавиатуру как можно больше, чтобы настроить свойство элемента управления. Но в сложных формах с большим количеством элементов управления, отсутствие очевидной табуляции может раздражать. Я сейчас работаю в форме с более чем 50 управлением, и если бы я мог табуляцию через них в любом виде узнаваемого того, было бы весьма признателен.
spinjector
1

голосов
1

ответ
112

Просмотры

Кэшируются где DB2 определяемые пользователем функции, даже если его уронить и создал еще раз ..?

Я работаю на старой системе DB2 AS / 400 с v6r1m0 и Navigator v7r1m0 на Windows, 7х64. Сегодня я создал свой первый UDF в этой системе, но быстро понял, что-то не работает, как ожидалось. Если я бросаю эту функцию, внести изменения, а затем создать его снова ... возвращаемое значение не меняется. Это как если компилируется код, который кэшированные / зеркальную / сохранены где-то ... даже при падении. После падения / изменения / создания, если я иду в дереве схемы в навигаторе и Генерирование SQL функции, я вижу новые изменения. Но значение, возвращаемое функцией является то, что от предыдущей версии SQL. Рассмотрим следующие строки SQL, все созданные и запустить в окне Navigator SQL. Когда это будет работать, открыты два результата вкладки, но возвращенное значение в обоих окнах одно и то же. Оба результата «Y»; " никогда не появится N». Что тут происходит? Есть ли проблема с этим сервером / дб / подключение / и т.д., или (что более вероятно) есть какая-то какой-то основной принцип в игре, что я знал о ...? CREATE FUNCTION CERTODB.TESTME () возвращает VARCHAR (1) LANGUAGE SQL DETERMINISTIC внешнего действия ПРИЗВАЛ NULL INPUT НАЧАТЬ RETURN 'Y'; - ИЗМЕНЕНИЯ НИЖЕ END; ВЫБОР CERTODB.TESTME () из SYSIBM.SYSDUMMY1; - ВОЗВРАТ 'Y' DROP FUNCTION CERTODB.TESTME; CREATE FUNCTION CERTODB.TESTME () возвращает VARCHAR (1) Язык SQL DETERMINISTIC внешнего действия Призвали NULL INPUT НАЧАТЬ RETURN 'N'; - значение было изменено END; ВЫБОР CERTODB.TESTME () из SYSIBM.SYSDUMMY1; - все равно возвращается 'Y' .. !! здесь происходит? Есть ли проблема с этим сервером / дб / подключение / и т.д., или (что более вероятно) есть какая-то какой-то основной принцип в игре, что я знал о ...? CREATE FUNCTION CERTODB.TESTME () возвращает VARCHAR (1) LANGUAGE SQL DETERMINISTIC внешнего действия ПРИЗВАЛ NULL INPUT НАЧАТЬ RETURN 'Y'; - ИЗМЕНЕНИЯ НИЖЕ END; ВЫБОР CERTODB.TESTME () из SYSIBM.SYSDUMMY1; - ВОЗВРАТ 'Y' DROP FUNCTION CERTODB.TESTME; CREATE FUNCTION CERTODB.TESTME () возвращает VARCHAR (1) Язык SQL DETERMINISTIC внешнего действия Призвали NULL INPUT НАЧАТЬ RETURN 'N'; - значение было изменено END; ВЫБОР CERTODB.TESTME () из SYSIBM.SYSDUMMY1; - все равно возвращается 'Y' .. !! здесь происходит? Есть ли проблема с этим сервером / дб / подключение / и т.д., или (что более вероятно) есть какая-то какой-то основной принцип в игре, что я знал о ...? CREATE FUNCTION CERTODB.TESTME () возвращает VARCHAR (1) LANGUAGE SQL DETERMINISTIC внешнего действия ПРИЗВАЛ NULL INPUT НАЧАТЬ RETURN 'Y'; - ИЗМЕНЕНИЯ НИЖЕ END; ВЫБОР CERTODB.TESTME () из SYSIBM.SYSDUMMY1; - ВОЗВРАТ 'Y' DROP FUNCTION CERTODB.TESTME; CREATE FUNCTION CERTODB.TESTME () возвращает VARCHAR (1) Язык SQL DETERMINISTIC внешнего действия Призвали NULL INPUT НАЧАТЬ RETURN 'N'; - значение было изменено END; ВЫБОР CERTODB.TESTME () из SYSIBM.SYSDUMMY1; - все равно возвращается 'Y' .. !!
spinjector
1

голосов
1

ответ
32

Просмотры

Подавить 2007 сообщений Excel «Получение данных ...» при импорте из ODBC ..?

В Excel 2007, при импорте данных с помощью SQL / ODBC, он отображает сообщение «Получение данных» в верхней левой ячейке диапазона импорта. Это происходит ли запрос работать с GUI или VBA. Может ли это сообщение подавляться .. ??? Там, кажется, нет никаких настроек для него, либо в графическом интерфейсе пользователя или свойств объекта VBA в WorkbookConnection, OdbcConnection, ListObject или QueryTable. Я хотел бы создать настраиваемое сообщение «Пожалуйста, подождите» с анимацией, но сообщение «Получение данных» создает визуальный конфликт. Я попытался следующие, но не подавляет сообщение: xl.ScreenUpdating = False xl.DisplayAlerts = False ExternalData_1: Получение данных ...
spinjector
1

голосов
2

ответ
144

Просмотры

Ключи командной строки для CWBTF.EXE ака Передача данных от IBM я ..?

Я хотел бы добавить Редактировать действие в контекстном меню правой кнопки мыши для IBM * .DTF файлы в моем реестре Windows. Какие командные строки переключателей для CWBTF.EXE ..? Есть переключатель для «открытого файла DTF для редактирования» (но не запускать его) ..? Я искал Google, StackOverflow, и в IBM я +7,3 документации для любого упоминания командной строки для CWBTF.EXE ака «Передача данных от IBM я», но я не нашел ни одного. Ярлык на моем меню Пуск Windows для «Передача данных от IBM я» имеет переключатель / т, но я не могу найти какую-либо информацию по этому вопросу. Я нашел перенос командной строки утилиту RTOPCB.EXE, которая имеет некоторые /? текст справки, но варианты, похоже, не относятся к большому полной GUI версии CWBTF.EXE.
spinjector
1

голосов
1

ответ
38

Просмотры

В VB.Net, как я могу создать метод, который ожидает переменное количество асинхронных вызовов для завершения, а затем возвращает результат?

Как можно закодировать метод в VB.Net 2012, что ждет переменное число асинхронных вызовов для завершения, и только тогда, когда все вызовы закончить, то будет возвращать результат? Я пишу приложение, которое извлекает значение из различных веб-страниц, а затем возвращает сумму этих значений. Число значений для извлечения будет определяться пользователем во время выполнения. Как веб-поиска является асинхронным по своей природе, я пытаюсь сделать приложение более эффективным путем кодирования его в качестве такового. Я только что прочитал о ключевых словах Async и ЖДИТЕ, которые, кажется идеально подходит для работы. Я также нашел этот пример того, как сделать это в C #: Запуск два задач асинхронных параллельно и сбор результатов в .NET 4.5. Но есть две проблемы, связанные с этим, например: 1) На первый взгляд, я не знаю, как сделать то же самое произойдет в VB.Net, и 2) Я не» знаю, как это может быть изменено, чтобы обрабатывать переменное число называемых задач. Вот псевдо-перевод из примера, что я надеюсь, что для достижения: Функция GetSumOfValues ​​(п, как Integer) Для я = 1 п GetValueAsync.Start () Далее я дим результат = Await Task.WhenAll (GetValueAsync
spinjector
1

голосов
2

ответ
1.2k

Просмотры

Как Microsoft Access будет перезапущен с VBA ... внутри Microsoft Access ..?

Как я могу использовать VBA, чтобы перезапустить Microsoft Access 2007 из того же файла DB .. ?? Я занимаюсь разработкой БД, которая в конечном итоге будет упакованная и распределенная с исполняемым. Для развития я меняю различные настройки пользовательского интерфейса, а также переименовать файл обратно и вперед между * .accdb и * .accdr. Но я хотел бы использовать полностью программный метод, который я бы затем назначить на кнопку или нажатие клавиши. Но, как любой, кто пытался может сказать вам, один не может легко использовать VBA для перезагрузки доступа внутри одной и той же БД. Я попробовал код здесь: MS Access: как уплотнить текущую базу данных в VBA, но я получил сообщение об ошибке «Вы не можете уплотнить открытую базу данных, запустив макрос или Visual Basic код.» У меня есть различные новоиспеченные идеи, как «подпрыгивать» рестарт от в VBS скрипт, CMD файл или другой файл ACCDB, но я хотел бы спросить, кто-то другой может сделать это успешно .. ?? Какие различные способы имеют другие сделали это с успехом .. ??
spinjector
1

голосов
2

ответ
382

Просмотры

Есть ли место для хранения VBA кода, который доступен для всех продуктов Microsoft Office ..?

Есть ли способ хранения исходного кода VBA, что общепринятые и доступно для всех продуктов Microsoft Office ..? У меня есть множество функций, которые я использую как в Access и Excel, а иногда даже Word. Я изменяю и добавить к функциям и модулям часто. Копирование, вставка и сохранение кода между проектами может стать утомительным, и я неизбежно проглядеть что-то. Я знаю, что я мог бы сделать что-то вроде написать класс / OCX / надстройку в VB6 или DotNet, скомпилировать его, и ссылаться на него в своих проектах VBA, но я надеялся на что-то более простое. Если есть способ хранения VBA кода в независимых файлах и открывать их с помощью VBA IDE в автономном режиме какого-то, это было бы выдающимся, но я знаю, что IDE не работает таким образом ... насколько Я знаю.
spinjector
0

голосов
0

ответ
12

Просмотры

Почему Microsoft Access Создание вложенных объединений ..?

Я использую Microsoft Access 2007. При переходе от проектирования до точки зрения SQL, я всегда нахожу объединение таблиц вложены. Почему он это делает? .. Это делает вещи настолько грязными, сложными и трудно читать. Я гугл ответы и искал здесь на SO, и я не могу найти дискуссии по данной теме. В тот день я понял, что это не должно быть так, ангелы пели, и мои навыки SQL сняли, как ракета. Я не пытался написать вложенными присоединиться к так, -except пару раз, когда они были соотнесены подзапросов.
spinjector
1

голосов
1

ответ
360

Просмотры

Преобразование или Cast из StringCollection в ObjectCollection?

Я хотел бы заполнить список с перечнем установленных принтеров в VB.NET. Это работает: Dim printerList Как System.Drawing.Printing.PrinterSettings.StringCollection printerList = System.Drawing.Printing.PrinterSettings.InstalledPrinters Для каждого PRINTERNAME В printerList ListBox1.Items.Add (PRINTERNAME) Далее это не работает: ListBox1.Items.AddRange (printerList) ... из-за следующей ошибки типа преобразования: Public Sub AddRange (значение Как System.Windows.Forms.ListBox.ObjectCollection) ': Значение типа „System.Drawing.Printing.PrinterSettings.StringCollection“ не могут быть преобразованы к 'System.Windows.Forms.ListBox.ObjectCollection. Можно ли сразу бросить один к другому для использования в AddRange (), как показано? Или цикл только (или наиболее эффективным) способом?
spinjector
1

голосов
1

ответ
64

Просмотры

Как программно получить доступ к Document Well в Visual Studio ..?

Я хотел бы написать простой Visual Studio Add-In для управления вкладкой в ​​документе Well. Есть много таких надстроек уже доступны, такие как Tabs Studio, Tidy вкладка, Visual Docs, и т.д., но я хотел бы попробовать себя. Где я могу найти документацию по программированию документа Ну .. ??? Я искал обширно в течение нескольких дней с помощью Google, и в файлах справки для VS и VSSDK, но я не могу найти какую-либо документацию о том, как получить доступ к Document Well. Я также рассмотрел различные шаблоны проектов под Visual Basic расширяемости и C # расширяемости, которые были добавлены VSSDK, но ни один из них не кажется, есть все, что связано с документом скважины. Я даже прыгнул в омут, и создал пустой проект и добавил ссылки на все DLL файлы, которые были установлены на VSSDK, а затем искал обозреватель объектов для каждого соответствующего слова или термина я мог думать, но все же я не мог найти ни имен, коллекции, или другие предметы, которые, кажется, имеют ничего общего с документом скважины. Я, кажется, полностью отсутствует или что-то недоразумение.
spinjector
1

голосов
1

ответ
346

Просмотры

VBA для создания и отправки электронной почты Outlook, а также отслеживать его через проект отправки / отправленного процесса / ..?

Я новичок в Outlook, VBA. Я хотел бы, чтобы следить за статусом по электронной почте, как она проходит через фазы и папки его жизненного цикла, через «Черновики», «Исходящие» и «Отправленные». Связанный с этим интересом представляет способность найти и доступ к существующей электронной почте, чтобы собрать данные свойства, такие как посланное время. Я начал с включенным блоком кода, но это не совсем работает. Как я быстро обнаружил, то Do Loop не может в данный момент электронная почта отправляется, так как переменная отсоединяется от электронной почты. Это приводит к ошибке во время выполнения «Элемент был перемещен или удален». Кроме того, есть странная деталь: Количество ошибок (Err.Number) меняется каждый раз, и мне интересно, что дизайн цель. Как я могу оставаться на связи с отправкой электронной почты, как они перемещаются через Черновики, Исходящие, Отправленные и .. ? Я вижу много упоминаний о переменном отсоединении от MailItem, но никаких решений, которые основаны на иерархии объектов и избежать позднего связывания не для решения этой проблемы. Я думал, что, возможно, было бы GUID или UUID, который идентифицирует сообщение, но, как указано в документации, все свойства, такие как EntryID может измениться, если элемент перемещается, и такие свойства не следует полагаться. Я полагаю, с более глубокое исследование, это имеет смысл, потому что электронная почта является только запись в таблице базы данных. И если вы дублировать / удаление записей между таблицами, информация может быть такой же или аналогичный, но номер записи, вероятно, не будет. Кроме того, что поражает другие ногти: то же сообщение может быть отправлено несколько раз, а также могут быть скопированы / вставить в разные папки, и даже на разные счета. Теперь то, что это уникальный или нет ..? Как SciFi клоны сказать, кто реально, и кто копия ..? Так, в стороне от пребывания «подключен» к электронной почте, какие свойства или методы могут быть использованы для ID один ..? Если нет «правильного» способа идентифицировать MailItem, как описано, единственной вещью, которую я могу думать о том, чтобы использовать существующий или пользовательское поле, как свойство «Tag» элементы управления OCX, чтобы вставить UUID. Некоторые компании используют этот вид техники, поставив / заказ / номер поддержки вызова в тему, чтобы потом легче отслеживать. Dim outlobj Как Outlook.Application Dim mailobj As Outlook.MailItem Set outlobj = Outlook.Application Set mailobj = outlobj.CreateItem (olMailItem) С mailobj .Recipients.Add "[email protected]" .Subject = "Невидимый Jet Плановое обслуживание Напоминание" .Body = «Ваши невидимые струи должны быть отполированы.» , Attachments.Add zipFilename .Display Пошлите End With Do «следующую строку не удается из-за электронной почты перемещения через Черновики, Исходящие, Отправленные и» в частности, среда выполнения Err.Num VBA каждый раз разное «как я сохранить переменную, связанную с перемещением цель? Если mailobj.Sent = False Тогда Сон 100 Else MsgBox «сообщение было отправлено.» «Другой код Exit Do End If Loop
spinjector
1

голосов
2

ответ
89

Просмотры

На бюро VBA 2007 MSForms UserForm, может группа управления перемещаются в полной группе ..?

У меня есть Office 2007 MSForms UserForm с сгруппированным управлением (в Word, но это будет также применяться к Excel и PowerPoint). Чтобы было ясно, что они не в контроле «кадров»; скорее, я использовал IDE функцию группы / разгруппировать сгруппировать их вместе. Я работаю над Form_Resize кода, и я хотел бы, чтобы переместить группу в качестве полной группы, вместо того, чтобы переместить все элементы управления по отдельности. Можно ли это сделать? Я не могу найти какой-либо «контрольной группы» объекта для обозначения. Я остановился код в режиме отладки и проверяется каждый пункт в себе. * И Me.Controls. *, И я не мог найти что-нибудь очевидное. Для того, чтобы снова коснуться управления кадрами, я нахожу, что я мог бы поставить элементы управления в кадре, без заголовка, фона, или границ, и, кажется, сработали. Но сгруппированная функция управления проще в использовании.
spinjector
1

голосов
3

ответ
121

Просмотры

In a VB.Net procedure declaration, specify an object parameter of multiple possible types?

При объявлении процедуры в VB.Net, где передаваемый параметр является объектом, можно указать несколько возможных типов объектов в «Оре» синтаксис? Например, я хочу передать один из «списка» элементов управления, поэтому процедура может получить доступ к коллекции .items. Но если я попытаюсь обобщить и указать параметр как Windows.Forms.Control, генерируется ошибка, потому что .Items не является членом объекта .Control. Я вижу упоминание о «Тип списка» в справочнике языка VB, и это, кажется, почти то, что я хочу, но не совсем. Вот некоторые фрагменты кода, чтобы продемонстрировать этот вопрос ... Друг Sub ListFill (_ ByRef SourceControl Как Windows.Forms.WebBrowser _ ByRef TargetControl Как Windows.Forms.Control) TargetControl.Items.Add (SourceControl.DocumentTitle) 'Ошибка: 'Предметы' не является членом «System.Windows.Forms.Control». В общем смысле, мне нужно синтаксис вроде этого ... Friend Sub имя (ByRef VarName As {типа1 Или типа2 Или ...} = DefaultValue) Но с точки зрения фактического рабочего кода, это, насколько я получил ... Друг Sub ListFill (_ ByRef SourceControl Как Windows.Forms.WebBrowser _ Дополнительное ByRef TargetControl Как Windows.Forms.ListBox = Ничего, _ Дополнительный ByRef TargetControl Как Windows.Forms.ComboBox = Nothing) 'Ошибка: Параметр уже объявлен с именем' TargetControl ». Можно ли это сделать? Друг Sub ListFill (_ ByRef SourceControl Как Windows.Forms.WebBrowser _ Дополнительное ByRef TargetControl Как Windows.Forms.ListBox = Ничего, _ Дополнительный ByRef TargetControl Как Windows.Forms.ComboBox = Nothing) 'Ошибка: Параметр уже объявлен с именем' TargetControl ». Можно ли это сделать? Друг Sub ListFill (_ ByRef SourceControl Как Windows.Forms.WebBrowser _ Дополнительное ByRef TargetControl Как Windows.Forms.ListBox = Ничего, _ Дополнительный ByRef TargetControl Как Windows.Forms.ComboBox = Nothing) 'Ошибка: Параметр уже объявлен с именем' TargetControl ». Можно ли это сделать?
spinjector
2

голосов
2

ответ
743

Просмотры

Java Indirect Access to Variables by Name at Runtime?

This question has multiple parts, and will all make sense in the last part: Is it possible to programmatically list any programmer-defined variables in a Java class at runtime..? I recently wrote a utility procedure in VB.Net that lists all the forms in my project by name, so I can pick one to run from a listbox (just for development purposes). With help from elsewhere on StackOverflow, I was able to pin the following bit of code together, and this example is pinned together even more for illustrative purposes... System.Reflection.Assembly.GetExecutingAssembly().DefinedTypes(n).BaseType.FullName Can something similar be done in Java to list variable names..? That being MyInteger, MyString, or MyObject, for example. It'd be like the function behind the "Locals" window in Visual Studio (but I'm using Eclipse for Java). Somewhere in the past 20 years, in another programming language, I came across a function called Indirect(String varname). It was used to access a primitive variable by name. And the 'varname' parameter could itself be a variable; it didn't have to be a literal. Here's an example showing its use: int N1, N2, N3; // N1, N2, & N3 are all zero for (int i = 1; i < 4; i++){ Indirect("N" + i.toString) = 100 } // N1, N2, & N3 are now all 100 Does Java have an equivalent to Indirect(), or is there a way to duplicate the same functionality..? To glue all this together, and the reason for this entire forum post, is that I have the following procedure that I've written for debugging purposes, that I drop into my classes to output variable values in CSV format during development... public String listVars(){ Object input[] = {var1, var2, var3, var4, var5}; // list of vars String output = ""; // output catcher int varCount = input.length; // get the length of the array for (int i = 0; i < varCount; i++){ // loop through the array output += "\"" + input[i] + "\""; // surround with quotes, append to output if (i < varCount-1){ // if the item NOT the last... output += ","; // append a comma to it } } return output; // return completed output } What I would like to do is automate the input to the Object array with code that automatically enumerates the variables, so I don't have to copy & paste them into the function. And I'm assuming that in so doing, they would need to be referred to indirectly once their names are determined, so their values can be accessed in code. PS - Filtering the variables by scope would be nice, such as 'private", 'super', , 'public', etc, but I know this may stretch it a bit too far. =-)
spinjector
1

голосов
3

ответ
197

Просмотры

In Microsoft Access, what are the relationships between CodeData, CodeProject, and DAO..?

Каковы различия между следующими наборами коллекций Microsoft Access VBA? .. Некоторые из них, кажется, указывают на те же объекты данных и детей, но с помощью различных каналов. Я имею в виду объектов DAO являются СУБД-специфической, но Access.⃰ Code.⃰ и Access.⃰ Project.⃰ нет, и подключиться через Access. Существует ADODB, что это еще один зверь полностью. Кроме того, кажется, что некоторые из коллекций не может существовать, если нет дочерних объектов этого типа. Учитывая упоминания особенностей SQL, кажется, есть три сценария, чтобы иметь дело с, но это трудно понять: Автономный файл ACCDB. Разделенная база данных с двумя или более ACCDB файлов. Интерфейс доступа к серверу SQL. Объект набор # 1: Access.CodeData.AllTables Access.CodeData.AllQueries Access.CodeData.AllFunctions Access.CodeData.AllDatabaseDiagrams Access.CodeData. AllStoredProcedures Access.CodeData.AllViews Access.CodeProject.AllForms Access.CodeProject.AllMacros Access.CodeProject.AllModules Access.CodeProject.AllReports И конечно CodeData против CurrentData и CodeProject против CurrentProject. Объект набор # 2:. Access.Application.CodeData * * Access.Application.CodeProject набор Объект # 3:. Access.Application.CurrentDb.QueryDefs (DAO.QueryDefs) Access.Application.CurrentDb.Relations (DAO.Relations) Доступ. Application.CurrentDb.TableDefs (DAO.TableDefs)
spinjector
3

голосов
1

ответ
258

Просмотры

Установка лотка для приложения VB.Net к одной инстанции, если Framework приложений отключено?

Я хотел бы создать приложение лотка VB.Net, который запускает непосредственно в лоток, а не быть посланным туда скрытой формой запуска. Я нашел статью CodeProject, которая объясняет, как это сделать, и это работает прекрасно. Он описывает, как отключить Framework приложений (а затем снова включить его позже), поэтому объект запуска может быть установлен модуль с кодом запуска. Но после того, как каркас приложений вновь включается, как программно включить «Сделать одно приложение экземпляра» ..? Поскольку структура изначально отключена, все его флажков также инвалиды, в том числе и для одного экземпляра. Я проверил в обеих из следующих пространств имен, и не мог найти свойство с именем «SingleInstance», или что-нибудь подобное или, казалось бы, связанное: System.Windows.Forms.Application System.Windows.Forms. ApplicationContext Так как это может быть сделано? Для справки, вот статья: http://www.codeproject.com/Articles/75822/Create-a-System-Tray-Application-in-VB-NET
spinjector
4

голосов
1

ответ
81

Просмотры

При открытии RecordSet в Access VBA, если тип dbOpenSnapshot, он делает опцию dbReadOnly излишним?

В Access VBA, при открытии набора записей в качестве снимка, он делает только для чтения вариант лишними? На первый взгляд это кажется верным, так как снимок, по существу, только для чтения уже, но всегда кажется, предостережений. Пример: дим согласно Access.Application, как Тусклое дб как DAO.Database Dim RS как DAO.Recordset Тусклое sqltext как строка sqltext = "SELECT * FROM SOMESOURCE" Set Rs = db.OpenRecordset (sqltext, dbOpenSnapshot, dbReadOnly) «Поскольку тип dbOpenSnapshot, делает dbReadOnly становится излишним?
spinjector
3

голосов
1

ответ
68

Просмотры

Как VBA может определить, какой программный продукт он в настоящее время работает в ..?

Многие программные продукты VBA включены в них. Это включает в себя Microsoft Office, конечно, но есть много третьих сторон продуктов, которые выбраны для включения VBA, а также. Быстрый поиск Google появился имена, как AutoCad, WordPerfect, PowerTerm и ScriptWorx. Если кто-то хочет использовать # Если / # ENDIF директивы для разработки подпрограммы или функции для работы в различных средах, как можно VBA определить, какой один он в настоящее время работает в .. ?? Это немного отличается от определения, если продукт установлен, и в этом случае CreateObject () и ErrorHandler можно было бы использовать. Кроме того, проверка ссылок на коллекции не будет окончательным, поскольку проект VBA может иметь несколько ссылок на другие, чем текущие продукты. Например, проект Access может иметь ссылку на Excel, и наоборот (как многие из моих делать). Сказать, Я хочу, чтобы написать функцию, которая возвращает имя текущего файла. Вот некоторые псевдо-код с помощью Access и Excel в качестве примеров. Public Function CurrentFilename () As String #IF EnvironmentName = "Доступ" Тогда CurrentFilename = Access.Application.CurrentProject.Fullname #ElseIf EnvironmentName = "Excel" Тогда CurrentFilename = Excel.Application.ActiveWorkbook.Fullname #ELSE MsgBox «Текущее программное обеспечение VBA среда не опознано." #End If End Function Возможно ли это ..? Если да, то это магическая константа или функция заменить «EnvironmentName» ..? Тогда CurrentFilename = Access.Application.CurrentProject.Fullname #ElseIf EnvironmentName = "Excel" Тогда CurrentFilename = Excel.Application.ActiveWorkbook.Fullname #ELSE MsgBox "среда Текущее программное обеспечение VBA не распознается." #End If End Function Возможно ли это ..? Если да, то это магическая константа или функция заменить «EnvironmentName» ..? Тогда CurrentFilename = Access.Application.CurrentProject.Fullname #ElseIf EnvironmentName = "Excel" Тогда CurrentFilename = Excel.Application.ActiveWorkbook.Fullname #ELSE MsgBox "среда Текущее программное обеспечение VBA не распознается." #End If End Function Возможно ли это ..? Если да, то это магическая константа или функция заменить «EnvironmentName» ..?
spinjector
13

голосов
1

ответ
2.6k

Просмотры

VB.NET ошибка отладки: «Текущие настройки проекта указывают, что проект будет отлажено ...»

Кажется, я нечаянно превратил 2012 проект VB.NET к типу «Publish Online». Я исследовал IDE и запуска мастера публикации, но я отменил его, не делая ничего. Ошибка, кажется, связано с использованием аргументов командной строки, которые я определил в свойствах проекта. Как вернуть проект обратно в «нормальном режиме» от «публиковать в Интернете» ...? Эта ошибка возникает, когда отладка запускается (F5), следующим образом: текущие настройки проекта указывают, что проект будет отлажена с определенными разрешениями безопасности. В этом режиме аргументы командной строки не будут переданы в исполняемый файл. Хотите продолжить отладку в любом случае? Да нет.
spinjector
7

голосов
4

ответ
146

Просмотры

Как я могу каталог, индекс, и / или печать VB6 исходный код, с каждой суб / функции на странице ..?

Как я могу каталог, индекс, и / или печать исходного кода VB6 с каждой подпрограммы или функции на своей собственной странице ..? Я хотел бы сделать это бесплатно или включены в Visual Studio Add-Ins, если это возможно, но я не прочь что-то писать сам. Я знаком с «Microsoft Office Visual Basic для приложений расширяемости», и кажется, что VB6 имеет аналогичный модуль, который может позволить мне просто «Для каждого» посредством сбора кода модуля и бросить подлодки на принтер по одному, время. Он бы, может быть, 10-15 строк кода. Мой первый приоритет является печать, предпочтительно с каждой суб / функции на своей собственной странице, но с нормальной функцией печати на IDE, весь код работает вместе в одну длинную распечатку. Далее после этого, я хотел бы создать индекс / ТОС имен всех подразделов, функции, переменные и постоянная в каждом ВБПЕ. У нас есть Visual Studio 6.0 Enterprise Edition, но не кажется, что будет что-то в нем, чтобы сделать какие-либо из этих видов вещей. Вы можете смеяться и спросить: «Почему VB6 .. ?? LOL !!». Это потому, что я была поставлена ​​задача обновления и изменения в VB6 исходный код большой программной системы, которая работает завод. Это на изолированной сеть без связи с внешним миром, и это было отлично работает в течение 14 лет, но теперь они хотят, чтобы начать модернизацию некоторых вещей. Система состоит из множества ВБПА файлов, каждый из которых имеет множество модулей и формы. Изменить: Я попытался погуглить ответы на это, но это оказалось невозможным. Все, что я получил кодировались образцы о печати из приложений, написанных на VB6, не печатает исходный код из IDE. но там, кажется, не будет ничего, что делать какие-либо из этих видов вещей. Вы можете смеяться и спросить: «Почему VB6 .. ?? LOL !!». Это потому, что я была поставлена ​​задача обновления и изменения в VB6 исходный код большой программной системы, которая работает завод. Это на изолированной сеть без связи с внешним миром, и это было отлично работает в течение 14 лет, но теперь они хотят, чтобы начать модернизацию некоторых вещей. Система состоит из множества ВБПА файлов, каждый из которых имеет множество модулей и формы. Изменить: Я попытался погуглить ответы на это, но это оказалось невозможным. Все, что я получил кодировались образцы о печати из приложений, написанных на VB6, не печатает исходный код из IDE. но там, кажется, не будет ничего, что делать какие-либо из этих видов вещей. Вы можете смеяться и спросить: «Почему VB6 .. ?? LOL !!». Это потому, что я была поставлена ​​задача обновления и изменения в VB6 исходный код большой программной системы, которая работает завод. Это на изолированной сеть без связи с внешним миром, и это было отлично работает в течение 14 лет, но теперь они хотят, чтобы начать модернизацию некоторых вещей. Система состоит из множества ВБПА файлов, каждый из которых имеет множество модулей и формы. Изменить: Я попытался погуглить ответы на это, но это оказалось невозможным. Все, что я получил кодировались образцы о печати из приложений, написанных на VB6, не печатает исходный код из IDE. ве была поставлена ​​задача модернизации и изменения в VB6 исходный код большой программной системы, которая работает завод. Это на изолированной сеть без связи с внешним миром, и это было отлично работает в течение 14 лет, но теперь они хотят, чтобы начать модернизацию некоторых вещей. Система состоит из множества ВБПА файлов, каждый из которых имеет множество модулей и формы. Изменить: Я попытался погуглить ответы на это, но это оказалось невозможным. Все, что я получил кодировались образцы о печати из приложений, написанных на VB6, не печатает исходный код из IDE. ве была поставлена ​​задача модернизации и изменения в VB6 исходный код большой программной системы, которая работает завод. Это на изолированной сеть без связи с внешним миром, и это было отлично работает в течение 14 лет, но теперь они хотят, чтобы начать модернизацию некоторых вещей. Система состоит из множества ВБПА файлов, каждый из которых имеет множество модулей и формы. Изменить: Я попытался погуглить ответы на это, но это оказалось невозможным. Все, что я получил кодировались образцы о печати из приложений, написанных на VB6, не печатает исходный код из IDE. но это оказалось невозможным. Все, что я получил кодировались образцы о печати из приложений, написанных на VB6, не печатает исходный код из IDE. но это оказалось невозможным. Все, что я получил кодировались образцы о печати из приложений, написанных на VB6, не печатает исходный код из IDE.
spinjector
8

голосов
3

ответ
298

Просмотры

Где в VB6 / ссылки проекта VBA сделать Array (), LBOUND () и UBOUND () происходят из ..?

Где в VB6 / ссылки проекта VBA сделать Array (), LBOUND () и UBOUND () происходят из ..? Когда я печатаю в коде, они не появляются в списке автозаполнения (Ctrl + пробел), они не получают автоматически появившиеся, и они должны быть напечатаны полностью до того, как текстовый редактор распознает их. И только тогда, когда левая скобка набрана будет ToolTipText всплывал с синтаксисом команды. Кроме того, они не появляются нигде в обозревателе объектов. Там, наверное, основное понятие в игре здесь, что я не в курсе. И это заставляет меня задаться вопросом, какие другие команды / заявления / ключевые слова скрыты таким же образом ..? Есть ли список где-то ..? Я гугл для информации, но не нашел ничего, наверное, потому что я не знаю, что я ищу, и используя неправильные условия поиска. Я задаю эти вопросы, потому что у меня есть привычка предваряя много VB6 встроенных функций, как это: VBA.Left (), VBA.Len, VBA.Instr (), и так далее. Но я не могу понять, что ссылка prefeix использовать с Array (), LBound (), и UBound (), или, возможно, они настолько основополагающим для VB6, что они не имеют один. Я делаю это потому, предваряя года назад я работал над большим проектом, и там были функции я пытался использовать с тем же именем в различных справочных библиотеках. Я был новичком, и мне потребовалось некоторое время, чтобы выяснить, и это вызывает огромные проблемы, так как функции были просто не работают так, как я думал, что они должны были. Именно тогда я разработал предваряя привычку после того, как я понял. Это просто легче, что путь, и всегда обеспечивает используются ожидаемые функции. Instr (), и так далее. Но я не могу понять, что ссылка prefeix использовать с Array (), LBound (), и UBound (), или, возможно, они настолько основополагающим для VB6, что они не имеют один. Я делаю это потому, предваряя года назад я работал над большим проектом, и там были функции я пытался использовать с тем же именем в различных справочных библиотеках. Я был новичком, и мне потребовалось некоторое время, чтобы выяснить, и это вызывает огромные проблемы, так как функции были просто не работают так, как я думал, что они должны были. Именно тогда я разработал предваряя привычку после того, как я понял. Это просто легче, что путь, и всегда обеспечивает используются ожидаемые функции. Instr (), и так далее. Но я не могу понять, что ссылка prefeix использовать с Array (), LBound (), и UBound (), или, возможно, они настолько основополагающим для VB6, что они не имеют один. Я делаю это потому, предваряя года назад я работал над большим проектом, и там были функции я пытался использовать с тем же именем в различных справочных библиотеках. Я был новичком, и мне потребовалось некоторое время, чтобы выяснить, и это вызывает огромные проблемы, так как функции были просто не работают так, как я думал, что они должны были. Именно тогда я разработал предваряя привычку после того, как я понял. Это просто легче, что путь, и всегда обеспечивает используются ожидаемые функции. т есть. Я делаю это потому, предваряя года назад я работал над большим проектом, и там были функции я пытался использовать с тем же именем в различных справочных библиотеках. Я был новичком, и мне потребовалось некоторое время, чтобы выяснить, и это вызывает огромные проблемы, так как функции были просто не работают так, как я думал, что они должны были. Именно тогда я разработал предваряя привычку после того, как я понял. Это просто легче, что путь, и всегда обеспечивает используются ожидаемые функции. т есть. Я делаю это потому, предваряя года назад я работал над большим проектом, и там были функции я пытался использовать с тем же именем в различных справочных библиотеках. Я был новичком, и мне потребовалось некоторое время, чтобы выяснить, и это вызывает огромные проблемы, так как функции были просто не работают так, как я думал, что они должны были. Именно тогда я разработал предваряя привычку после того, как я понял. Это просто легче, что путь, и всегда обеспечивает используются ожидаемые функции. и это вызывает огромные проблемы, так как функции были просто не работают так, как я думал, что они должны были. Именно тогда я разработал предваряя привычку после того, как я понял. Это просто легче, что путь, и всегда обеспечивает используются ожидаемые функции. и это вызывает огромные проблемы, так как функции были просто не работают так, как я думал, что они должны были. Именно тогда я разработал предваряя привычку после того, как я понял. Это просто легче, что путь, и всегда обеспечивает используются ожидаемые функции.
spinjector
2

голосов
1

ответ
58

Просмотры

Получение FULLNAME в Access 2007 через CreateObject ( «Application») ..?

Я пытаюсь получить полное имя текущего файла БД в Access 2007 с помощью метода CreateObject (), но он не работает, он просто возвращает пустую строку. Я использую CreateObject (), потому что код будет использоваться в нескольких продуктах Microsoft Office, так что ... Я считаю, что правильная терминология является объект запаздывает оценку ..? Конкретно, это работает ... Public Sub ThisWorks () Dim obj1 As Object Dim obj2 как объект Set obj1 = Access.Application Set obj2 = obj1.CurrentProject Debug.Print obj2.FullName End Sub ... но это не работает ... Public Sub ThisDoesNotWork () Dim obj1 As Object Dim obj2 As Object Set obj1 = CreateObject ( "Access.Application"): «Это единственное изменение. Установите obj2 = obj1.CurrentProject Debug.Print obj2.FullName End Sub Почему это не работает .. ? Может ли это быть сделано, чтобы сделать это ..? Для того, чтобы ответить на неизбежный вопрос: «Как вы используете его?», Приведенные выше примеры конденсируются биты из следующей функции ... Public Function CurrentFilename () As String «Эта функция пытается вернуть полное имя & путь текущего открытого файла , Это «основана на идее о том, что все (или большинство?) Реализаций VBA имеют основание» объект под названием „Application“ и дочерний объект со свойством, что имеет «имя файла. Конструкция этой функции должна позволить ему работать в любом программном обеспечении «продукт, который поддерживает VBA. Он может работать даже в VBScript тоже, но это не был «проверен. При возникновении какой-либо ошибки, или продукт не может возвращать имя файла, или «функция не распознает продукт, пустая строка. Как идет время «на, больше названий программных продуктов могут быть добавлены в Select Case, но сейчас это» только продукты Microsoft Office. Dim ProductName As String Dim obj1 As Object Dim obj2 как объект Dim файла As String Dim msgStyle As VbMsgBoxStyle On Error GoTo ErrorHandler msgStyle = vbApplicationModal + vbExclamation + vbOKOnly ProductName = Application.Name Select Case ProductName Case "Microsoft Access" Set obj1 = CreateObject (» Access.Application ") Set obj2 = obj1.CurrentProject имя_файла = obj2.FullName Case "Microsoft Excel" Set obj1 = CreateObject (" Excel.Application ") Set obj2 = obj1.ActiveWorkbook имя_файла = obj2.FullName случай "Outlook" «Возвращает путь \ имя текущего по умолчанию * .OST файла. Установите obj1 = CreateObject ( "Outlook.Application") Set obj2 = obj1.Session.DefaultStore имя_файла = obj2.FilePath Дело "Microsoft PowerPoint" Set obj1 = CreateObject ( "PowerPoint.Application") Set obj2 = obj1.ActivePresentation имя_файла = obj2. ПолноеИмя Дело "Microsoft Publisher" Set obj1 = CreateObject ( "Publisher.Application") Set obj2 = obj1.ActiveDocument имя_файла = obj2.FullName Case "Microsoft Word" Set obj1 = CreateObject ( "Application.ActivePresentation") Set obj2 = obj1.Session .DefaultStore имя_файла = obj2. ПолноеИмя Case Else «Дополнительное сообщение об ошибке пользователя. MsgBox «Текущая среда выполнения VBA не распознается.», _ MsgStyle, «Ошибка получения имени файла.» End Select CurrentFilename = имя_файл Exit Function ErrorHandler: Dim тзд As String Dim точки As String «Be грамматика брюзга. Убедитесь, что описание заканчивается с периодом / fullstop. Если VBA.Right (Err.Description, 1) "" Тогда точка = «» End If MSG = "" MSG = тзд & "Ошибка:" & vbTab & VBA.CStr (Err.Number) MSG = тзд & vbCrLf & vbCrLf тзд = тзд & "Описание изделия:" & vbTab & Err.Description & точка тзд = сообщ & vbCrLf & vbCrLf тзд = сообщ & "Источник:" & vbTab & err.Source MsgBox тзд, msgStyle, «Ошибка» «Не возвращайте от ошибки. Просто выйти и возвращает пустую строку. «Resume Next End Function
spinjector
2

голосов
3

ответ
50

Просмотры

How can Excel VBA range variables be tested for references to entire columns..?

Какие способов есть для тестирования переменного диапазона Excel VBA для ссылок на целые столбцы? Я использую Excel 2007 VBA, перебирая Диапазон переменных с For-Each петлями. Диапазоны передаются в функцию в качестве параметров. Ссылки на отдельные ячейки, диапазоны ячеек, и целые строки в порядке. Например, это okiedokie: Range ( "A1") 'Один диапазон ячеек ( "A1: D4")' Диапазон ячеек. Range ( «10:20») «Целые ряды 10 через 20. Но если какие-либо из диапазонов имеют ссылки на целые колонны, она будет тянуть вниз функцию в ступор. Например, они не okiedokie, и они должны быть проверены на и избегать: Range ( "A:") Range ( "A: Z") Range ( "AA: ZZ") Есть несколько способов, я Повсеместно от делать это, каждый из них правдоподобным, но со слабостями. Код содержит петлю, которые используются для поиска через ячейку в рабочих листах со многими тысячами строк, поэтому скорость имеет решающее значение. Вот три способа я могу думать, но я хотел бы знать, если есть другие ..? Самый простой и быстрый метод для подсчета строк. Если диапазон (х) .Rows.Count = 1048576, что это максимальное количество строк в таблице. Однако, это не будет работать, если фактическое количество строк оказалось, именно это число, или если по какой-то дикой случайности там были несколько перекрывающихся областей / диапазонов, что все добавляют до этого числа. И маловероятно, но возможно. Кроме того, если версия изменений Excel, поэтому, возможно, что число, таким образом делая код сломана. Используйте RegEx матч против текста Range.Address (False, False) с узором, такой как ([AZ] {1,3}): ([AZ] {1,3}). Я думаю, что это будет среда на шкале скорости. Использование VBA петли, If-Then и строковые функции, такие как InStr () и Mid (), чтобы выбрать в тексте Range.Address (False, False). Я думаю, что это будет самый медленный из возможных способов сделать это.
spinjector
3

голосов
1

ответ
189

Просмотры

Каковы основные различия между объектами поля и FIELD2 в Microsoft Access ..?

Я ищу какое-то обсуждение различий между «полем» и объектами «FIELD2» в Microsoft Access. Я использую Access 2007 в качестве переднего конца к AS400 DB2 базы данных IBM I-Series v6 SQL. Существует эта связь, которая явно заявляет «Field2» идентичен «поле», но с дополнительными свойствами доступными: https://msdn.microsoft.com/en-us/library/bb257445(v=office.12). ASPX. Но это не очень подробно остановиться на ситуации, в которых она должна использоваться. Кроме того, есть такая, в которой говорится DAO 12 следует ссылаться использовать «Field2», и показывает некоторый код, но опять же это не конкретизируется много. Она тем не менее показывает, как он используется с Outlook, и мне интересно, если это правильно или если «поле (1)» будет работать также: Получение доступа к Field2 в Access 2007 Итак ... что некоторые причины, чтобы использовать один над другим? .. Являются ли дополнительные свойства используются только для новых систем БД ..? Или определенное программное обеспечение ..? Или что..?
spinjector
3

голосов
1

ответ
64

Просмотры

Что номер ошибки я мог бы использовать с CVErr () не указывать никакого значения будет возвращено из функции Access VBA?

Что номер ошибки я мог бы использовать с CVErr () не указывать никакого значения будет возвращено из функции Access VBA? Я потянув заготовки. CVErr (5) может работать, но я надеюсь на что-то менее общее. 744 ( «Поиск текст не найден») близко (-ish), но до сих пор не сигара. Я создаю специальную функцию просмотра для использования в качестве отчета Access. Если функция не будет возвращать никакого значения, я хотел бы его вернуть # значение ошибки вместо этого. Обсуждение Чипа Пирсона это прекрасно, однако она ориентирована на Excel, и должна быть немного изменена для доступа. Я искал Список ошибок в FMS с различным ключевыми словами, такими как «ноль», «не найден», «слишком мало», и т.д. Есть тысячи ошибок в списке, так что любая помощь сводил его без необходимости на самом деле читать весь список будет оценен. Пример: Функция MyLookup (param1) как вариант '..............' ... делать вещи ...».............. If SomethingBad = True Then MyLookup = VBA.CVErr (N) «Что здесь N? Exit Function End Function Endif
spinjector
2

голосов
1

ответ
84

Просмотры

Как следует VBA.CVErr () будет использоваться, если он не может поддерживать Long VARTYPE из vbObjectError ..?

Я в Access 2007 VBA, пытаясь вернуть значение #ERROR из функции, как показано в приведенном ниже коде. Но я только что обнаружил, наибольшее число которых VBA.CVErr (выражение) будет принимать в 2 ^ 15-1, он же в Тип_переменной Integer; не долго. Это кажется непонятным, так как VBA константа vbObjectError является Long. Другие функции ошибки работы с долгот; например: VBA.Error (vbObjectError) работает отлично. В свете этого вопроса, какие предложения есть, чтобы правильно сделать использование vbObjectError вернуть определяемые пользователем ошибки как объекты ошибок из определяемых пользователем функций ..? Public Sub TesUDE () Dim v как вариант V = УДЭНСКИЙ () Debug.Print TypeName (v), VBA.CStr (v) End Sub Public Function УДЭНСКИЙ () As Variant On Error GoTo ErrorHandler err.Raise 2 ^ 15 - 1, «Это определенный пользователем ошибка.» 'Работает. err.Raise 2 ^ 15,, «Это определенный пользователем ошибка.» «Перелив. err.Raise vbObjectError, «Это определенный пользователем ошибка.» «Он смеялся надо мной. ErrorHandler: УДЭНСКИЙ = VBA.CVErr (err.number) End Function
spinjector
1

голосов
1

ответ
131

Просмотры

Определить имя библиотеки переменного объекта в VBA 2007 ..?

Как полностью квалифицированный класс и член имя переменного объекта определяются в VBA 2007 ..? Например, Excel.Range, а не только Range ... как только он появляется в коде? Оба Excel и Слово есть объект Range, но они совершенно разные классы. В приведенном ниже примере Range передается функции. Как функция может определить, какой класс он из ..? Результаты примере производства «Microsoft Excel.Range». Несмотря на то, что близко, это не то же самое. Но Parent.Name и имя класса являются два различных свойства, и в других программах они могут быть совершенно разные текстовые строки, не имеющие общностью. Итак ... как можно получить Excel.Range вместо Microsoft Excel.Range ..? «Примечание: Проект имеет ссылки на как Excel и Word. Public Sub Demo () Dim г Как Excel. Диапазон Dim fulltype As String Set R = ActiveCell fulltype = WhatAmI (г) Debug.Print fulltype Select Case fulltype Case "Excel.Range" «Есть вещи. Дело «Word.Range» «Есть другие вещи. End Select End Sub Private Function WhatAmI (ByRef X As Object) As String Dim станд As String Dim пар As String Тип = TypeName (X) = номинальной X.Application.Parent.Name WhatAmI = пар & "" И типовое End Function End Select End Sub Private Function WhatAmI (ByRef X As Object) As String Dim станд As String Dim пар As String Тип = TypeName (X) = номинальной X.Application.Parent.Name WhatAmI = пар & "" И типовое End Function End Select End Sub Private Function WhatAmI (ByRef X As Object) As String Dim станд As String Dim пар As String Тип = TypeName (X) = номинальной X.Application.Parent.Name WhatAmI = пар & "" И типовое End Function
spinjector
2

голосов
3

ответ
58

Просмотры

В запросе SQL, является «ТОП 1» является надежной заменой для совокупности функций, такая MIN () или MAX () ..?

Является ли «TOP 1» надежным заменителем агрегатных функций, таких как MIN () и MAX () ..? Ниже показан базовый запрос в Access 2007, чтобы определить первый раз, когда клиент заказал определенный продукт в течение определенного месяца. Система СУБД, вероятно, не имеет значения, так как этот вопрос может применяться к любой системе. В этом запросе «ТОП 1» используется в комбинации с ORDER BY на поле даты. Это возвращает одну запись, что, будучи самым старым по дате. Но ... это нормально ..? Что может пойти не так ..? Есть ли способ лучше..? Выбор TOP 1 DAACCT, DAITEM, DAQTY, DAIDAT ОТ fqlOrdersGrandHistory ГДЕ DAACCT = "T7414" И DAITEM = "45234" И (DAIDAT> = 20170501 И DAIDAT
spinjector
5

голосов
1

ответ
106

Просмотры

Как использовать VBIDE в VB6 Addin программно напечатать исходный код ..?

Как программно напечатать исходный код в VB6 Addin ..? Там нет печати или предварительного просмотра методов, которые я могу найти для VBIDE в обозревателе объектов. Я искал высоко и низко на Google, и есть странный недостаток информации о VBIDE кода модуля печати. Я получаю много хитов для PrettyPrint, но это все. Отсутствие настолько велико, что заставляет меня задаться вопросом, если есть какая-то фундаментальная концепция, что я полностью отсутствует. Я напугал копию книги O'Reilly упомянутой травы в https://stackoverflow.com/a/41034211/2705042, и это не имеет никакого упоминания о печати исходного кода. Единственный способ, которым я могу видеть это экспортировать код в текстовые файлы и печатать те через обычные средства не связаны с VBIDE. Я также проверил руководство Чип Пирсона к VBE в http://www.cpearson.com/excel/vbe.aspx, который почти идентичен VBIDE, и даже нет никакого ключа к печати коды, кроме идеи я упомянул о сохранении в текстовые файлы, а затем печати. ** В идеале я хотел бы использовать существующий VB6 File> диалоговое окно Печать, с одним дополнительным флажком добавленным к нему. Я понимаю, что добавление элементов управления в существующем диалог другая тема, и я не прочь создать свою собственную версию диалога печати.
spinjector