vb.net重新开始程序的简单介绍

vb.net的安装怎么去安装？选择什么

步骤一：打开需要制作安装程序的VB.Net项目

点击菜单【文件—新建项目】出现如图01的对话框单击【其他项目类型—安装和部署】选择【安装项目】如图：

步骤二：

双击【My Project】（在“解决方案资源管理器”里面呢）vb.net重新开始程序，如图所示。

步骤三3：单击【引用】选项卡vb.net重新开始程序，查看解决方案的引用项，关注一下.Net类型的引用，本解决方案引用.Net类型的版本是2.0版。查看这个信息直接关系到最终安装文件的大小。

右键单击“解决方案资源管理器”中【Setup1】，选择【添加—项目输出】，选择“主输出”后单击【确定】。

再次右键点击【Setup1】，选择【属性】，跳出对话框。

步骤四：这里的设置可是关键中的关键

步骤五：“选择要安装的系统必备组件”，解决的是运行可执行文件环境的问题运行使用VB.Net编写的程序，必须在系统中安装.Net Framework（也有软件使用虚拟环境运行的）。“查看引用”查到的信息就用到vb.net重新开始程序了。如果解决方案只是引用了2.0版本的框架（.Net Framework），默认的系统组件选择。

可以选择框架3.5，建议使用框架2.0，因为框架2.0大小是30M，而框架3.5却有300M之巨.指定系统必备组件的安装设置”这个选项也挺有用。如果编写了一个很简单的程序，想发布（此发布不是前述的发布）出去让大家使用，而又不想拖着少则几十兆多则几百兆的框架的话，那么可以选择第一个互斥按钮。如果担心用户在安装程序时上网不方便，不能从供应 商那儿下载框架的话，那么，只好把框架拖上喽（这也是为什么在能选择框架2.0的时候莫要选择框架3.5的原因，安装程序越小越好，用户如果安装了几百 兆的程序，发现打开的只是个简单的计算器的话，会气的摔键盘的vb.net重新开始程序！）

相关问答

Q1: VB.NET问题！200分

第一个问题：跳转到另一个窗体使用语句 Object.showvb.net重新开始程序，

你可以在form1任一控件事件下编写form2.show就行，如果还隐藏form1vb.net重新开始程序的话，再添加一句from1.hide

第二个问题

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

op1 = txt1.Text

op2 = txt2.Text

op3 = txt3.Text

op4 = txt4.Text

ba = txt3.Text

If op1 = "" Then

MsgBox("你已没有钱了，请重新开始", vbOKOnly + vbInformation, "游戏失败")

txt1.Text = 100

在这个位置添加一句代码

exit sub

不过我看你这段程序漏洞百出，我改正了一下，不过没明白你为什么用单选按钮去接收文本框的数据，所以就按照你的改了。改正后的代码如下：声明一下，你程序里的txt在我程序里是text，忘改了。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim ba As String

op1.Text = Text1.Text

op2.Text = Text2.Text

op3.Text = Text3.Text

op4.Text = Text4.Text

ba = Text3.Text

If op1.Text = "" Then

MsgBox("你已没有钱了，请重新开始", vbOKOnly + vbInformation, "游戏失败")

Text1.Text = 100

Exit Sub

ElseIf op1.Text = 0 Then

MsgBox("你已没有钱了，请重新开始", vbOKOnly + vbInformation, "游戏失败")

Text1.Text = 100

End If

If op2.Text = "" Then

MsgBox("最少需要下注1", vbOKOnly + vbInformation, "输入错误")

ElseIf op2.Text = 0 Then

MsgBox("请输入下注金额", vbOKOnly + vbInformation, "输入错误")

End If

If Val(op1.Text) Val(op2.Text) Then

MsgBox("你没有那么多钱了，请重新输入", vbOKOnly + vbInformation, " 你没那么多钱了")

End If

Dim bytcom As Byte

bytcom = Int(Rnd() * 3)

Select Case bytcom

Case 0

Text4.Text = -(Val(op2.Text) * Val(op3.Text))

Text1.Text = Val(op1.Text) - Val(op2.Text) * Val(op3.Text)

MsgBox("你出布，计算机出剪刀，你输了", vbOKOnly + vbInformation, "很遗憾")

Case 1

Text4.Text = Val(op2.Text) * Val(op3.Text)

Text1.Text = Val(op1.Text) + Val(op2.Text) * Val(op3.Text)

MsgBox("你出布，计算机出石头，你赢了", vbOKOnly + vbInformation, "恭喜")

Case 2

Text4.Text = 0

MsgBox("你出布，计算机出布，平手", vbOKOnly + vbInformation, "不要灰心")

End Select

If Text1.Text = 1000000 Then

MsgBox("恭喜你通关了vb.net重新开始程序！重新开始", vbOKOnly + vbInformation, "游戏通关")

Text1.Text = 1000

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

End If

Q2: vb.net做安装包，安装后自动运行程序

1 新建安装部署项目

打开VS2005，点击新建项目，选择：其他项目类型-安装与部署-安装向导(安装项目)，然后点击确定。

2 安装向导

关闭后打开安装向导，点击下一步，或者直接点击完成。

3 开始制作

安装向导完成后即可进入项目文件夹：

双击"应用程序文件夹"在右边的空白处右击，选择添加-文件，将你的做的应用程序的可执行文件和相应的类库和组件添加进来。然后右击你的文件，创建快捷方式，然后把快捷方式分别复制或剪切到左边的"用户的'程序'菜单"和"用户桌面"中。这样安装程序安装完成后会在 "开始-所有程序"和"桌面"上生成程序的快捷方式。也可以直接在"用户的'程序'菜单"和"用户桌面"相应目录下新建快捷方式，然后定位到你的文件。

