Jump to content

I Have a Problem


Recommended Posts

I am making a Quiz and when someone else runs the program some of the multiple choice answers I made won't show for example a long word like Baghdad well only show like this on there computar Bagh I am stuck and have searched but could not find a answer for this online Here is the code

Msgbox(0,"Welcome","Welcome to The Geography Game")
FirstQuestion()
func FirstQuestion()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\michael\downloads\downloads\guis\geography.kxf
Global $Form1_1 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Capital of Turkey", 168, 16, 263, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Beruit", 248, 88, 73, 33)
Global $Radio2 = GUICtrlCreateRadio("Baghdad", 248, 136, 73, 41)
Global $Radio3 = GUICtrlCreateRadio("Ankara", 248, 192, 57, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Correct","That is Correct")
            If $Radio3 = $Radio3 Then GUIDelete($Form1_1)
            If $Radio3 = $Radio3 Then SecondQuestion()

         Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Wrong", "That is Incorrect")
            IF $Radio2 = $Radio2 Then GUIDelete($Form1_1)
            If $Radio2 = $Radio2 Then SecondQuestion()
         Case $Radio1
            Msgbox(0,"Wrong", "That is Incorrect")
            IF $Radio1 = $Radio1 Then GUIDelete($Form1_1)
            If $Radio1 = $Radio1 Then SecondQuestion()
    EndSwitch
 WEnd
EndFunc ;==>FirstQuestion

func SecondQuestion()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\michael\downloads\downloads\guis\2q.kxf
Global $Form1_2 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Captial of Lebanon", 144, 16, 292, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Beruit", 224, 104, 89, 41)
Global $Radio2 = GUICtrlCreateRadio("Baghdad", 224, 160, 65, 41)
Global $Radio3 = GUICtrlCreateRadio("Riyadh", 224, 224, 73, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Correct","That is correct")
            If $Radio1 = $Radio1 Then GUIDelete($Form1_2)
            If $Radio1 = $Radio1 Then ThirdQuestion()
         Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio2 = $Radio2 Then GUIDelete($Form1_2)
            If $Radio2 = $Radio2 Then ThirdQuestion()
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio3 = $Radio3 Then GUIDelete($Form1_2)
            If $Radio3 = $Radio3 Then ThirdQuestion()
    EndSwitch
 WEnd
EndFunc ;==>SecondQuestion


func ThirdQuestion()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\michael\downloads\downloads\guis\3q.kxf
Global $Form1 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Captial of Israel", 168, 32, 243, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Jerusalem", 240, 104, 89, 41)
Global $Radio2 = GUICtrlCreateRadio("Beruit", 240, 144, 105, 49)
Global $Radio3 = GUICtrlCreateRadio("Riyadh", 240, 200, 97, 33)
Global $Button1 = GUICtrlCreateButton("Wiki Page", 8, 24, 65, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         ;Case $Button1
            ;$9 = _IECreateEmbedded("google.com")
              ;Global $Button2 = GUICtrlCreateObj($9, 640, 580)
         Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Correct", "That is Correct")
            If $Radio1 = $Radio1 Then GUIDelete($Form1)
            If $Radio1 = $Radio1 Then FourthQuestion()
         Case $Radio2
            If $Radio2 = $Radio2 Then MsgBox(0, "Wrong","That is Incorrect")
            If $Radio2 = $Radio2 Then GUIDelete($Form1)
            If $Radio2 = $Radio2 Then FourthQuestion()
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio3 = $Radio3 Then GUIDelete($Form1)
            If $Radio3 = $Radio3 Then FourthQuestion()
    EndSwitch
 WEnd
EndFunc ;==>ThirdQuestion


Func FourthQuestion()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form2 = GUICreate("Geography", 615, 438, 237, 151)
Global $Label1 = GUICtrlCreateLabel("Capital Of Cyprus", 160, 24, 274, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Damascus", 224, 104, 169, 33)
Global $Radio2 = GUICtrlCreateRadio("Amman", 224, 144, 121, 33)
Global $Radio3 = GUICtrlCreateRadio("Niscosia", 224, 192, 129, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Correct","That is Correct")
            If $Radio3 = $Radio3 Then GUIDelete($Form2)
             If $Radio3 = $Radio3 Then Five()
         Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Incorrect","That is Incorrect")
            If $Radio2 = $Radio2 Then GUIDelete($Form2)
             If $Radio2 = $Radio2 Then Five()
         Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Incorrect","That is Incorrect")
            If $Radio1 = $Radio1 Then GUIDelete($Form2)
             If $Radio1 = $Radio1 Then Five()

    EndSwitch
 WEnd
EndFunc ;==>FourthQuestion

func Five()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Capital Of Syria", 184, 24, 244, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Kuwait City", 232, 104, 129, 33)
Global $Radio2 = GUICtrlCreateRadio("Damascus", 232, 160, 137, 41)
Global $Radio3 = GUICtrlCreateRadio("Muscat", 232, 208, 145, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Radio1
         IF $Radio1 = $Radio1 Then Msgbox(0,"Wrong","That is Incorrect")
         If $Radio1 = $Radio1 Then GUIDelete($Form1)
         If $Radio1 = $Radio1 Then  Six()
         Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Correct","That is Correct")
            If $Radio2 = $Radio2 Then GUIDelete($Form1)
            If $Radio2 = $Radio2 Then Six()
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio3 = $Radio3 Then GUIDelete($Form1)
            IF $Radio3 = $Radio3 Then Six()

    EndSwitch
WEnd
Endfunc

Func Six()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Capital Of  Palestine ", 144, 24, 326, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Doha", 200, 96, 209, 49)
Global $Radio2 = GUICtrlCreateRadio("Tehran", 200, 144, 217, 57)
Global $Radio3 = GUICtrlCreateRadio("None Of The Above", 200, 200, 225, 57))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio1 = $Radio1 Then GUIDelete($Form1)
            If $Radio1 = $Radio1 Then Seven()
         Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio2 = $Radio2 Then GUIDelete($Form1)
            If $Radio2 = $Radio2 Then Seven()
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Correct","That is Correct")
            If $Radio3 = $Radio3 Then GUIDelete($Form1)
            If $Radio3 = $Radio3 Then Seven()
    EndSwitch
WEnd
EndFunc

func Seven()
#include <ButtonConstants.au3>
#include <DateTimeConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Capital Of Jordon", 152, 32, 272, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Amman", 176, 112, 201, 41)
Global $Radio2 = GUICtrlCreateRadio("Tehran", 176, 168, 209, 49)
Global $Radio3 = GUICtrlCreateRadio("Doah", 176, 232, 225, 41)
Global $Date1 = GUICtrlCreateDate("2014/02/04 19:30:4", 416, 88, 185, 97)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Correct","That is Correct")
            If $Radio1 = $Radio1 Then GUIDelete($Form1)
            If $Radio1 = $Radio1 Then Eight()
        Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio2 = $Radio2 Then GUIDelete($Form1)
            If $Radio2 = $Radio2 Then Eight()
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio3 = $Radio3 Then GUIDelete($Form1)
            If $Radio3 = $Radio3 Then Eight()
    EndSwitch
WEnd
EndFunc

func Eight()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\michael\Downloads\Downloads\guis\8q.kxf
Global $Form1 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Capital Of Iraq", 184, 24, 226, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Abu Dhabi", 192, 96, 241, 49)
Global $Radio2 = GUICtrlCreateRadio("Baghdad", 192, 160, 249, 41)
Global $Radio3 = GUICtrlCreateRadio("Riyadh", 192, 216, 97, 49)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
       Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio1 = $Radio1 Then GUIDelete($Form1)
            If $Radio1 = $Radio1 Then Nine()
        Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Correct","That is Correct")
            If $Radio2 = $Radio2 Then GUIDelete($Form1)
            If $Radio2 = $Radio2 Then Nine()
        Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio3 = $Radio3 Then GUIDelete($Form1)
            If $Radio3 = $Radio3 Then Nine()
    EndSwitch
