asp.net 怎样在内容页使用母版页的Label上的内容
母版页<%@ Master Language=＂C#＂ AutoEventWireup=＂true＂ CodeFile=＂MasterPage.master.cs＂ Inherits=＂MasterPage＂ %>…
求教高手:什么是批处理?怎么用???~^^^^^
批处理就是多个指令集合到一起,然后用一个大的指令来使他们自动执行.批处理文件就是.bat文件.和EXE一样,双击后就自动执行里面包含的指令.
VB 输入百分比的问题
val(Label9(22).Caption) >= 0.15 这样即可,你那样写15%当成字符串的
求助VB读取文本
‘楼主请看这里,测试过了,可以满足你的要求’在窗体上添加两个 label 控件,一个 timer 控件(用默认名),然后输入代码:Private Sub Form_Load() Timer1.Interval = 2000 Open ＂H:\1.txt…
如何将mv转入到vcd光盘上
下载WinAVI Video Converter 9.0绿色特别版,导入注册文件之后,运行WinAVI程序,然后点DVD,打开你要转换的视频或者MV,然后在OUTPUT FORMAT 里选择VCD,OUTPUT MODE 选择 Create Separate…
VB6中如何获取磁盘信息？
楼上的朋友可能有点小小的误会楼主的意思了，
楼主朋友可能要现在已经分好区的空间大小，已用空间、剩余空间。
当然我也不敢保证谁对谁错，
我还是把我的理解 然后 也把代码贴出来让楼主看看吧
下面代码的功能：显示光驱当前分区，以及各个盘的总空间，剩余空间。
当然。如果要硬盘总空间，我们可以把所有空间加起来，就达到要求了。
希望下面的代码对楼主有用！
‘硬盘空间大小 以及光驱
‘添加Drive1 Label1 Label2
Private Declare Function GetDiskFreeSpace Lib “kernel32” Alias “GetDiskFreeSpaceA” (ByVal lpRootPathName As String, lpSectorsPerCluster As Long, lpBytesPerSector As Long, lpNumberOfFreeClusters As Long, lpTtoalNumberOfClusters As Long) As Long
Private Declare Function GetDriveType Lib “kernel32” Alias “GetDriveTypeA” (ByVal nDrive As String) As Long
Const DRIVE_CDROM = 5
Public drivenm As String, cddrive As String
Private Sub Form_Load()
‘查找CD-ROM的驱动器号
cddrive = “”
For i = 65 To 90
If GetDriveType(Chr$(i) & “:\”) = DRIVE_CDROM Then
cddrive = UCase(Chr$(i)) & “:\”
Exit For
End If
Next i
drivenm = “c:”
Label1.AutoSize = True
Label2.AutoSize = True
Drive1.Left = (Me.Width – Drive1.Width) \ 2
Drive1.Drive = “c”
Me.Move (Screen.Width – Me.Width) \ 2, (Screen.Height – Me.Height) \ 2
gethd
End Sub
Private Sub Form_Activate()
MsgBox “你的光驱在:” & cddrive
End Sub
Private Sub Drive1_Change()
drivenm = Mid(Drive1.Drive, 1, 3)
gethd
End Sub
Private Sub gethd() ‘得知硬盘容量
On Error Resume Next
Dim dfs&, cl1&, cl2&, sec1&, byt1&, tspace&, getdiskvolm&, lSize&, kk%
Dim hdtype$, hdspace$, hdfspace$
dfs = GetDiskFreeSpace(drivenm, sec1, byt1, cl1, cl2)
If dfs Then
cl2 = Int(cl2 * sec1 / 1024 * byt1)
lSize = Len(Format$(cl2, “#########”))
If lSize < 11 Then
kk = 11 – lSize
End If
hdspace = Space(kk) + Format$(cl2, “#########”) + ” KBytes”
cl1 = Int(cl1 * sec1 / 1024 * byt1)
lSize = Len(Format$(cl1, “#########”))
If lSize < 11 Then
kk = 11 – lSize
End If
hdfspace = Space(kk) + Format$(cl1, “#########”) + ” KBytes”
Else
hdspace = “”
hdfspace = “”
End If
Label1.Caption = “你的” & drivenm & “盘的总空间是:” & Format(Str(Val(hdspace) / 1024 / 1024), “##0.0″) + ” G”
Label2.Caption = “你的” & drivenm & “盘剩余空间是:” & Format(Str(Val(hdfspace) / 1024), “###,##0.0″) + ” M”
If UCase(Left(Drive1.Drive, 2)) = UCase(Left(cddrive, 2)) Then
If Val(Label1.Caption) = 0 And Val(Label2.Caption) = 0 Then
MsgBox “这张盘是空的光盘”
Else
If Val(Label1.Caption) > 0 And Val(Label2.Caption) > 0 Then
MsgBox “这张盘不是空的光盘,但还有空间”
Else
If Val(Label1.Caption) > 0 And Val(Label2.Caption) = 0 Then
MsgBox “这张盘是写满并终止的光盘”
End If
End If
End If
End If
End Sub
怎么编写批处理
在桌面上新建一个记事本,也就是TXT的文档,然后把ntsd -c q -pn student3dvd.exe写在里面,保存后关闭. 最后把记事本的TXT后缀改成.bat就是批处理文件了 另外,如果你看不到文件的后缀名就点我的电脑-工具-文件夹选项-查看-隐藏已知文件的扩展名 前边那个勾去掉,就能看到文件的后缀是什么了.
vb计时错误
1.你的那个Timer1控件的Interval属性要设置为1000.2.在这些代码的最上面(也就是Private Sub Command1_Click()上面,加一句:Dim t1 As String)这样应该就可以了.如果还不行再通知我.
电脑硬盘分区方法
Acronis Disk Director Home 11英文版完美无损分区, 下载地址http://hi.baidu.com/guoguo6688/blog/item/d4b290017867210b1d9583cc.html教程 http://www.cncnpc.com/?action-viewthread-tid-99653…
如何用vb6.0编写记事本
用VB做一个记事本实在不很复杂,我们完全可以通过向导来很方便地做出来.但本文只打算讨论用手动方法制作记事本,旨在向VB初学者展示:学VB原来是如此容易! 通过阅读、研究本文并按本文所述进…