Jump to content

ArminVanBuuren

Потребител
  • Брой теми

    17
  • Регистрация

  • Последно посещение

ArminVanBuuren's Achievements

Новобранец

Новобранец (1/14)

0

Репутация в общността

  1. Здравейте! Отскоро си сложих нов шаблон на блога.От тези шаблони, които се предлагат в интернет, а не от готовите в blogger.Обаче забелязвам, че при публикация нямам много опции като размер на шрифта, публикация, подравняване, цвят.... Mоля, дайте съвет как да се сдобия с останалите опции.Някакви кодове ли трябва да напиша ръчно? Благодаря ви! Ето как ми излиза: http://i42.tinypic.com/2chriad.jpg
  2. Здравейте! Понеже не съм много запознат, реших да ви попитам тук. Възможно ли е чрез bluetooth и микрослушалка да се прослушат записи в mp3 формат от GSM, в който са запаметени тези файлове?Т.е GSM да е в ролята на mp3 player, с който може да се превъртат mp3 файловете.Но става дума с блутут и микрослушалка.Защото иначе съм чувал, че трябва да има втори GSM като предавател. Благодаря предварително. П.С. Прощавайте, ако темата ми е неуместна или не е в правилния раздел!
  3. Привет! 1 седмица ме мъчи един въпрос:Как е правилно при официално обръщение: "Госпожо Иванова, напълняла сте" или "Госпожо Иванова, напълнели сте" В случая "напълнял" минало деятелно причастие ли е, за да се използва при официално обръщение в мн.ч-->"напълнели сте"?! Благодаря!
  4. Коригирах датата в компютъра, била е за 2000, не съм обърнал внимание, така че, проблемът се оправи и вече не ми излизат подобни съобщения. Аз много ви благодаря!
  5. Привет! Когато влизам в електронната си поща, преди да се отвори ми излиза следното: http://img228.imageshack.us/img228/5475/69305094np5.jpg Аз използвам Mozilla, но подобно съобщение ми се появява и с IE.И не само с абв е така, например влизам в imageshack.us и същото съобщение ми излиза, само че за paypal.com Много се притеснявам, не мога да разбера какво е това. Благодаря!
  6. Да, аз после се сетих, но нямаше как да изтрия темата.Значи uninstall add-ones на Zotero и всичко вече е нормално. Много благодаря, приятели!
  7. Здравейте! Не знам поради каква причина ми се появи това сиво поле отдолу, но как мога да го премахна, защото е доста неприятно. http://img142.imageshack.us/img142/9479/55032234nl1.jpg
  8. Еййй, златни хора! Стана с начина на Crio, и всичко е ОК! Много ви благодаря, приятели! 100X!
  9. Здравейте! http://img442.imageshack.us/img442/3088/62825644hj6.jpg Въпросът ми е как може при избор на "квадрат" да се появи shape1(kvadrat), съответно и за правоъгълника-shape2, но и при отмаркирване да изчезва съответната геометрична фигура.Предполагам става с "checked", но при мен винаги ми се отбелязва и не мога да го отмаркирам и да изчезне изображението. Private Sub mnukvadrat_Click() If mnukvadrat.Checked = False Then With mnukvadrat .Checked = True Shape1.Visible = True End With ElseIf mnukvadrat.Checked = Not (mnukvadrat.Checked) Then mnukvadrat.Checked = False Shape1.Visible = False End If End Sub Private Sub mnupravoygylnik_Click() If mnupravoygylnik.Checked = False Then With mnupravoygylnik .Checked = True Shape2.Visible = True End With ElseIf mnupravoygylnik.Checked = Not (mnupravoygylnik.Checked) Then End If End Sub Благодаря!
  10. Да, анализирах нещата и се получи.Много благодаря.Страхотни се! Поздрави,
  11. @Crio, това с next го разбирам: Private Sub cmd1_Click() Form2.Show Unload Me End Sub Сложен е и таймер, до 20 секунди за отговор на въпроса, и в него е въведен кодът: Private Sub Timer1_Timer() Static br As Integer br = br + 1 lbl1.Caption = CStr(br) If br > 20 Then MsgBox "Времето ви за отговор изтече", vbExclamation, "Внимание!" End If Въпросът се състои в това, къде да се въведе тази променлива S as integer, какъв код да напиша за верните отговори в различните променливи, примерно (If option2.Value=true THEN)..после какво трябва да се направи и къде да се напише. И последно във form4 на команден бутон "резултат" какво трябва да се напише, за да пресметне сбора точки. P.S. Изискването е да е в няколко форми и точно това ме затруднява=( @l.kanelov, описаният начин ми се вижда доста сложен за мен.Никога не съм работил така.
  12. Здравейте! Имам за задача да направя тест във Visual Basic. Значи направих 4 отделни форми с въпрос на всяка форма и option buttons за избор. Искам да попитам как мога да изчисля накрая общия резултат на теста, т.к. това са четири отделни форми и в четвъртата е поставен команден бутон "резултат".В msgbox трябва да ми излезе 4, защото на въпрос по една точка е изчислено да се постави.. http://img301.imageshack.us/img301/4834/85686825bq3.jpg В тази форма например за верен отговор е Option2.И искам да попитам, кода за този верен отговор къде трябва да се напише.Всички форми(2,3,4) си притежават option1,option2...и в каква променлива се натрупват точките и накрая в "резултат" какъв трябва да е кодът?Как може тези форми да се обединят.. Благодаря на отзовалия се!
  13. Точно така. Благодаря ти за пореден път! Весели празници!
  14. Как да го направя това? Да, картинките са една в/у друга и на всеки image е дадено свойството Visible да е False, а Stretch да е True.Ето сега например за януари, съвсем кратък пример: (lbl6 извежда хороскопа, а imgko си е image, който предварително е зареден чрез свойство Picture ... lbl2 извежда с думи зодията.И при lbl2 се сменя текста според зададения код, но картинката не се сменя.Същото се отнася з акомандата и с китайския хороскоп. Private Sub ZodiqHoroscop_Click() Dim d As Integer Dim m As String Dim y As Integer dim s As String d = cmb1.Text m = cmb2.Text y = cmb3.Text Select Case m Case "Януари" If d < 21 Then s = "Козирог" imgko.Visible = True lbl6.Caption = "Денят е благоприятен за обогатяване с нова информация. Възможни са сблъсъци с ръководството, но ако сте търпеливи и знаете какво искате, ще изясните проблемите без много усилия." Else s = "Водолей" imgvo.Visible = True lbl6.Caption = "Ще отхвърлите много работа, но резултатите няма да ви задоволят. Няма да сте доволни и от подписаните договори и споразумения, но те ще ви донесат добри приходи" End If End Select lbl2.caption=s ..... ..... Private Sub Kitaiskikalendar_Click() If cmb3.Text = "1973" Or cmb3.Text = "1985" Or cmb3.Text = "1997" Then imgbik.Visible = True lbl3.Caption = "Бик" End If ........ ........
  15. Здравейте! Имам за задача да направя във Visual Basic форма, която при посочване на ден, месец, година да извежда зодията, хороскопа и зодията по китайския календар.В моя случай обаче след няколко въвеждания картинките за зодията не се сменят, но лейбъла, в който е зададено да се извеждат зодиите се изписват и сменят. Качил съм проекта и моля някой да открие грешката: http://tranz.it/load.php?id=BvxLhyLEJr8sKNI634935
×
×
  • Създай ново...