然后右击左边的"应用程序文件夹"打开属性对话框：将属性中的"DefaultLocation"的路径中的"[Manufacturer]"去掉，不然的话做好的安装程序默认安装目录会是"C:\Program Files\你的用户名\安装解决方案名称"；

然后打开解决方案管理器，右击你的解决方案名称，选择属性：打开的属性页中，选择"系统必备"， 在打开的系统必备页中，在"指定系统必备安装组件的位置"中选中如下选择项：从与我的应用程序相同的位置下载系统必备组件。选上以后，在生成的安装文件包中包含.NetFramework组件 。好了，这样就完成99%了，然后点击"生成-生成解决方案"，生成成功!

我以前参考过的，希望对你有帮助。

安装完成后自动启动程序

1.新建一个空的项目InstallCompenent,步骤为:解决方案-右键添加-新建项目-选择"空项目"-输入名称"InstallCompenent"-确定,完成项目的添加.

2.在InstallCompenent项目中右键-添加-新建项-选择安装程序类-输入名称"Installer",完成installer类的添加.

修改代码为:

/// summary

/// 功能是做安装项目主项目输出

/// 实现安装过程中的一些操作

/// 如:安装完成后启动项目

/// /summary

[RunInstaller(true)]

public partial class Installer : Installer

{

/// summary

/// 应用程序入口

/// /summary

public static void Main()

{

}

/// summary

/// 构造函数

/// /summary

public ECSuitsInstaller()

{

InitializeComponent();

}

/// summary

/// 重写安装完成后函数

/// 实现安装完成后自动启动已安装的程序

/// /summary

/// param name="savedState"/param

protected override void OnAfterInstall(IDictionary savedState)

{

base.OnAfterInstall(savedState);

Assembly asm = Assembly.GetExecutingAssembly();

string path = asm.Location.Remove(asm.Location.LastIndexOf("\\")) + "\\";

System.Diagnostics.Process.Start(path + "\\ECSuits.exe");

}

/// summary

/// 重写安装过程方法

/// /summary

/// param name="stateSaver"/param

public override void Install(IDictionary stateSaver)

{

base.Install(stateSaver);

}

/// summary

/// 重写安装之前方法

/// /summary

/// param name="savedState"/param

protected override void OnBeforeInstall(IDictionary savedState)

{

base.OnBeforeInstall(savedState);

}

/// summary

/// 重写卸载方法

/// /summary

/// param name="savedState"/param

public override void Uninstall(IDictionary savedState)

{

base.Uninstall(savedState);

}

/// summary

/// 重写回滚方法

/// /summary

/// param name="savedState"/param

public override void Rollback(IDictionary savedState)

{

base.Rollback(savedState);

}

}

3.在安装项目中右键-添加项目输出-选择"项目"-InstallCompenent.

完成主输出项目的添加.

4.打开自定义操作编辑器,在安装-右键-添加自定义操作-选择"应用程序文件夹"-选择"主输出来自InstallCompenent",完成添加.

Q3: vb.net 如何实现继续运行

看代码吧！在上次累加的基础上继续累加

窗体中包含一个Button1

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Static a As Integer

For i = 1 To 100 '运算100次

a = a + i

Next

End Sub

End Class

static 是声明静态变量，只要程序不退出，值就会一直保存

这样，你第一次点击 a的值就是5050

第二次点击a就变成了 10100

Q4: 在VB.net中我想实现“先暂停该程序，等其他程序运行完再继续执行该程序”的功能，请问怎么实现？

详细查看vb.net重新开始程序了你vb.net重新开始程序的问题vb.net重新开始程序，完全不需要使用线程sleep的方法。

在这边，我要给你引入一个概念。就是Form窗体的两个方法。

Form.Show()和Form.ShowDialog()

第一个Show方法运行后，你的主程序还是会进行，你的代码还是会继续进行下去。此时，窗体还是弹出的。

第二个ShowDialog方法运行后，此时，弹出的一个窗体，你不将其关闭，那么，主程序就会一直等待这个窗体关闭后，才执行后面的代码。

所以，你只需要使用showdialog这个方法，即可达到你想要的结果。

那么，如何才能让弹出的窗体不改变呢？很简单

你可以找到窗体的formcloseing事件，在这个事件中，有一个参数：e

这个e有一个属性，就是e.handle，表示是否处理过这个事件vb.net重新开始程序了。

这个时候，如果你不想让窗体关闭，你可以写：

e.handle=true，那么表示已经处理过窗体关闭的事件了。

注：有些情况，可能是：e.cancel=true

Q5: VB.NET求帮忙！...

新建窗体，把maximizebox属性和MinimizeBox 属性设为false，再添加一个Label1放置文字一个Picturebox1放图片。

在窗体的load事件中：

Private Sub Form1_Load() Handles Me.Load

Text="我的VB.NET程序"

PuctureBox1.Image=Image.FromFile(图片路径如e:\pic.jpg)

End Sub

窗体Click事件：

Private Sub Form1_Click() Handles Me.Click

Text="单击窗体"

Label1.Text="欢迎使用VB.NET"

End Sub

窗体DoubleClick事件

Private Sub Form1_DoubleClick() Handles Me.DoubleClick

Text="双击窗体"

Label1.Text = "谢谢使用！"

End Sub

vb.net重新开始程序的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于、vb.net重新开始程序的信息别忘了在本站进行查找喔。