WEnd
EndFunc

func Nine()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\michael\Downloads\Downloads\guis\9q.kxf
Global $Form1 = GUICreate("Geography", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Capital Of Kuwait", 152, 24, 269, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Niscosia", 192, 96, 177, 57)
Global $Radio2 = GUICtrlCreateRadio("Beirut", 192, 152, 193, 49)
Global $Radio3 = GUICtrlCreateRadio("Kuwait City", 192, 216, 201, 49)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio1 = $Radio1 Then GUIDelete($Form1)
            If $Radio1 = $Radio1 Then Ten()
         Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio2 = $Radio2 Then GUIDelete($Form1)
            If $Radio2 = $Radio2 Then Ten()
         Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Correct","That is Correct")
            If $Radio3 = $Radio3 Then GUIDelete($Form1)
            If $Radio3 = $Radio3 Then Ten()
    EndSwitch
WEnd
EndFunc

func Ten()
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\michael\downloads\downloads\guis\10q.kxf
Global $Form1_1 = GUICreate("Form1", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Capital Of Saudi Arabia", 136, 24, 364, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Radio1 = GUICtrlCreateRadio("Sana's", 200, 96, 177, 49)
Global $Radio2 = GUICtrlCreateRadio("Doha", 200, 152, 185, 41)
Global $Radio3 = GUICtrlCreateRadio("Riyadh", 200, 208, 193, 49))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Radio1
            If $Radio1 = $Radio1 Then Msgbox(0,"Incorrect","That is Incorrect")
            If $Radio1 = $Radio1 Then GUIDelete($Form1_1)
            If $Radio1 = $Radio1 Then Credits()
          Case $Radio2
            If $Radio2 = $Radio2 Then Msgbox(0,"Wrong","That is Incorrect")
            If $Radio2 = $Radio2 Then GUIDelete($Form1_1)
            If $Radio2 = $Radio2 Then Credits()
          Case $Radio3
            If $Radio3 = $Radio3 Then Msgbox(0,"Correct","That is Correct")
            If $Radio3 = $Radio3 Then GUIDelete($Form1_1)
            If $Radio3 = $Radio3 Then Credits()

    EndSwitch
