This VBScript shows how to change the number of tile rows on the Start screen in Windows 8.
By default, the number of rows for the tiles is fully dependent on the screen resolution or window size that fits on your Windows Screen. But sometimes the user wants to display a specific number of rows of tiles on the Start Screen that is not dependent on the screen size.
Step 1: You can run this VBScript sample by simply double-clicking.
The step is shown in the following figure.

Step 2: Enter a number you want to change the number of tile rows and then click the OK button.

When the script finishes running, it will spawn a window that displays brief information about the result.

The result is shown below:

Here are some code snippets for your references. To get the complete script sample, please click the download button at the beginning of this page.
If strAnswer = "" Then
WScript.Quit
Else
RowNumber = CInt(strAnswer)
End If
'Define a key registry path
regMaximumRowsPath = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\ImmersiveShell\Grid\Layout_MaximumAvailableHeightCells"
regRowsCounPath = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\ImmersiveShell\Grid\Layout_MaximumRowCount"
MaximumRowValue = objShell.RegRead(regMaximumRowsPath)
If strAnswer = ""Then WScript.Quit Else RowNumber = CInt(strAnswer) EndIf'Define a key registry path regMaximumRowsPath = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\ImmersiveShell\Grid\Layout_MaximumAvailableHeightCells" regRowsCounPath = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\ImmersiveShell\Grid\Layout_MaximumRowCount" MaximumRowValue = objShell.RegRead(regMaximumRowsPath)
Windows 8