Skip to content

Instantly share code, notes, and snippets.

View Vitosh's full-sized avatar
🏀
Come out and play

Vitosh Academy Vitosh

🏀
Come out and play
View GitHub Profile
@Vitosh
Vitosh / gist:b1634a83a2868466f6f9f959b3785808
Created February 17, 2023 16:12
For-While-Do-While-Loops-In-Golang.go
package main
import (
"fmt"
)
func main() {
fmt.Println("for-loop:")
ii := 1
for ii < 100 {
@Vitosh
Vitosh / gist:479a8a447fec6a28a4afbc8aa9ce6ecc
Created November 15, 2022 08:09
excel_version_of_some_stackoverflow_access_code
Public Enum CodeInfoEnum
ciEnums
ciConstants
End Enum
'---------------------------------------------------------------------------------------
' Procedure : CodeInfo
'
' Author : RMittelman@gmail.com
Private Sub Worksheet_Change(ByVal target As Range)
FirstCode target
SecondCode target
End Sub
Private Sub FirstCode(ByVal target As Range)
Dim Item As String
Dim SearchRange As Range
@Vitosh
Vitosh / CheckIfArrayIsFull.vb
Last active November 25, 2019 11:08
Checks whether there are units in the array.
Option Explicit
Sub TestMe()
Dim errorArray()
Dim checkArray As Integer
Dim errorString As String
Dim c As Range
using System;
namespace Hanna
{
class Startup
{
static void Main()
{
String input = "12.12.2222";
int[] x = { 0, 0, 0 };
wkb.wks.Range("A1") = 213
wkb.wks.Range("B1") = 322
wkb.wks.Range("C1") = 32232
Write in the immediate window the following:
s = "2"
?[s]
?Evaluate(s)
a = 2
?[a]
?Evaluate(a)
Option Explicit
Option Private Module
Sub Testing()
Dim strCell As String
With ActiveSheet
strCell = Left(.Cells(1, 1), 5)
Private Sub btnExit_Click()
RaiseEvent OnExit
End Sub
Private Sub UserForm_QueryClose(CloseMode As Integer, Cancel As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
using System;
class t01
{
static void Main()
{
string str_read = "";
long long_total = long.Parse(Console.ReadLine());
long long_left;
long long_right;
long long_answer = 0;