WEnd
EndFunc
Msgbox(0,"Done","You Have Completed the Test Good Job")


func Credits()
##include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\michael\downloads\downloads\guis\credits.kxf
Global $Form1_1 = GUICreate("Form1", 615, 438, 192, 124)
Global $Label1 = GUICtrlCreateLabel("Thanks", 216, 16, 116, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
Global $Label2 = GUICtrlCreateLabel("Was", 184, 96, 205, 28)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
Global $Label3 = GUICtrlCreateLabel("Thanks", 176, 144, 229, 28)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
Global $Button1 = GUICtrlCreateButton("Close Quiz", 224, 224, 97, 33))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Button1
            Exit
     EndSwitch
   WEnd
Endfunc ;==>Credits
Link to comment
Share on other sites

  • Moderators

greenmanmech0,

Welcome to the AutoIt forum. :)

You really need to learn about arrays! :D

Take a look at this amended version of your script:

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <StaticConstants.au3>

; This array holds the data: Question; Ans 1; Ans 2; Ans 3; Correct result
Global $aData[10][5] =[ _
                    ["Capital of Turkey", "Beruit", "Baghdad", "Ankara", 3], _
                    ["Capital of Lebanon", "Beruit", "Baghdad", "Riyadh", 1], _
                    ["Capital of Israel", "Jerusalem", "Beruit", "Riyadh", 1], _
                    ["Capital of Cyprus", "Damascus", "Amman", "Nicosia", 3], _
                    ["Capital of Syria", "Kuwait City", "Damascus", "Muscat", 2], _
                    ["Capital of Palestine", "Doha", "Tehran", "None Of The Above", 3], _
                    ["Capital of Jordan", "Amman", "Tehran", "Doha", 1], _
                    ["Capital of Iraq", "Beruit", "Baghdad", "Riyadh", 2], _
                    ["Capital of Kuwait", "Nicosia", "Beirut", "Kuwait City", 3], _
                    ["Capital of Saudi Arabia", "Sana'a", "Doha", "Riyadh", 3]]

