vb.net选择框 vb中列表框
vb.net中怎么向excel表中添加个复选框
点击“开始”-“Excel选项”，在“基本设置”选项卡中勾选右侧的“在功能区上显示‘开发工具’”，使其显示出来。
宜兴网站制作公司哪家好，找创新互联公司！从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设公司等网站项目制作，到程序开发，运营维护。创新互联公司从2013年创立到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联公司。
切换到“开发工具”功能区，点击插入”下拉列表框，在弹出的列表中选择“复选框（ActiveX控件）”。
然后在文档区域拖动以绘制一个复选框。 并在该复选框上右键单击，在弹出的菜单中选择“属性”以打开“属性对话框”。
在打开的“属性对话框”中将“Caption”设置为空，”BackStyle“设置为透明，边框效果设置为0类型，完成后关闭”属性对话框“。
在vb.net中如何实现单击按钮弹出文件选择框，效果如下这个页面中的“upload multiple files nows”按钮，
有个c#的例子，你参考一下把
Below is now the code for the main page used to upload multiple images.
Default.aspx
This is the code inside the form tag
div
asp:Label ID="Label1" runat="server" Text="Locate File:" /
asp:FileUpload ID="fileUp" runat="server" /
br /
asp:Label ID="Description" runat="server" Text="Description:"/asp:Label
asp:TextBox ID="txtDesc" runat="server" Width="349px"/asp:TextBox
asp:Button ID="btnAddFile" runat="server" Text="Add File To Upload List"
onclick="btnAddFile_Click" /
/div
div
asp:Label ID="lblCurrentFileCount" runat="server"/asp:Label
br /
asp:DataList ID="dlPhotoFiles" runat="server" RepeatColumns="10" RepeatDirection="Horizontal"
ItemTemplate
asp:Image ID="Image1" runat="server" ImageUrl='%# string.Format("~/getImage.aspx?id={0}", Eval("id")) %'
Width="50" AlternateText='%# Eval("fileDesc") %' /
br /
asp:LinkButton ID="lnkBtnRemovePhoto" runat="server"
CommandArgument='%# Eval("id") %' OnCommand="lnkBtnRemovePhoto_Command"Remove/asp:LinkButton
/ItemTemplate
/asp:DataList
br /
/div
br /
div
asp:Button ID="btnUploadFiles" runat="server" Text="Upload File(s)"
onclick="btnUploadFiles_Click" /
/div
Default.aspx.cs
This is all of the code behind:
DataSet dsPhotosFiles = new DataSet();
protected void Page_Init(object sender, EventArgs e)
{
if (Session["dsPhotoFiles"] == null)
{
this.initPhotoDS();
Session.Add("dsPhotoFiles", dsPhotosFiles);
}
else
{
dsPhotosFiles = (DataSet)Session["dsPhotoFiles"];
}
}
protected void btnAddFile_Click(object sender, EventArgs e)
{
if (fileUp.PostedFile.ContentLength 0)
{
//TODO: logic for file extension check
DataRow dr = dsPhotosFiles.Tables[0].NewRow();
string fileExt = System.IO.Path.GetExtension(fileUp.PostedFile.FileName);
byte[] imageBytes = new byte[fileUp.PostedFile.InputStream.Length];
fileUp.PostedFile.InputStream.Read(imageBytes, 0, imageBytes.Length);
dr["fileBytes"] = imageBytes;
dr["filePath"] = fileUp.PostedFile.FileName;
dr["fileDesc"] = txtDesc.Text;
dr["id"] = System.Guid.NewGuid().ToString();
dsPhotosFiles.Tables[0].Rows.Add(dr);
}
this.bindDataList();
txtDesc.Text = "";
lblCurrentFileCount.Text = "Current Files To Upload: " + dsPhotosFiles.Tables[0].Rows.Count;
}
protected void btnUploadFiles_Click(object sender, EventArgs e)
{
try
{
for (int i = 0; i dsPhotosFiles.Tables[0].Rows.Count; i++)
{
//TODO:logic to save image path and description to database
string fileName = System.IO.Path.GetFileName(dsPhotosFiles.Tables[0].Rows[i]["filePath"].ToString());
byte[] imageBytes;
imageBytes = (byte[])dsPhotosFiles.Tables[0].Rows[i]["fileBytes"];
//their is no uploading..just writing out the bytes to the directory on the web server.
System.IO.File.WriteAllBytes(Server.MapPath(string.Format("~/documents/{0}", fileName)), imageBytes);
}
//TODO: show success message logic
//clear out rows of dataset not the whole dataset
dsPhotosFiles.Tables[0].Rows.Clear();
this.bindDataList();
lblCurrentFileCount.Text = "Current Files To Upload: " + "0";
}
catch (Exception ex)
{
//TODO: show error message of which file did not get uploaded
throw new Exception(ex.Message);
}
}
private void initPhotoDS()
{
dsPhotosFiles.Tables.Add("Photos");
dsPhotosFiles.Tables[0].Columns.Add("fileBytes", Type.GetType("System.Byte[]"));
dsPhotosFiles.Tables[0].Columns.Add("filePath");
dsPhotosFiles.Tables[0].Columns.Add("fileDesc");
dsPhotosFiles.Tables[0].Columns.Add("id");
}
private void bindDataList()
{
dlPhotoFiles.DataSource = dsPhotosFiles;
dlPhotoFiles.DataKeyField = "id";
dlPhotoFiles.DataBind();
}
protected void lnkBtnRemovePhoto_Command(object sender, CommandEventArgs e)
{
foreach(DataRow dr in dsPhotosFiles.Tables[0].Rows)
{
if (dr["id"].ToString() == e.CommandArgument.ToString())
{
dsPhotosFiles.Tables[0].Rows.Remove(dr);
break;
}
}
this.bindDataList();
lblCurrentFileCount.Text = "Current Files To Upload: " + dsPhotosFiles.Tables[0].Rows.Count;
}
VB.net怎么弹出文件夹路径选择框
选择文件夹 在工具箱 - 对话框 里选择 FolderBrowserDialog 添加 到设计器中
然后 代码写在 按钮事件里
FolderBrowserDialog1.ShowDialog()
textbox1.text =FolderBrowserDialog1.SelectedPath
选择文件 在工具箱 - 对话框 里选择 OpenFileDialog
把 OpenFileDialog1.ShowDialog()
TextBox1.Text = OpenFileDialog1.FileName
写到按钮事件下
如图
点击按钮会弹出 通用对话框 选择好路径后 确定 ，编辑框里就会显示选择的路径
名称栏目：vb.net选择框 vb中列表框
文章出自：http://scjbc.cn/article/hppsoi.html
