Here’s a great cheat sheet from MOZ.com.
Here’s the assignment for Lab3. The next class session will show us .
Public Class frmCompare '----JDS----------------------- 'CREATED: 10/15/2014 'CREATED BY: James Strickland 'CLASS: COP2010 - 090898 'PURPOSE: Write a Windows Application ' program that inputs ' three different integers ' and displays results ' in a listbox '----JDS----------------------- ' Declare variables ' inum=InputNumber Dim inum1, inum2, inum3 As Integer ' onum=OutputNumber Dim onum1, onum2, onum3, max, min As Integer Private Sub frmCompare_Load(sender As Object, _ e As EventArgs) _ Handles MyBase.Load ' Hide the "About" label at form load lblAbout.Visible = False End Sub Private Sub btnGo_Click(sender As Object, _ e As EventArgs) _ Handles btnExe.Click ' The following code is executed ' when the EXECUTE button is pressed ' Get the users 3 numbers and load ' them into the 3 input variables inum1 = txtInput1.Text inum2 = txtInput2.Text inum3 = txtInput3.Text ' Clear list box encase user wants to ' repeat program without scrolling ' down listbox. LstBoxResults.Items.Clear() ' Display numbers as user entered them ' seperated by comma LstBoxResults.Items.Add("Numbers in User Order:") LstBoxResults.Items.Add(inum1 & ", " & inum2 & ", " & inum3) LstBoxResults.Items.Add("") ' simply creates a space between answers ' Display Sum of users entered numbers LstBoxResults.Items.Add("Sum of numbers:") ' Displays to user LstBoxResults.Items.Add(inum1 + inum2 + inum3) ' does the math LstBoxResults.Items.Add("") ' simply creates a space between answers ' Display Average of numbers LstBoxResults.Items.Add("Average of Numbers:") ' Displays to user LstBoxResults.Items.Add((inum1 + inum2 + inum3) \ 3) ' does the math LstBoxResults.Items.Add("") ' simply creates a space between answers ' Display Product of numbers LstBoxResults.Items.Add("Product of numbers:") ' Displays to user LstBoxResults.Items.Add(inum1 * inum2 * inum3) ' Does the math LstBoxResults.Items.Add("") ' simply creates a space between answers ' Display Largest of the 3 numbers LstBoxResults.Items.Add("Largest of the 3:") max = inum1 ' Init variable mas a first number entered, the compare below... If inum2 > max Then max = inum2 ' inum2 greater than max, init max as inum2 (inum2 is smaller) End If If inum3 > max Then max = inum3 ' inum3 greater than max, init max as inum3 (inum3 is smaller) End If LstBoxResults.Items.Add(max) LstBoxResults.Items.Add("") ' simply creates a space between answers ' Display Smallest of the 3 numbers LstBoxResults.Items.Add("Smallest of the 3:") min = inum1 ' init min as inum1 If inum2 < min Then min = inum2 ' inum2 less than min, init min as inum2 (inum2 is bigger) End If If inum3 < min Then min = inum3 ' inum3 less than min, init min as inum3 (inum3 is bigger) End If LstBoxResults.Items.Add(min) ' Display results of min LstBoxResults.Items.Add("") ' simply creates a space between answers End Sub ' Close/Exit the program Private Sub btnExit_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) _ Handles btnExit.Click Close() End Sub Private Sub btnAbout_Click(sender As Object, _ e As EventArgs) _ Handles btnAbout.Click ' The below code hides the form content and ' displays information about the programmer ' (when the user presses the "about" button) ' which happens to be me. For those who does ' not know me, I am a big deal around here.. ' I mean, I didn't want to say nuthin....... ' Clear Form btnExe.Visible = False lblEnterNumbers.Visible = False lblInstruction.Visible = False txtInput1.Visible = False txtInput2.Visible = False txtInput3.Visible = False LstBoxResults.Visible = False ' About Programmer lblAbout.Visible = True End Sub End Class
Today I received a phone call at 5:24PM (CST) from (281) 593-3503 showed up on caller ID as Cleveland, TX.
This is the 2nd call from this person, who had a strong foreign accent. The first time I received a call from him, I told him I wasn’t interested and hung up. This time I was bored, so decided to go along with him.
Here’s how the conversation went:
He started out by telling me he has been monitoring infected files on my computer. He then asked me is my computer connected to the internet.
I said yes.
He asked what I seen on my screen, I said google
He asked me to close the window and press <windows/flag> key and “R”, I complied.
He asked me what I saw, I told him the run screen.
He asked me to type “inf hiddenfiles” then asked me if I knew what it was, I said no. then pressed enter after he instructed me to.
This opened a window
He then asked me if I knew what these files were, I said no. He said that they were a list of infected files. These are infact driver information files (windows/inf)
Then then asked me to go to a website by way of <win/flag> + R (run command) ( http://rescue12.webs.com )
Then he asked me to download teamviewer and install it on my computer. Since There was no way I was going to give him access to my computer, I went ahead and pulled the plug.
I asked him, since he seen infected files from my computer, what was the IP address of my computer. He didn’t have an answer. I then asked him who my ISP was, he didn’t have an answer… I figured I spent enough time of the phone with this idiot… so I told him I knew what he was up to and was reporting it to the authorities. He said go ahead, then hung up.
Now, here’s some relevant data for us geeks:
Who is for the website hosting the probably viruses:
I’m not being paid to do this, so I’m not going to load the files and see what wireshark shows… and perhaps trace the IP, which I would assume would be in a foreign country.
Bottom line everyone… if someone sends you links and they don’t look right… double check before you give anyone remote access to your computer. It is extremely easy to gain prolong access to your computer if you just give me 10 secs of remote access to your computer. If you get a phone call from your ISP (cox or centurylink) then perhaps it may be a legitimate phone call, but VERIFY.
I also asked for a call back number, and he gave me: 201-234-4604, I did not try to call it.
Finally migrated my WordPress blog from the WP/ folder to the root directory, making it my main CMS for Strickstuff.com and KK4WMI.com.
My todo list is:
- Work on menu’s
- Work on integration of Photo Gallery
- Update Photo gallery
- enough for now…
Hopefully I’ll make this work…
Yet another year is about to pass, as such, so should the old look. I was going for a “paper” look, to match the “theme” I have for my main site. Doesn’t really match, but it will work. It is my intention to write more in my blog in 2012.
I really hope 2012 to be a prosperous year for our family. We certainly need some prosperity! I will go back to school next month getting my computer certifications. North West Florida State College is my weapon of choice. I should come out with Comptia A+, Security+, Linux+, and Network+ and a College Certificate in IT Technology.
Recently finished my degree, and have started studying for my A+ certification. While finishing up my degree, I discovered that the Air Force will pay $4500 dollars to take classes for certifications. Further research revealed that the Air Force offered free training CBT’s (Computer Based Training). These CBT’s cover A+ and Network + just to cover a few. My goal is to be certified on A+, Network+ and Security+ prior to me getting out of the Military in 4 years. The only thing the Air Force will not pay for is the test fee’s.
Stumbled upon this cartoon:
Thought this was hilarious!!! Of course, since I’m not much of a C++ programmer, I would do something like this:
Sub airplanes() Range("A1").Value = "I will not throw paper airplanes in class" Range("A1").Copy Range("A2:A500").PasteSpecial End Sub
throw this in a spreadsheet then email it to the teacher!!! Ok, so this method wouldn’t be as cool as the pic, but it would work and save time! Wonder how you could do this in BASH…
Fellow Readers… (Whomever that may be…)
Just some updates. July was a busy month for me. My little baby had to have surgery, so we were flown Hawaii where Doctors at Tripler Army Medical Center (TAMC) operated on my little girl. The surgery went well, and we are very thankful.
It was very nice to visit Hawaii, but I was glad, as always, to get back home. My Dad was fortunate enough to make it over to be with Audrey and I during the surgery. This was the first time he had flown since around 1966. Airports and aircraft have changed dramatically since then, huh?
I’m back to work now, and actually looked forward to coming to work for the first time in a long time. The weather is raining, as usual this time in the pacific. August is just around the corner, and school will be starting.
Sabayon Linux 3.5 was released while I was gone. I’m downloading it now, and will install it when it’s done downloading or later on this week. Probably won’t be done downloading until later on this week. My ISP sucks over here.
As far as my website goes, I plan on redoing it once again. It needs a new look. I’m pretty much tired of the look. And since I have more time now, I plan on hand coding my new site. As soon as I come up with a color scheme, I’ll get busy.
Enough for now… I’ll try to post more later and include some photo’s I took in Hawaii…
Remember when you could fill your car up and only use a $20 bill? Well, I have accepted that we have passed that years ago. Remember when you could take the change out of the console of your vehicle and fill your lawnmower up? I certainly do. I think that the days of filling anything up for less than $5 are over. The days of taking $5 to the store to fill your lawnmower up and buying a coke are over.
Here’s what sparked this. I went to the store to fill my 1 gallon gas can up so I can mow the grass (Ok, so my two sons can mow the grass). After filling the gas can up, I only got back 10 cents from a $5 bill. I mean, I didn’t fill up a 5 gallon gas can… this was a small 1 gallon can. I think the lawnmower holds ½ gallon. So, that’s $2.50 per lawnmower “fill-up.” This is ridiculous. I have two cars, both run on Gasoline. Now, to fill both cars up, will take a $100 bill.
Of course, when I was a wee little lad, around the age of 10, I could also remember purchasing an ICE cold Coca Cola Classic, 16 ounce glass bottle for 35 cents. Then, when I was done drinking it, I could return the bottle and I would get 10 cents back. Return 10 bottles, and I would receive an entire dollar, to do with what I please. Of course, in the 80’s, a dollar would get you a bit farther that it does now. My Grandmother would always send me to the store down the road. Mr. Garlands store as it was called. This store was located on prime Highway 27 frontage. The price was gas was around $1.00 per gallon. The winters were colder… just seems that life was easier for a 10 year old. No Nintendo DS games, no Playstations, no XBOX… only Hot wheel cars, BB gun, army men, and my bicycle and cousins and friends to play with. Enough for now…