我要制作显示图片的应用程序。我想添加“删除”功能,但我遇到了问题。问题是图片之间的差距。我想删除它们。
例如:
我有这样的数组:
{1 = image_1, 2 = image_2, 3 = image_3}
当我删除 image_2 时,我有:
{1 = image_1, 2 = nil, 3 = image_3}
我想要:
{1 = image_1, 2 = Image_3}
代码:
Public Class Form1
Dim latestImageId As Integer = 0
Dim dispPictureId As Integer = 0
Dim images(128) As Image
Private Sub CapturePic(sender As Object, e As EventArgs) Handles TestToolStripMenuItem.Click
If My.Computer.Clipboard.ContainsImage() Then
latestImageId = (latestImageId + 1)
images(latestImageId) = My.Computer.Clipboard.GetImage()
If dispPictureId = 0 Then
Label1.Text = dispPictureId …Run Code Online (Sandbox Code Playgroud) 当我尝试设置/打开注册表项时,我得到了异常:
Requested registry access is not allowed.
Run Code Online (Sandbox Code Playgroud)
我可以设置requestedExecutionLevel密钥requireAdministrator,但我不希望每次,当应用程序启动时看到管理员提示.有些用户没有管理员权限.它非常适合按需请求管理员权限.
代码我已经尝试过:
Dim regStartUp As RegistryKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
Dim value As String
value = regStartUp.GetValue("App")
If value <> Application.ExecutablePath.ToString() & " startup" Then
regStartUp.CreateSubKey("App")
regStartUp.SetValue("App", Application.ExecutablePath.ToString() & " startup")
End If
Dim CommandLineArguments As String() = Environment.GetCommandLineArgs()
Dim i As Integer
Dim hideme As Boolean = False
For i = 0 To CommandLineArguments.GetUpperBound(0)
Console.WriteLine(CommandLineArguments(i) & vbCrLf)
If CommandLineArguments(i).ToLower() = "startup" Then
hideme = True
End If
Next
If …Run Code Online (Sandbox Code Playgroud) 我有一个小问题......

它是左上角的网页角落.在那里我有一个div背景,div距边缘几个像素.
我的代码:
HTML
<div id="contcont"></div>
Run Code Online (Sandbox Code Playgroud)
CSS
#contcont{
width: 100% ;
height: 100%;
background-color: rgb(0,0,255);
background-image:url('bg.jpg');
background-size: cover;
background-repeat: no-repeat;
top:0;
bottom: 0;
left: 0;
right: 0;
}
Run Code Online (Sandbox Code Playgroud)
我怎样才能消除这个差距?