Global $aRadio[4]

Msgbox(0,"Welcome","Welcome to The Geography Game")

; Create the form just once
Global $Form1 = GUICreate("Geography", 600, 500)
Global $Label1 = GUICtrlCreateLabel("", 10, 20, 580, 40, $SS_CENTER)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
For $i = 1 To 3
    $aRadio[$i] = GUICtrlCreateRadio("", 250, 90 + ($i * 50), 100, 33)
Next
; But hide the "Close" button
Global $Button1 = GUICtrlCreateButton("Close Quiz", 250, 250, 100, 33)
GUICtrlSetState($Button1, $GUI_HIDE)
GUISetState(@SW_SHOW)

; Now work through the array
For $i = 0 To UBound($aData)

    If $i = UBound($aData) Then
        ; If there are no questions left - hide the question and radios
        GUICtrlSetState($Label1, $GUI_HIDE)
        For $j = 1 To 3
            GUICtrlSetState($aRadio[$j], $GUI_HIDE)
        Next
        ; Show the button and write the "Thanks" labels
        GUICtrlSetState($Button1, $GUI_SHOW)
        GUICtrlCreateLabel("Thanks", 10, 16, 580, 41, $SS_CENTER)
        GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
        GUICtrlCreateLabel("Was", 10, 96, 580, 28, $SS_CENTER)
        GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
        GUICtrlCreateLabel("Thanks", 10, 144, 580, 28, $SS_CENTER)
        GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
    Else
        ; If there are questions - read the data array and set the values in the controls
        GUICtrlSetData($Label1, $aData[$i][0])
        For $j = 1 To 3
            GUICtrlSetData($aRadio[$j], $aData[$i][$j])
        Next
    EndIf

    ; Now we wait for an answer
    While 1

        $iMsg = GUIGetMsg()
        Switch $iMsg
            Case $Button1
                ; Say "Well done"
                Msgbox($MB_SYSTEMMODAL ,"Done","You Have Completed the Test Good Job")
                ContinueCase
            Case $GUI_EVENT_CLOSE
                Exit
            Case Else
                ; Which radio was pressed?
                For $j = 1 To 3
                    If $aRadio[$j] = $iMsg Then
                        ; Check if it was the correct answer
                        If $aData[$i][4] = $j Then
                            Msgbox($MB_SYSTEMMODAL ,"Correct", "That is Correct")
                        Else
                            Msgbox($MB_SYSTEMMODAL ,"Error", "That is Incorrect")
                        EndIf
                        ; And breakout of the For and While loops
                        ExitLoop 2
                    EndIf
                Next
        EndSwitch

    WEnd
    
    ; Set all the radios to unchecked for the next question
    For $j = 1 To 3
        GUICtrlSetState($aRadio[$j], $GUI_UNCHECKED)
    Next

Next
Quite a bit shorter I think you will agree. ;)

We want you to learn, so please ask if you have any questions about what I have done to change it. If you are not used to working with arrays, then I recommend the Arrays tutorial in the Wiki. :)

M23

Edited by Melba23
Added more comments

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

BTW:

Could you please use meaningful titles for your threads? Everyone on this forum has a poblem and is seeking for help ;)

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download
Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki
PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki
Task Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki

Standard UDFs:
Excel - Example Scripts - Wiki
Word - Wiki

Tutorials:
ADO - Wiki
WebDriver - Wiki

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...